Subversion Repositories wimsdev

Rev

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

Rev 4986 Rev 7692
Line 18... Line 18...
18
!distribute item $wims_read_parm into slib_data,slib_n,slib_p
18
!distribute item $wims_read_parm into slib_data,slib_n,slib_p
19
 
19
 
20
!default slib_n= 5
20
!default slib_n= 5
21
!default slib_p=0.5
21
!default slib_p=0.5
22
 
22
 
23
!if $slib_p>=1 or $slib_p<=0 
23
!if $slib_p>=1 or $slib_p<=0
24
	slib_out=0
24
	slib_out=0
25
	!exit
25
	!exit
26
!endif
26
!endif
27
slib_out=
27
slib_out=
28
slib_data=!declosing $slib_data
28
slib_data=!declosing $slib_data