Subversion Repositories wimsdev

Rev

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

Rev 4329 Rev 4330
Line 3... Line 3...
3
!goto proc
3
!goto proc
4
!endif
4
!endif
5
 
5
 
6
slib_parms=3\
6
slib_parms=3\
7
,[data]\
7
,[data]\
8
1,m\
8
1,mu\
9
1,sigma
9
1,sigma
10
 
10
 
11
slib_author=Bernadette PERRIN-RIOU
11
slib_author=Sophie, Lemaire; Bernadette, Perrin-Riou
12
 
12
 
13
slib_example=[0.2,0.4,0.7],3,4
13
slib_example=[0.2,0.4,0.7],3,4
14
slib_require=octave
14
slib_require=octave
15
!exit
15
!exit
16
 
16
 
Line 19... Line 19...
19
!distribute  item $wims_read_parm into slib_data,slib_mean,slib_var
19
!distribute  item $wims_read_parm into slib_data,slib_mean,slib_var
20
!default slib_mean=0
20
!default slib_mean=0
21
!default slib_var=1
21
!default slib_var=1
22
slib_data=!declosing $slib_data
22
slib_data=!declosing $slib_data
23
 
23
 
-
 
24
!!deprecated syntax
24
slib_out=!exec octave lognormal_inv([$slib_data], $[exp($slib_mean)],$[$slib_var^2])
25
!!slib_out=!exec octave lognormal_inv([$slib_data], $[exp($slib_mean)],$[$slib_var^2])
25
!!slib_out=!exec octave logninv([$slib_data], $[exp($slib_mean)],$[$slib_var])
26
slib_out=!exec octave logninv([$slib_data], $[exp($slib_mean)],$[$slib_var])
26
 
27
 
27
slib_out=!words2items $slib_out
28
slib_out=!words2items $slib_out
28
slib_out=!trim $slib_out
29
slib_out=!trim $slib_out
29
 
30