Foldl.hascasl.output revision af47051acb16b97b6bc0ff7295cae44eed87d63e
304d15b2ffa9376d78bddcfc63569824381714abDaniel Hausmannvar a : Type
304d15b2ffa9376d78bddcfc63569824381714abDaniel Hausmanntype List(a : Type)
304d15b2ffa9376d78bddcfc63569824381714abDaniel Hausmannop nil : List a
304d15b2ffa9376d78bddcfc63569824381714abDaniel Hausmannop head : List a -> a
304d15b2ffa9376d78bddcfc63569824381714abDaniel Hausmannop snoc : List a -> a --> List a
304d15b2ffa9376d78bddcfc63569824381714abDaniel Hausmannforall x : a
304d15b2ffa9376d78bddcfc63569824381714abDaniel Hausmann. ((fun __=__[List a] : forall a : Type . a * a ->? Unit) :
304d15b2ffa9376d78bddcfc63569824381714abDaniel Hausmann List a * List a ->? Unit)
304d15b2ffa9376d78bddcfc63569824381714abDaniel Hausmann ((((op snoc[a] : forall a : Type . List a -> a --> List a) :
304d15b2ffa9376d78bddcfc63569824381714abDaniel Hausmann List a -> a --> List a)
304d15b2ffa9376d78bddcfc63569824381714abDaniel Hausmann ((op nil[a] : forall a : Type . List a) : List a) :
304d15b2ffa9376d78bddcfc63569824381714abDaniel Hausmann a --> List a)
304d15b2ffa9376d78bddcfc63569824381714abDaniel Hausmann (var x : a) :
304d15b2ffa9376d78bddcfc63569824381714abDaniel Hausmann List a,
304d15b2ffa9376d78bddcfc63569824381714abDaniel Hausmann (((op snoc[a] : forall a : Type . List a -> a --> List a) :
304d15b2ffa9376d78bddcfc63569824381714abDaniel Hausmann List a -> a --> List a)
304d15b2ffa9376d78bddcfc63569824381714abDaniel Hausmann ((op nil[a] : forall a : Type . List a) : List a) :
304d15b2ffa9376d78bddcfc63569824381714abDaniel Hausmann a --> List a)
304d15b2ffa9376d78bddcfc63569824381714abDaniel Hausmann (var x : a) :
304d15b2ffa9376d78bddcfc63569824381714abDaniel Hausmann List a) :
304d15b2ffa9376d78bddcfc63569824381714abDaniel Hausmann Unit
304d15b2ffa9376d78bddcfc63569824381714abDaniel Hausmann. ((fun __=__[a] : forall a : Type . a * a ->? Unit) :
304d15b2ffa9376d78bddcfc63569824381714abDaniel Hausmann a * a ->? Unit)
304d15b2ffa9376d78bddcfc63569824381714abDaniel Hausmann ((((op head[a ->? a] : forall a : Type . List a -> a) :
304d15b2ffa9376d78bddcfc63569824381714abDaniel Hausmann List (a ->? a) -> a ->? a)
304d15b2ffa9376d78bddcfc63569824381714abDaniel Hausmann ((op nil[a ->? a] : forall a : Type . List a) : List (a ->? a)) :
304d15b2ffa9376d78bddcfc63569824381714abDaniel Hausmann a ->? a)
304d15b2ffa9376d78bddcfc63569824381714abDaniel Hausmann (var x : a) :
304d15b2ffa9376d78bddcfc63569824381714abDaniel Hausmann a,
304d15b2ffa9376d78bddcfc63569824381714abDaniel Hausmann var x : a) :
304d15b2ffa9376d78bddcfc63569824381714abDaniel Hausmann Unit
304d15b2ffa9376d78bddcfc63569824381714abDaniel Hausmann%% Type Constructors -----------------------------------------------------
304d15b2ffa9376d78bddcfc63569824381714abDaniel Hausmann? : +Type -> Type
304d15b2ffa9376d78bddcfc63569824381714abDaniel HausmannList : Type -> Type
304d15b2ffa9376d78bddcfc63569824381714abDaniel HausmannLogical : Type := ? Unit
304d15b2ffa9376d78bddcfc63569824381714abDaniel HausmannPred : -Type -> Type := \ a : -Type . a ->? Unit
304d15b2ffa9376d78bddcfc63569824381714abDaniel HausmannUnit : Type
304d15b2ffa9376d78bddcfc63569824381714abDaniel Hausmann__*__ : +Type -> +Type -> Type
304d15b2ffa9376d78bddcfc63569824381714abDaniel Hausmann__*__*__ : +Type -> +Type -> +Type -> Type
304d15b2ffa9376d78bddcfc63569824381714abDaniel Hausmann__*__*__*__ : +Type -> +Type -> +Type -> +Type -> Type
__*__*__*__*__ : +Type -> +Type -> +Type -> +Type -> +Type -> Type
__-->__ : -Type -> +Type -> Type < (__-->?__, __->__)
__-->?__ : -Type -> +Type -> Type < __->?__
__->__ : -Type -> +Type -> Type < __->?__
__->?__ : -Type -> +Type -> Type
%% Type Variables --------------------------------------------------------
a : Type %(var_1)%
%% Assumptions -----------------------------------------------------------
__/\__ : ? Unit * ? Unit ->? Unit %(fun)%
__<=>__ : ? Unit * ? Unit ->? Unit %(fun)%
__=__ : forall a : Type . a * a ->? Unit %(fun)%
__=>__ : ? Unit * ? Unit ->? Unit %(fun)%
__=e=__ : forall a : Type . a * a ->? Unit %(fun)%
__\/__ : ? Unit * ? Unit ->? Unit %(fun)%
__if__ : ? Unit * ? Unit ->? Unit %(fun)%
__when__else__ : forall a : Type . a * ? Unit * a ->? a %(fun)%
bottom : forall a : Type . a %(fun)%
def__ : forall a : Type . a ->? Unit %(fun)%
false : Unit %(fun)%
head : forall a : Type . List a -> a %(op)%
nil : forall a : Type . List a %(op)%
not__ : ? Unit ->? Unit %(fun)%
snoc : forall a : Type . List a -> a --> List a %(op)%
true : Unit %(fun)%
�__ : ? Unit ->? Unit %(fun)%
%% Variables -------------------------------------------------------------
x : a
%% Sentences -------------------------------------------------------------
(__=__ : List a * List a ->? Unit)
(((snoc : List a -> a --> List a)(nil : List a) : a --> List a)
(x) :
List a,
((snoc : List a -> a --> List a)(nil : List a) : a --> List a)(x) :
List a) :
Unit
(__=__ : a * a ->? Unit)
(((head : List (a ->? a) -> a ->? a)(nil : List (a ->? a)) :
a ->? a)
(x) :
a,
x) :
Unit
%% Diagnostics -----------------------------------------------------------
*** Hint 1.5, is type variable 'a'
*** Hint 2.11, rebound type variable 'a'
*** Hint 6.9, not a class 'a'