Nuprl Lemma : seteqweaken1_ext

∀s1,s2:coSet{i:l}.  ((s1 = s2 ∈ coSet{i:l}) ⇒ seteq(s1;s2))


Proof




Definitions occuring in Statement :  seteq: seteq(s1;s2),  coSet: coSet{i:l},  all: ∀x:A. B[x],  implies: P ⇒ Q,  equal: s = t ∈ T
Definitions unfolded in proof :  uimplies: b supposing a,  so_apply: x[s],  so_lambda: λ2x.t[x],  so_apply: x[s1;s2;s3;s4],  so_lambda: so_lambda(x,y,z,w.t[x; y; z; w]),  any: any x,  bool_cases_sqequal,  implies-sg-win2,  iff_weakening_equal,  coW-equiv_weakening,  coW-equiv-equiv_rel,  seteq-equiv,  seteqweaken1,  top: Top,  uall: ∀[x:A]. B[x],  ifthenelse: if b then t else f fi ,  bfalse: ff,  it: ⋅,  btrue: tt,  lt_int: i <z j,  subtract: n - m,  member: t ∈ T
Lemmas referenced :  strict4-decide,  lifting-strict-less,  less-as-ifthenelse,  seteqweaken1,  bool_cases_sqequal,  implies-sg-win2,  iff_weakening_equal,  coW-equiv_weakening,  coW-equiv-equiv_rel,  seteq-equiv
Rules used in proof :  independent_isectElimination,  baseClosed,  voidEquality,  voidElimination,  isect_memberEquality,  isectElimination,  equalitySymmetry,  equalityTransitivity,  sqequalHypSubstitution,  thin,  sqequalRule,  hypothesis,  extract_by_obid,  instantiate,  cut,  sqequalReflexivity,  computationStep,  sqequalTransitivity,  sqequalSubstitution,  introduction

Latex:
\mforall{}s1,s2:coSet\{i:l\}.    ((s1  =  s2)  {}\mRightarrow{}  seteq(s1;s2))



Date html generated: 2018_07_29-AM-09_50_54
Last ObjectModification: 2018_07_11-AM-11_59_33

Theory : constructive!set!theory


Home Index