Nuprl Lemma : fset-constrained-ac-glb_wf

[T:Type]. ∀[eq:EqDecider(T)]. ∀[P:fset(T) ⟶ 𝔹]. ∀[ac1,ac2:fset(fset(T))].
  (glb(P;ac1;ac2) ∈ {ac:fset(fset(T))| (↑fset-antichain(eq;ac)) ∧ fset-all(ac;a.P a)} )


Proof




Definitions occuring in Statement :  fset-constrained-ac-glb: glb(P;ac1;ac2) fset-antichain: fset-antichain(eq;ac) fset-all: fset-all(s;x.P[x]) fset: fset(T) deq: EqDecider(T) assert: b bool: 𝔹 uall: [x:A]. B[x] and: P ∧ Q member: t ∈ T set: {x:A| B[x]}  apply: a function: x:A ⟶ B[x] universe: Type
Definitions unfolded in proof :  uall: [x:A]. B[x] member: t ∈ T fset-constrained-ac-glb: glb(P;ac1;ac2) so_lambda: λ2y.t[x; y] so_apply: x[s1;s2] so_lambda: λ2x.t[x] so_apply: x[s] and: P ∧ Q cand: c∧ B all: x:A. B[x] prop: uiff: uiff(P;Q) uimplies: supposing a implies:  Q squash: T sq_stable: SqStable(P) exists: x:A. B[x]
Lemmas referenced :  member-fset-constrained-image-iff member-f-union decidable__assert sq_stable_from_decidable member-fset-minimals fset-member_wf assert_witness fset-all-iff fset-all_wf fset-antichain_wf assert_wf and_wf fset-minimals-antichain fset-union_wf fset-constrained-image_wf deq-fset_wf f-union_wf f-proper-subset-dec_wf fset-minimals_wf deq_wf bool_wf fset_wf
Rules used in proof :  sqequalSubstitution sqequalTransitivity computationStep sqequalReflexivity isect_memberFormation introduction cut sqequalRule sqequalHypSubstitution hypothesis axiomEquality equalityTransitivity equalitySymmetry lemma_by_obid isectElimination thin hypothesisEquality isect_memberEquality because_Cache functionEquality universeEquality dependent_set_memberEquality lambdaEquality dependent_functionElimination independent_pairFormation applyEquality productElimination independent_isectElimination independent_functionElimination cumulativity imageElimination imageMemberEquality baseClosed

Latex:
\mforall{}[T:Type].  \mforall{}[eq:EqDecider(T)].  \mforall{}[P:fset(T)  {}\mrightarrow{}  \mBbbB{}].  \mforall{}[ac1,ac2:fset(fset(T))].
    (glb(P;ac1;ac2)  \mmember{}  \{ac:fset(fset(T))|  (\muparrow{}fset-antichain(eq;ac))  \mwedge{}  fset-all(ac;a.P  a)\}  )



Date html generated: 2016_05_14-PM-03_50_05
Last ObjectModification: 2016_01_14-PM-10_39_21

Theory : finite!sets


Home Index