{ [Info,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,  member: t  T,  all: x:A. B[x],  so_lambda: x y.t[x; y],  so_apply: x[s1;s2],  subtype: S  T
Lemmas :  dep-eclass_subtype_rel,  es-E_wf,  event-ordering+_inc,  event-ordering+_wf

\mforall{}[Info,A,B:Type].    EClass(A)  \msubseteq{}r  EClass(B)  supposing  A  \msubseteq{}r  B


Date html generated: 2011_08_16-AM-11_39_40
Last ObjectModification: 2011_06_20-AM-00_30_53

Home Index