And.hascasl.output revision 5cb757fab60f0c6bd6c2ff444d18963f078be9be
free type Bool ::= False | True
op And : Bool -> ? Bool -> Bool
var x : ? Bool
. And False x = False
. And True x = x
. And False True = False; %implied
type
Bool : Type
op And : Bool -> ? Bool -> Bool %(op)%
op False : Bool %(constructor)%
op True : Bool %(constructor)%
var
x : ? Bool
free type Bool ::= False | True %(ga_Bool)%
forall x : ? Bool . And False x = False
forall x : ? Bool . And True x = x
. And False True = False %implied
### Hint 3.8, not a kind '? Bool'