Subversion Repositories wimsdev

Rev

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

Rev 4161 Rev 4328
Line 2... Line 2...
2 
!goto proc
 2 
!goto proc
3 
!endif
 3 
!endif
4 
 
 4 
 
5 
slib_author=Bernadette PERRIN-RIOU
 5 
slib_author=Bernadette PERRIN-RIOU
6 
 
 6 
 
- 
 
 7 
slib_parms=3\
- 
 
 8 
,[data]\
- 
 
 9 
1,m\
- 
 
 10 
1,sigma
- 
 
 11 
 
7 
 slib_example=[2,4,7] ,3,4
 12 
 slib_example=[2,4,7] ,3,4\
- 
 
 13 
 2,2,sqrt(2)\
- 
 
 14 
 2,2,2\
- 
 
 15 
 2,1,1
8 
 !exit
 16 
 !exit
9 
 
 17 
 
10 
:proc
 18 
:proc
11 
slib_out=
 19 
slib_out=
12 
 
 20 
 
13 
!distribute  item $wims_read_parm into slib_data,slib_mean,slib_var
 21 
!distribute item $wims_read_parm into slib_data,slib_mean,slib_var
14 
!default slib_mean=1
 22 
!default slib_mean=1
15 
!default slib_var=1
 23 
!default slib_var=1
- 
 
 24 
!! en fait c'est un écart type
16 
slib_data=!declosing $slib_data
 25 
slib_data=!declosing $slib_data
17 
 
 26 
 
18 
slib_out=
 27 
slib_out=
19 
!for slib_i in  $slib_data
 28 
!for slib_i in  $slib_data
20 
 !if $slib_i > 0
 29 
 !if $slib_i > 0