on 385dcbf help sign in
Idris-dev/test/interactive002/interactive002.idr
21 lines 445 B history raw
1import Data.Vect
3foo : ?foo_arg1 -> ?foo_arg2 -> ?foo_arg3 -> ?foo_ret
4foo (S a) b c = plus (a + b + c) 42
5foo Z b c = plus b c
7bar : Vect n a -> Vect m a -> ?bar_out
8bar xs ys = xs ++ ys
10myplus : ?plus_in1 -> ?plus_in2 -> ?plus_out
11myplus Z y = y
12myplus (S k) y = S (myplus k y)
14vfun : a -> Vect n a -> Vect n a -> Vect ?what a
15vfun v xs ys = v :: ys
17ifoo : ?ifoo_arg1 -> IO ?ifoo_out
18ifoo x = do putStrLn x
19 putStrLn "World"