Nuprl Lemma : fset-ac-le-implies

[T:Type]. ∀[eq:EqDecider(T)]. ∀[ac1,ac2:fset(fset(T))].
  (fset-ac-le(eq;ac1;ac2)  {∀a:fset(T). (a ∈ ac1  ({y ∈ ac2 deq-f-subset(eq) a} {} ∈ fset(fset(T)))))})


Proof




Definitions occuring in Statement :  fset-ac-le: fset-ac-le(eq;ac1;ac2) deq-fset: deq-fset(eq) deq-f-subset: deq-f-subset(eq) empty-fset: {} fset-filter: {x ∈ P[x]} fset-member: a ∈ s fset: fset(T) deq: EqDecider(T) uall: [x:A]. B[x] guard: {T} all: x:A. B[x] not: ¬A implies:  Q apply: a universe: Type equal: t ∈ T
Definitions unfolded in proof :  guard: {T} uall: [x:A]. B[x] member: t ∈ T implies:  Q all: x:A. B[x] not: ¬A false: False prop: so_lambda: λ2x.t[x] subtype_rel: A ⊆B so_apply: x[s] iff: ⇐⇒ Q rev_implies:  Q and: P ∧ Q fset-ac-le: fset-ac-le(eq;ac1;ac2) uiff: uiff(P;Q) uimplies: supposing a
Lemmas referenced :  equal-wf-T-base fset_wf fset-filter_wf deq-f-subset_wf bool_wf all_wf iff_wf f-subset_wf assert_wf fset-member_wf deq-fset_wf fset-ac-le_wf deq_wf fset-all-iff bnot_wf fset-null_wf assert_of_bnot assert-fset-null
Rules used in proof :  sqequalSubstitution sqequalRule sqequalReflexivity sqequalTransitivity computationStep isect_memberFormation introduction cut lambdaFormation thin hypothesis sqequalHypSubstitution independent_functionElimination voidElimination extract_by_obid isectElimination cumulativity hypothesisEquality lambdaEquality applyEquality setElimination rename setEquality functionEquality functionExtensionality baseClosed dependent_functionElimination because_Cache isect_memberEquality universeEquality productElimination independent_isectElimination equalityTransitivity equalitySymmetry promote_hyp

Latex:
\mforall{}[T:Type].  \mforall{}[eq:EqDecider(T)].  \mforall{}[ac1,ac2:fset(fset(T))].
    (fset-ac-le(eq;ac1;ac2)  {}\mRightarrow{}  \{\mforall{}a:fset(T).  (a  \mmember{}  ac1  {}\mRightarrow{}  (\mneg{}(\{y  \mmember{}  ac2  |  deq-f-subset(eq)  y  a\}  =  \{\})))\})



Date html generated: 2017_04_17-AM-09_20_36
Last ObjectModification: 2017_02_27-PM-05_23_24

Theory : finite!sets


Home Index