Lines Matching defs:bnok
3122 sub bnok {
3133 return $n if $n->modify('bnok');
3142 if ($k -> is_inf()) { # bnok(+/-inf,+/-inf)
3144 } elsif ($k -> is_neg()) { # bnok(+/-inf,k), k < 0
3146 } elsif ($k -> is_zero()) { # bnok(+/-inf,k), k = 0
3149 if ($n -> is_inf("+", @r)) { # bnok(+inf,k), 0 < k < +inf
3151 } else { # bnok(-inf,k), k > 0
3158 elsif ($k -> is_inf()) { # bnok(n,+/-inf), -inf <= n <= inf
3164 return $upgrade -> bnok($n, $k, @r)
3178 # n < 0 and k >= 0: bnok(n,k) = (-1)^k * bnok(-n+k-1,k)
3185 # n < 0 and k <= n: bnok(n,k) = (-1)^(n-k) * bnok(-k-1,n-k)
6617 $x->bnok($y); # x over y (binomial coefficient n over k)
7600 =item bnok()
7602 $x->bnok($y); # x over y (binomial coefficient n over k)