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

  let Number/lessThan = ../Number/lessThan.dhall nix

  in  λ(a : Double) →
      λ(b : Double) →
        Number/lessThan (Number/fromDouble a) (Number/fromDouble b)