{ [M:Type  Type]. [r:pRunType(P.M[P])].
    (run-lt-transitive-witness()  Trans(runEvents(r);x,y.x run-lt(r) y)) }

{ Proof }



Definitions occuring in Statement :  run-lt-transitive-witness: run-lt-transitive-witness() run-lt: run-lt(r) runEvents: runEvents(r) pRunType: pRunType(T.M[T]) trans: Trans(T;x,y.E[x; y]) uall: [x:A]. B[x] infix_ap: x f y so_apply: x[s] member: t  T function: x:A  B[x] universe: Type
Definitions :  iff_weakening_uiff add: n + m sq_type: SQType(T) genrec: genrec sqequal: s ~ t limited-type: LimitedType implies: P  Q so_apply: x[s] lambda: x.A[x] eclass: EClass(A[eo; e]) fpf: a:A fp-B[a] strong-subtype: strong-subtype(A;B) le: A  B ge: i  j  not: A less_than: a < b uimplies: b supposing a product: x:A  B[x] and: P  Q uiff: uiff(P;Q) subtype_rel: A r B all: x:A. B[x] prop: so_lambda: x y.t[x; y] universe: Type run-lt-transitive-witness: run-lt-transitive-witness() function: x:A  B[x] axiom: Ax uall: [x:A]. B[x] isect: x:A. B[x] pRunType: pRunType(T.M[T]) so_lambda: x.t[x] equal: s = t CollapseTHEN: Error :CollapseTHEN,  Try: Error :Try,  Auto: Error :Auto,  run-lt-transitive apply: f a run-lt: run-lt(r) infix_ap: x f y runEvents: runEvents(r) trans: Trans(T;x,y.E[x; y]) member: t  T AssertBY: Error :AssertBY
Lemmas :  member_wf run-lt-transitive uall_wf pRunType_wf run-lt_wf runEvents_wf trans_wf subtype_base_sq

\mforall{}[M:Type  {}\mrightarrow{}  Type].  \mforall{}[r:pRunType(P.M[P])].
    (run-lt-transitive-witness()  \mmember{}  Trans(runEvents(r);x,y.x  run-lt(r)  y))


Date html generated: 2011_08_17-PM-03_39_05
Last ObjectModification: 2011_06_18-AM-11_20_08

Home Index