{ 
[T:Type]. [A,B:es:EO+(T) 
e:E Type].
EClass(A[es;e]) 
r EClass(B[es;e])
supposing es:EO+(T). e:E. (A[es;e] r B[es;e]) }
{ Proof }
Definitions occuring in Statement :
eclass: EClass(A[eo; e]),
event-ordering+: EO+(Info),
es-E: E,
subtype_rel: A r B,
uimplies: b supposing a,
uall: [x:A]. B[x],
so_apply: x[s1;s2],
all: x:A. B[x],
function: x:A B[x],
universe: Type
Definitions :
uall: [x:A]. B[x],
uimplies: b supposing a,
all: x:A. B[x],
so_apply: x[s1;s2],
eclass: EClass(A[eo; e]),
member: t 
T,
so_lambda: 
x.t[x],
so_apply: x[s],
subtype: S T,
guard: {T}
Lemmas :
subtype_rel_dep_function,
top_wf,
subtype_rel_self,
subtype_rel_sum,
es-E_wf,
event-ordering+_wf,
event-ordering+_inc
\mforall{}[T:Type]. \mforall{}[A,B:es:EO+(T) {}\mrightarrow{} e:E {}\mrightarrow{} Type].
EClass(A[es;e]) \msubseteq{}r EClass(B[es;e]) supposing \mforall{}es:EO+(T). \mforall{}e:E. (A[es;e] \msubseteq{}r B[es;e])
Date html generated:
2011_08_16-AM-11_28_20
Last ObjectModification:
2011_06_20-AM-00_28_05
Home
Index