Rev 4330 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed
Rev 4330 | Rev 7692 | ||
---|---|---|---|
Line 23... | Line 23... | ||
23 | !endif |
23 | !endif |
24 | 24 | ||
25 | slib_data=!declosing $slib_data |
25 | slib_data=!declosing $slib_data |
26 | slib_out= |
26 | slib_out= |
27 | !for slib_x in $slib_data |
27 | !for slib_x in $slib_data |
28 | !if $slib_x<0 |
28 | !if $slib_x<0 |
29 | slib_out=!append item 0 to $slib_out |
29 | slib_out=!append item 0 to $slib_out |
30 | !else |
30 | !else |
31 | slib_out=!append item $[$slib_p *exp(-$slib_p*$slib_x)] to $slib_out |
31 | slib_out=!append item $[$slib_p *exp(-$slib_p*$slib_x)] to $slib_out |
32 | !endif |
32 | !endif |
33 | !next slib_x |
33 | !next slib_x |