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

  let Number/fromNatural = ./fromNatural.dhall nix

  let Number/subtract = ./subtract.dhall nix

  in  λ(a : Number) → Number/subtract (Number/fromNatural 0) a