debugging testgf3

This commit is contained in:
aarne
2008-03-05 18:59:14 +00:00
parent 674b4765e6
commit fe86395853
5 changed files with 20 additions and 11 deletions

View File

@@ -2,9 +2,10 @@ resource Param = {
param Bool = True | False ;
oper and : Bool -> Bool -> Bool = \x,y -> case x of {
oper and -- : Bool -> Bool -> Bool
= \\x,y => case x of {
True => y ;
_ => False
False => False
} ;
}