10 lines
321 B
Text
10 lines
321 B
Text
λ(nix : ../NixPrelude.dhall) →
|
|
let Number/fromDouble = ../Number/fromDouble.dhall nix
|
|
|
|
let Number/add = ../Number/add.dhall nix
|
|
|
|
let Number/toDouble = ../Number/toDouble.dhall nix
|
|
|
|
in λ(a : Double) →
|
|
λ(b : Double) →
|
|
Number/toDouble (Number/add (Number/fromDouble a) (Number/fromDouble b))
|