Subversion Repositories wimsdev

Rev

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

Rev 4482 Rev 4986
Line 15... Line 15...
15 
!exit
 15 
!exit
16 
 
 16 
 
17 
:proc
 17 
:proc
18 
slib_out=
 18 
slib_out=
19 
 
 19 
 
20 
!distribute  item $wims_read_parm into slib_data,slib_a,slib_b
 20 
!distribute item $wims_read_parm into slib_data,slib_a,slib_b
21 
slib_data=!declosing $slib_data
 21 
slib_data=!declosing $slib_data
22 
slib_cnt=!itemcnt $slib_data
 22 
slib_cnt=!itemcnt $slib_data
23 
!if $slib_cnt=1
 23 
!if $slib_cnt=1
24 
	slib_data=1,$slib_data
 24 
	slib_data=1,$slib_data
25 
!endif
25 
!endif
26 
!!deprecated syntax
 - 
 
27 
!!slib_out=!exec octave pascal_rnd($slib_a,$slib_b,$slib_data)
 - 
 
28 
slib_out=!exec octave nbinrnd($slib_a,$slib_b,$slib_data)
 26 
slib_out=!exec octave nbinrnd($slib_a,$slib_b,$slib_data) + $slib_a
29 
 
 27 
 
30 
slib_out=!trim $slib_out
 28 
slib_out=!trim $slib_out
31 
slib_out=!replace internal $\
 29 
slib_out=!replace internal $\
32 
$ by ; in $slib_out
 30 
$ by ; in $slib_out
33 
slib_out=!words2items $slib_out
 31 
slib_out=!words2items $slib_out