Subversion Repositories wimsdev

Rev

Rev 8820 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 8820 Rev 10937
Line 14... Line 14...
14
slib_inp=!singlespace $wims_read_parm
14
slib_inp=!singlespace $wims_read_parm
15
slib_out=
15
slib_out=
16
!if $slib_inp=$empty
16
!if $slib_inp=$empty
17
 !exit
17
 !exit
18
!endif
18
!endif
19
slib_haspire=huit
19
slib_haspire=huit haricot
20
 
20
 
21
slib_n=!wordcnt $slib_inp
21
slib_n=!wordcnt $slib_inp
22
!for slib_i=1 to $slib_n-1
22
!for slib_i=1 to $slib_n-1
23
 slib_W=!word $slib_i of $slib_inp
23
 slib_W=!word $slib_i of $slib_inp
24
 slib_w=!lower $slib_W
24
 slib_w=!lower $slib_W