9 lines
220 B
Text
9 lines
220 B
Text
|
λ(nix : ../NixPrelude.dhall) →
|
||
|
|
let Double/multiply = ./multiply.dhall nix
|
||
|
|
|
||
|
|
let product
|
||
|
|
: List Double → Double
|
||
|
|
= λ(xs : List Double) → List/fold Double xs Double Double/multiply 1.0
|
||
|
|
|
||
|
|
in product
|