Subversion Repositories wimsdev

Rev

Rev 4161 | Rev 4330 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 4161 Rev 4328
Line 22... Line 22...
22 
slib_out=
 22 
slib_out=
23 
!for slib_x in $slib_data
 23 
!for slib_x in $slib_data
24 
 !if $slib_x<=0
24 
 !if $slib_x<=0
25 
   slib_out=!append item 0 to $slib_out
 25 
   slib_out=!append item 0 to $slib_out
26 
 !else
 26 
 !else
27 
   slib_out=!append item  $[$slib_a*$slib_b*exp(-$slib_b*$slib_x^($slib_a))*$slib_x^($slib_a-1)] to $slib_out
 27 
   slib_out=!append item $[$slib_a*$slib_b*exp(-$slib_b*$slib_x^($slib_a))*$slib_x^($slib_a-1)] to $slib_out
28 
 !endif
 28 
 !endif
29 
!next slib_x
 29 
!next slib_x
30 
 
 30 
 
31 
slib_out=!trim $slib_out
 31 
slib_out=!trim $slib_out
32 
slib_data=$empty
 32 
slib_data=$empty
33 
 
 -