mirror of
https://github.com/idris-lang/Idris2.git
synced 2024-12-26 21:23:53 +03:00
a972778eab
They don't all pass yet, for minor reasons. Coming shortly... Unfortunately the startup overhead for chez is really noticeable here!
6 lines
112 B
Idris
6 lines
112 B
Idris
import Data.Vect
|
|
|
|
dvec : (n : Nat) -> {default (replicate n 1) xs : Vect n Nat} -> Nat
|
|
dvec n = foldr (+) Z xs
|
|
|