Rev 4161 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed
Rev 4161 | Rev 4330 | ||
---|---|---|---|
Line 3... | Line 3... | ||
3 | !endif |
3 | !endif |
4 | 4 | ||
5 | slib_parms=1\ |
5 | slib_parms=1\ |
6 | ,[data] |
6 | ,[data] |
7 | 7 | ||
8 |
|
8 | slib_author=Sophie, Lemaire; Bernadette, Perrin-Riou |
9 | 9 | ||
10 | slib_example=[2,4,7] |
10 | slib_example=[2,4,7] |
11 | !exit |
11 | !exit |
12 | 12 | ||
13 | :proc |
13 | :proc |
14 | slib_out= |
14 | slib_out= |
15 | 15 | ||
16 | !distribute |
16 | !distribute item $wims_read_parm into slib_data |
17 | 17 | ||
18 | slib_data=!declosing $slib_data |
18 | slib_data=!declosing $slib_data |
19 | 19 | ||
20 | slib_out=!values (1 + sign (x) * (1 - exp (- abs (x)))) / 2 for x in $slib_data |
20 | slib_out=!values (1 + sign (x) * (1 - exp (- abs (x)))) / 2 for x in $slib_data |
21 | 21 |