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