on 385dcbf help sign in
14 lines 204 B history raw
1module Main
3import Data.Vect
4import Foo
6data Foo = Bar | Baz
8implementation Show Foo where
10append : Vect n a -> Vect m a -> Vect (n + m) a
11append (x :: xs) ys = ?append_rhs_2
13main : IO ()
14main = foo