Subversion Repositories wimsdev

Rev

Rev 13593 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 13593 Rev 14218
Line 50... Line 50...
50 
$ in $slib_off
 50 
$ in $slib_off
51 
slib_H=1
 51 
slib_H=1
52 
slib_u=!line 1 of $slib_off
 52 
slib_u=!line 1 of $slib_off
53 
slib_nom=!replace internal # by $empty in $slib_u
 53 
slib_nom=!replace internal # by $empty in $slib_u
54 
!while # isin $slib_u
 54 
!while # isin $slib_u
55 
!advance slib_H
 55 
  !advance slib_H
56 
slib_u=!line $slib_H of $slib_off
 56 
  slib_u=!line $slib_H of $slib_off
57 
!endwhile
 57 
!endwhile
58 
 
 58 
 
59 
!distribute word $slib_u into slib_S_cnt, slib_F_cnt, slib_A_cnt
 59 
!distribute word $slib_u into slib_S_cnt, slib_F_cnt, slib_A_cnt
60 
 
 60 
 
61 
slib_sommet=!line $[$slib_H+1] to $[$slib_H+$slib_S_cnt] of $slib_off
 61 
slib_sommet=!line $[$slib_H+1] to $[$slib_H+$slib_S_cnt] of $slib_off