type check cc command

This commit is contained in:
aarne
2004-09-08 11:36:53 +00:00
parent 51c9afa5c8
commit 318379f73a
3 changed files with 12 additions and 1 deletions

View File

@@ -44,6 +44,7 @@ def
(LtNat one n)
(Univ Nat (\x -> Impl (Conj (LtNat one x) (Div n x)) (EqNat x n))) ;
Abs = Abs ;
--- data Elem = zero | succ ;
fun ex1 : Text ;