12 lines
349 B
Text
12 lines
349 B
Text
|
λ(nix : ../NixPrelude.dhall) →
|
||
|
|
let Number/fromInteger = ../Number/fromInteger.dhall nix
|
||
|
|
|
||
|
|
let Number/divide = ../Number/divide.dhall nix
|
||
|
|
|
||
|
|
let Number/toInteger = ../Number/toInteger.dhall nix
|
||
|
|
|
||
|
|
in λ(a : Integer) →
|
||
|
|
λ(b : Integer) →
|
||
|
|
Number/toInteger
|
||
|
|
(Number/divide (Number/fromInteger a) (Number/fromInteger b))
|