>>473
typo, "recursive"
ええと、>>472 に近いのは >>449 かもしれませんが、>>449 は bit 数を具体的に求めきっていますか？それとも >>472 のように真理値まで短縮してリターンしてますか？
haskell はよくわからないので…