Subversion Repositories wimsdev

Rev

Rev 20 | Rev 4329 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
20 reyssat 1
!if $wims_read_parm!=slib_header
2
!goto proc
3
!endif
4161 bpr 4
 
20 reyssat 5
slib_author=Bernadette PERRIN-RIOU
4161 bpr 6
 
20 reyssat 7
slib_example=[-2,-4,1],0,1
8
!exit
9
 
10
:proc
11
slib_out=
12
!distribute  item $wims_read_parm into slib_data,slib_mean,slib_var
13
!default slib_mean=0
14
!default slib_var=1
15
slib_data=!declosing $slib_data
16
 
17
slib_out = !values  (1+erf((x-$slib_mean)/(sqrt(2)*$slib_var)))*0.5 for x in $slib_data
18
slib_out=!trim $slib_out
19