{ [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