OpWithInst.hascasl revision ac9e33c3c35b2663e5cb76483228910f142d9576
type s
op a : s
var a, b : Type
op __=[s]__ : forall a . a * a -> Unit
. (op __=[s]__ : forall a . a * a -> Unit)(a, a)
. a =[s] a
. a =e=[s:Type] a
op f[a] : a -> Unit
op g[b,a] : a * b -> Unit
op h[b,a] : a -> b
op j[a,b] : a -> b
class Funct : Type -> Type
var f, F : Funct
%% order of var declarations counts
op k[a, f] : f a
op k[b, a, f] : b -> f a
op k[a, b, f] : b -> f a
op l[F, a] : F a
%% or explicit forall order
op k[G, b, a] : forall G: Funct; b, a: Type . b -> G a
. (op __=[s]__ : forall a . a * a -> Unit)[s](a, a)
. (op __=[s]__ : forall a . a * a -> Unit)[s,s](a, a)
. (__=[s][s, s : Type]__ : s * s -> Unit)(a, a)
. (__=[s]__ : s * s -> Unit)[s](a, a)
. (__=[s][s]__ : s * s -> Unit)[s](a, a)
. (__=[s]__ : s * s -> Unit)(a, a)
. (__=[s][s : Type]__ : s * s -> Unit)(a, a)
op if__then__else[a][a :Type]__ : a * a * a -> a
op if__then__else[s][a :Type]__ : a * a * a -> a
op if__then__else[a :Type]__ : a * a * a -> a