Idris2/tests/idris2/interactive003/IEdit2.idr
Edwin Brady a972778eab Add test script
They don't all pass yet, for minor reasons. Coming shortly...
Unfortunately the startup overhead for chez is really noticeable here!
2020-05-19 18:25:18 +01:00

13 lines
258 B
Idris

data Vect : Nat -> Type -> Type where
Nil : Vect Z a
(::) : a -> Vect k a -> Vect (S k) a
%name Vect xs, ys, zs
append : Vect n a -> Vect m a -> Vect (n + m) a
append xs ys
= case xs of
[] => ?bar_3
(x :: zs) => ?bar_4