{ 
[T,A,B:Type].  EClass(A) 
r EClass(B) supposing A 
r B }
{ Proof }
Definitions occuring in Statement : 
eclass: EClass(A[eo; e]), 
subtype_rel: A 
r B, 
uimplies: b supposing a, 
uall:
[x:A]. B[x], 
universe: Type
Definitions : 
uall:
[x:A]. B[x], 
uimplies: b supposing a, 
eclass: EClass(A[eo; e]), 
member: t 
 T, 
all:
x:A. B[x], 
so_lambda: 
x.t[x], 
so_apply: x[s]
Lemmas : 
subtype_rel_dep_function, 
subtype_rel_self, 
subtype_rel_function, 
top_wf, 
subtype_rel_sum, 
event-ordering+_wf
\mforall{}[T,A,B:Type].    EClass(A)  \msubseteq{}r  EClass(B)  supposing  A  \msubseteq{}r  B
Date html generated:
2011_08_16-AM-11_28_30
Last ObjectModification:
2011_06_20-AM-00_28_18
Home
Index