def to_nat
import bend-lawful-stdlib@0.1.0.0/src/float/bin.bend as Binimport Base
237def to_nat(a: Bin) -> Nat:
238 match a:
239 case BZ{}:
240 0n
241 case B0{r}:
242 Nat.double(to_nat(r))
243 case B1{r}:
244 1n+Nat.double(to_nat(r))