{ [V:Type]. [A:Id List]. [W:{a:Id| (a  A)}  List List]. [a:{a:Id| (a  A)} \000C].
    ts-stable-rel(consensus-ts4(V;A;W);x,y.Inning(x;a)  Inning(y;a)) }

{ Proof }



Definitions occuring in Statement :  consensus-ts4: consensus-ts4(V;A;W) cs-inning: Inning(s;a) Id: Id uall: [x:A]. B[x] le: A  B set: {x:A| B[x]}  list: type List universe: Type l_member: (x  l) ts-stable-rel: ts-stable-rel(ts;x,y.R[x; y])
Definitions :  intensional-universe: IType fpf: a:A fp-B[a] int: spread: spread def pi1: fst(t) cs-inning: Inning(s;a) fpf-empty: consensus-state4: ConsensusState pair: <a, b> strong-subtype: strong-subtype(A;B) exists: x:A. B[x] ge: i  j  uimplies: b supposing a product: x:A  B[x] and: P  Q uiff: uiff(P;Q) subtype_rel: A r B so_lambda: x y.t[x; y] less_than: a < b ts-rel: ts-rel(ts) rel_star: R^* apply: f a infix_ap: x f y consensus-ts4: consensus-ts4(V;A;W) ts-type: ts-type(ts) lambda: x.A[x] void: Void false: False not: A le: A  B implies: P  Q ts-stable-rel: ts-stable-rel(ts;x,y.R[x; y]) prop: isect: x:A. B[x] all: x:A. B[x] function: x:A  B[x] uall: [x:A]. B[x] set: {x:A| B[x]}  l_member: (x  l) Id: Id list: type List universe: Type member: t  T equal: s = t Auto: Error :Auto,  CollapseTHEN: Error :CollapseTHEN,  tactic: Error :tactic,  consensus-rel: CR[x,y] rel_implies: R1 =R2 trans: Trans(T;x,y.E[x; y]) refl: Refl(T;x,y.E[x; y]) IdLnk: IdLnk Knd: Knd MaName: MaName l_disjoint: l_disjoint(T;l1;l2) consensus-state3: consensus-state3(T) decidable: Dec(P) natural_number: $n or: P  Q union: left + right cs-estimate: Estimate(s;a) add: n + m guard: {T} atom: Atom atom: Atom$n sq_type: SQType(T)
Lemmas :  subtype_base_sq atom2_subtype_base decidable__equal_Id ts-transitive-stable refl_wf trans_wf not_wf false_wf rel_implies_wf consensus-rel_wf ts-type_wf consensus-ts4_wf ts-rel_wf le_wf rel_star_wf ts-stable-rel_wf Id_wf l_member_wf consensus-state4_wf member_wf cs-inning_wf intensional-universe_wf subtype_rel_wf

\mforall{}[V:Type].  \mforall{}[A:Id  List].  \mforall{}[W:\{a:Id|  (a  \mmember{}  A)\}    List  List].  \mforall{}[a:\{a:Id|  (a  \mmember{}  A)\}  ].
    ts-stable-rel(consensus-ts4(V;A;W);x,y.Inning(x;a)  \mleq{}  Inning(y;a))


Date html generated: 2011_08_16-AM-09_58_11
Last ObjectModification: 2011_06_18-AM-08_57_04

Home Index