mirror of
https://github.com/idris-lang/Idris2.git
synced 2024-12-19 01:01:59 +03:00
13 lines
149 B
Idris
13 lines
149 B
Idris
import Data.Vect
|
|
|
|
f : {n : Nat} -> Vect n Nat
|
|
f = replicate _ 0
|
|
|
|
d : Vect n Nat -> Nat
|
|
d = foldl (+) 0
|
|
|
|
failing "Unsolved hole"
|
|
|
|
z : Nat
|
|
z = d f
|