Rev 4482 | Rev 8775 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed
Rev 4482 | Rev 7692 | ||
---|---|---|---|
Line 29... | Line 29... | ||
29 | slib_V=$empty |
29 | slib_V=$empty |
30 | !for slib_i=1 to $[$slib_m2 +1] |
30 | !for slib_i=1 to $[$slib_m2 +1] |
31 | slib_v=!item $slib_i of $slib_w |
31 | slib_v=!item $slib_i of $slib_w |
32 | slib_v1=!item $slib_i of $slib_w1 |
32 | slib_v1=!item $slib_i of $slib_w1 |
33 | slib_v2=!item $slib_i of $slib_w2 |
33 | slib_v2=!item $slib_i of $slib_w2 |
34 | slib_v1=$[$slib_sigma*$slib_v1*$slib_v+$slib_mu] |
34 | slib_v1=$[$slib_sigma*$slib_v1*$slib_v+$slib_mu] |
35 | slib_v2=$[$slib_sigma*$slib_v2*$slib_v+$slib_mu] |
35 | slib_v2=$[$slib_sigma*$slib_v2*$slib_v+$slib_mu] |
36 | 36 | ||
37 | !if $slib_i<=$slib_m2 |
37 | !if $slib_i<=$slib_m2 |
38 | slib_V=!append item $slib_v1 to $slib_V |
38 | slib_V=!append item $slib_v1 to $slib_V |
39 | slib_V=!append item $slib_v2 to $slib_V |
39 | slib_V=!append item $slib_v2 to $slib_V |
40 | !endif |
40 | !endif |
41 | !if $slib_i>$slib_m2 and $[2*$slib_m2]!=$slib_m |
41 | !if $slib_i>$slib_m2 and $[2*$slib_m2]!=$slib_m |
42 | slib_V=!append item $slib_v1 to $slib_V |
42 | slib_V=!append item $slib_v1 to $slib_V |
43 | !endif |
43 | !endif |
44 | !next slib_i |
44 | !next slib_i |
45 | 45 | ||
46 | !if $slib_m >1 |
46 | !if $slib_m >1 |
47 | slib_V=!shuffle $slib_V |
47 | slib_V=!shuffle $slib_V |
48 | !endif |
48 | !endif |
49 | 49 | ||
50 | slib_out=!trim $slib_V |
50 | slib_out=!trim $slib_V |