.t#c ----            .t#c ..sch #a 8#jc0

       .1nexe #a -- .4ps d'[mb*s
    
  -- .9s3ivz l'1n=e d'[pos[ vis=e ? >
    cas: ci-de!us4
  -- .& sav)r c5 r>$ir ct 1nexe1 v)r l
    (api0e #c 8 .t#c -- .g2de ds
    fiduci:4
  -- .9 l':pace : 9suffis?1 j)7z un
    f"i_e 4t9cte4 3_.j)7z u ex>$/re r>$i
    d ct 1nexe ( ' d=%ar* d ' fiducie4

.note 8 03ipt.3
  8.l'1nexe #a : 5 col+n:1 dt #a ( #b
  col+n: 7des3iptiv:7 ) #e col+n:
  7num=rot=:74 .l'[6im= a d l':pace & #a
  ( #b 50=:40

.rq3
  .n'utilisz ps ct 1nexe & d=d2re un
  p8te d=ducti^e k t0 d'u $cm d'50e6ise
  subie l;s d'un 4p d'a#s \ d 3=1c: d'un

                                      #a
               .1nexe #a
  soci=t= x$)t? un pee 50e6ise4 .lisz '
  l7 #be 8 .t#c -- .g2de ds fiduci:4

      .a#s admi!i^: d pee 50e6ise
    
.nb d'a#s ----
.nw d ' soci=t= ) cat=gorie d'a#s ----
8#a0 .1n=e d l'acqis[ ----
8#b0 .6d d 4p ----
8#c0 .6x d base rajust= ---- ^s
8#d0 .d=p5s: effectu=: rtvs kx 4ps
  ---- ^s
8#e0 .ga9 8p8te0 8col+ne #b m9 col+n: #c
  ) #d0 ---- ^s
8#ajaa0 .total 8.total ds 50=: 0 '
  col+ne #b0 ---- ^s
8#a0 ) 8#ajab0 .ga9 8p8te0 8.total ds
  50=: 0 ' col+ne #e0 ---- ^s





                                      #b
          .bs a]icol: admi!i^:
    
.a?e!e \ d=si7* ofll ----
8#a0 .1n=e d l'acqis[ ----
8#b0 .6d d 4p ----
8#c0 .6x d base rajust= ---- ^s
8#d0 .d=p5s: effectu=: rtvs kx 4ps
  ---- ^s
8#e0 .ga9 8p8te0 8col+ne #b m9 col+n: #c
  ) #d0 ---- ^s
8#ajba0 .total 8.total ds 50=: 0 '
  col+ne #b0 ---- ^s
8#b0 ) 8#ajbb0 .ga9 8p8te0 8.total ds
  50=: 0 ' col+ne #e0 ---- ^s

      .unts d f+ds -n d $cm ) k0s
                  a#s
    
  8.d=%arz ( ' l7 #aj > ga9s 8\ p8t:0 5
    capital 9diq=s h u f"i_et d r5s40
  
.nb d'a#s ----
.nw 8 f+ds \ d ' soci=t= ) cat=gorie
  d'a#s ----
8#a0 .1n=e d l'acqis[ ----            #c
               .1nexe #a
8#b0 .6d d 4p ----
8#c0 .6x d base rajust= ---- ^s
8#d0 .d=p5s: effectu=: rtvs kx 4ps
  ---- ^s
8#e0 .ga9 8p8te0 8col+ne #b m9 col+n: #c
  ) #d0 ---- ^s
8#ajca0 .total 8.total ds 50=: 0 '
  col+ne #b0 ---- ^s
8#c0 ) 8#ajcb0 .ga9 8\ p8te0 8.total ds
  50=: 0 ' col+ne #e0 ---- ^s

      .o^ig*s1 d=b5tur:1 bi_ets (
            ;?e ) k0s bs sbs
    
.v. nominale ----
.date d'=(=1ce ----
.nw d l'=mew. ----
8#a0 .1n=e d l'acqis[ ----
8#b0 .6d d 4p ----
8#c0 .6x d base rajust= ---- ^s
8#d0 .d=p5s: effectu=: rtvs kx 4ps
  ---- ^s
8#e0 .ga9 8p8te0 8col+ne #b m9 col+n: #c
  ) #d0 ---- ^s                       #d
               .1nexe #a
8#ajda0 .total 8.total ds 50=: 0 '
  col+ne #b0 ---- ^s
8#d0 ) 8#ajdb0 .ga9 8\ p8te0 8.total ds
  50=: 0 ' col+ne #e0 ---- ^s

         .bs [m"^:1 bs am;ti!^s
    
  8n'9%uz ps > p8t: h ds bs am;ti!^s0
.a?e!e \ d=si7* ofll ----
8#a0 .1n=e d l'acqis[ ----
8#b0 .6d d 4p ----
8#c0 .6x d base rajust= ---- ^s
8#d0 .d=p5s: effectu=: rtvs kx 4ps
  ---- ^s
8#e0 .ga9 8p8te0 8col+ne #b m9 col+n: #c
  ) #d0 ---- ^s
8#ajea0 .total 8.total ds 50=: 0 '
  col+ne #b0 ---- ^s
8#e0 ) 8#ajeb0 .ga9 8p8te0 8.total ds
  50=: 0 ' col+ne #e0 ---- ^s



                                      #e
              .bs ( ug pnl
    
  8d+nz un des3ipt# -t0 ----
8#a0 .1n=e d l'acqis[ ----
8#b0 .6d d 4p ----
8#c0 .6x d base rajust= ---- ^s
8#d0 .d=p5s: effectu=: rtvs kx 4ps
  ---- ^s
8#e0 .ga9 8p8te0 8col+ne #b m9 col+n: #c
  ) #d0 ---- ^s
8#ajfa0 .total 8.total ds 50=: 0 '
  col+ne #b0 ---- ^s
8#f0 ) 8#ajfb0 8.9 n=gatif1 9s3ivz 7#j70
  8.total ds 50=: 0 ' col+ne #e0 ---- ^s

       .bs m"^: d=t8min=s 8..bmd0
    
  8d+nz un des3ipt# -t0 ----
8#a0 .1n=e d l'acqis[ ----
8#b0 .6d d 4p ----
8#c0 .6x d base rajust= ---- ^s
8#d0 .d=p5s: effectu=: rtvs kx 4ps
  ---- ^s
8#e0 .ga9 8p8te0 8col+ne #b m9 col+n: #c
  ) #d0 ---- ^s                       #f
               .1nexe #a
8#ajga0 .total 8.total ds 50=: 0 '
  col+ne #b0 ---- ^s
8#g0 ) 8#ajgb0 8.total ds 50=: 0 '
  col+ne #e0 ---- ^s

.rq3
  .> p8t: h ..bmd n p"v< <0 d=d2t: q ds
  ga9s h > ..bmd4

8#h0 ) 8#ajhj0 .9s3ivz > p8t: h
  > ..bmd d ' l7 #g 8 f;mul/re
  .t#ajee ) > p8t: h > ..bmd
  9utilis=: d'k0s 1n=: 8d+nz ds
  6=cis#s04 """""""""""""""""""" ---- ^s
8#i0 _.ga9 _net 8l7 #g m9 l7 #h0 ---- ^s

8#aj0 ) 8#aajj0 .f"i_ets d r5s
  -- 3_.ga9s 8p8t:0 5 _capital
  8j)7z > f"i_ets .t#c1 .t#e1
  .t#d..ps ) .t#ejac0 """""""""" ---- ^s
8#aa0 ) 8#aacj0 .p8t: 5 capital
  d=c\l? d'un r=duct# ds p8t: k
  t0 d $cms d'50e6ise """""""""" ---- ^s
                                      #g
               .1nexe #a
8#ab0 ) 8#aadb0 .r=duct# ds ga9s
  5 capital 6ven? d ' 4p
  d'5tit=s 9t8m=di/r: """""""""" ---- ^s
8#ac0 3_.total ds m+t?s d '
  col+ne #e av > _6vis#s
  8addit#nz > l7s #a ( #f1 #i )
  #aj1 6 s\s0ayz > l7s #aa )
  #ab0 """"""""""""""""""""""""" ---- ^s
8#ad0 ) 8#aagj0 .ga9s 8p8t:0 5
  capital 6ven? ds 6vis#s 8l7 #e
  d ' col+ne #c d l'1nexe #b0
  8.9 c m+t? : un p8te 5
  capital1 3_n l'9diqz _ps 50e
  par5th!s:40 """""""""""""""""" ---- ^s
8#ae0 _.total _p@tiel 8l7 #ac $
  l7 #ad0 """""""""""""""""""""" ---- ^s
8#af0 .ga9s 5 capital rajust=s
  r=sult? 8 d+ d cns [mb*s 8l7
  #f d l'1nexe #a,.a0 """""""""" ---- ^s
8#ag0 ) 8#aaia0 3_.ga9s
  5 capital r=sult? d'u
  d+ d'k0s _[mb*s 8.lisz
  ' l7 #af 8 g2de0 """"" ---- ^s
                                      #h
               .1nexe #a
8#ah0 ) 8#afdf0 .total
  ds p8t: 0f=r=: sel+
  #afd8#f0 8_n'_9diqz
  _ps c m+t? 50e
  par5th!s:0 """"""""""""""""""" ---- ^s
8#ai0 _.total _p@tiel 8addit#nz
  > l7s #ae1 #af1 ) #ah0 """"""" ---- ^s
  multi$i= p """""""""""""""""" un-demie
8#ba0 ) 8#abbj0 3_.total ds
  ga9s 5 capital [pos^s 8\ p8t:
  5 capital _new:0 8l7 #ai
  multi$i=e p un-demie0 """""""" ---- ^s

  .9 l m+t? d ' l7 #ba : positif1
9s3ivz-l ( ' l7 #ja d ' d=%ar*4 .s'i :
n=gatif1 lisz ' l7 #ja 8 .t#c -- .g2de
ds fiduci:4






                                      #i