mirror of
https://github.com/idris-lang/Idris2.git
synced 2024-12-29 22:51:51 +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
|