Rev 4328 | Details | Compare with Previous | Last modification | View Log | RSS feed
| Rev | Author | Line No. | Line |
|---|---|---|---|
| 20 | reyssat | 1 | !if $wims_read_parm!=slib_header |
| 13586 | bpr | 2 | !goto proc |
| 20 | reyssat | 3 | !endif |
| 4161 | bpr | 4 | |
| 20 | reyssat | 5 | slib_author=Adeline Grelot |
| 4328 | bpr | 6 | slib_example=1,2,3 |
| 20 | reyssat | 7 | !exit |
| 8 | |||
| 9 | :proc |
||
| 10 | !readproc slib/stat/dataproc $wims_read_parm |
||
| 11 | |||
| 12 | !if $slib_cnt=0 |
||
| 13586 | bpr | 13 | slib_out=1 |
| 20 | reyssat | 14 | !else |
| 13586 | bpr | 15 | slib_data=!sum 1/x for x in $slib_data |
| 16 | slib_out=$[$slib_cnt/($slib_data)] |
||
| 20 | reyssat | 17 | !endif |
| 18 | slib_out =!trim $slib_out |