@@ -1,4 +1,4 @@
1−module Default
1+module Effect.Default
3import Data.Vect
3import Data.Vect
@@ -43,4 +43,3 @@ implementation Default a => Default (Vect n a) where
43 mkDef : (n : Nat) -> Vect n a
43 mkDef : (n : Nat) -> Vect n a
44 mkDef Z = []
44 mkDef Z = []
45 mkDef (S k) = default :: mkDef k
45 mkDef (S k) = default :: mkDef k