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= ,,,,,,,,,0,0,1.2,1.5,2.4,3.2\ |
7 | slib_example= ,,,,,,,,,0,0,1.2,1.5,2.4,3.2\ |
Line 41... | Line 41... | ||
41 | !! of 1, 2 or 5. |
41 | !! of 1, 2 or 5. |
42 | slib_log=$[log10($slib_xs/($slib_xd-$slib_xo))] |
42 | slib_log=$[log10($slib_xs/($slib_xd-$slib_xo))] |
43 | slib_logint=$[floor($slib_log)] |
43 | slib_logint=$[floor($slib_log)] |
44 | slib_logmant=$[$slib_log-$slib_logint] |
44 | slib_logmant=$[$slib_log-$slib_logint] |
45 | !if $slib_logmant > $[log10(5)] |
45 | !if $slib_logmant > $[log10(5)] |
46 |
|
46 | slib_xs=1e$[$slib_logint+1] |
47 | !else |
47 | !else |
48 | !if $slib_logmant > $[log10(2)] |
48 | !if $slib_logmant > $[log10(2)] |
49 | slib_xs=5e$slib_logint |
49 | slib_xs=5e$slib_logint |
50 | !else |
50 | !else |
51 | slib_xs=2e$slib_logint |
51 | slib_xs=2e$slib_logint |
Line 66... | Line 66... | ||
66 | !! of 1, 2 or 5. |
66 | !! of 1, 2 or 5. |
67 | slib_log=$[log10($slib_ys/($slib_yd-$slib_yo))] |
67 | slib_log=$[log10($slib_ys/($slib_yd-$slib_yo))] |
68 | slib_logint=$[floor($slib_log)] |
68 | slib_logint=$[floor($slib_log)] |
69 | slib_logmant=$[$slib_log-$slib_logint] |
69 | slib_logmant=$[$slib_log-$slib_logint] |
70 | !if $slib_logmant > $[log10(5)] |
70 | !if $slib_logmant > $[log10(5)] |
71 |
|
71 | slib_ys=1e$[$slib_logint+1] |
72 | !else |
72 | !else |
73 | !if $slib_logmant > $[log10(2)] |
73 | !if $slib_logmant > $[log10(2)] |
74 | slib_ys=5e$slib_logint |
74 | slib_ys=5e$slib_logint |
75 | !else |
75 | !else |
76 | slib_ys=2e$slib_logint |
76 | slib_ys=2e$slib_logint |