11 lines
261 B
Text
11 lines
261 B
Text
let Integer/add = ./add.dhall
|
|
|
|
let sum
|
|
: List Integer → Integer
|
|
= λ(xs : List Integer) → List/fold Integer xs Integer Integer/add +0
|
|
|
|
let example = assert : sum [ +2, +3, +5 ] ≡ +10
|
|
|
|
let example = assert : sum ([] : List Integer) ≡ +0
|
|
|
|
in sum
|