λ(nix : ../NixPrelude.dhall) →
  let Number = ./Type.dhall

  let Integer/toNatural = ../Integer/toNatural.dhall

  let Number/toInteger = ./toInteger.dhall nix

  in  λ(a : Number) → Integer/toNatural (Number/toInteger a)