Rev 7692 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed
Rev 7692 | Rev 13594 | ||
---|---|---|---|
Line 1... | Line 1... | ||
1 | !if $wims_read_parm!=slib_header |
1 | !if $wims_read_parm!=slib_header |
2 | !goto proc |
2 | !goto proc |
3 | !endif |
3 | !endif |
4 | 4 | ||
5 | slib_author=Georges, Khaznadar |
5 | slib_author=Georges, Khaznadar |
6 | 6 | ||
7 | slib_example= 12,8,0,0,1,1,125,13\ |
7 | slib_example= 12,8,0,0,1,1,125,13\ |
Line 42... | Line 42... | ||
42 | !! of 1, 2 or 5. |
42 | !! of 1, 2 or 5. |
43 | slib_log=$[log10($slib_xs/($slib_xd-$slib_xo))] |
43 | slib_log=$[log10($slib_xs/($slib_xd-$slib_xo))] |
44 | slib_logint=$[floor($slib_log)] |
44 | slib_logint=$[floor($slib_log)] |
45 | slib_logmant=$[$slib_log-$slib_logint] |
45 | slib_logmant=$[$slib_log-$slib_logint] |
46 | !if $slib_logmant > $[log10(5)] |
46 | !if $slib_logmant > $[log10(5)] |
47 |
|
47 | slib_xs=1e$[$slib_logint+1] |
48 | !else |
48 | !else |
49 | !if $slib_logmant > $[log10(2)] |
49 | !if $slib_logmant > $[log10(2)] |
50 | slib_xs=5e$slib_logint |
50 | slib_xs=5e$slib_logint |
51 | !else |
51 | !else |
52 | slib_xs=2e$slib_logint |
52 | slib_xs=2e$slib_logint |