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 41... | Line 41... | ||
41 | !if $slib_mind >=$slib_max |
41 | !if $slib_mind >=$slib_max |
42 | slib_out=!values 1 for x=1 to $slib_cnt |
42 | slib_out=!values 1 for x=1 to $slib_cnt |
43 | !exit |
43 | !exit |
44 | !endif |
44 | !endif |
45 | 45 | ||
46 | slib_valeur=!exec pari vector(ceil($slib_maxd)-$slib_min+1,x,1.*binomial($slib_K,x+$slib_min-1)*binomial($slib_N-$slib_K,$slib_n-x-$slib_min+1)*$slib_b) |
46 | slib_valeur=!exec pari vector(ceil($slib_maxd)-$slib_min+1,x,1.*binomial($slib_K,x+$slib_min-1)*binomial($slib_N-$slib_K,$slib_n-x-$slib_min+1)*$slib_b) |
47 | - | ||
48 | 47 | ||
49 | !for slib_x in $slib_data |
48 | !for slib_x in $slib_data |
50 | !if $slib_x<$slib_min |
49 | !if $slib_x<$slib_min |
51 | slib_out=!append item 0 to $slib_out |
50 | slib_out=!append item 0 to $slib_out |
52 | !endif |
51 | !endif |