Nuprl Lemma : closures-meet

[P,Q:ℝ ⟶ ℙ].
  ((∃a,b:ℝ((P a) ∧ (Q b) ∧ (a ≤ b)))
   (∃c:ℝ
       (((r0 ≤ c) ∧ (c < r1))
       ∧ (∀a,b:ℝ.
            (((P a) ∧ (Q b) ∧ (a ≤ b))
             (∃a',b':ℝ((P a') ∧ (Q b') ∧ (a ≤ a') ∧ (a' ≤ b') ∧ (b' ≤ b) ∧ ((b' a') ≤ ((b a) c))))))))
   (∃y:ℝ(y ∈ closure(P) ∧ y ∈ closure(Q))))


Proof




Definitions occuring in Statement :  member-closure: y ∈ closure(A) rleq: x ≤ y rless: x < y rsub: y rmul: b int-to-real: r(n) real: uall: [x:A]. B[x] prop: all: x:A. B[x] exists: x:A. B[x] implies:  Q and: P ∧ Q apply: a function: x:A ⟶ B[x] natural_number: $n
Definitions unfolded in proof :  uall: [x:A]. B[x] implies:  Q exists: x:A. B[x] and: P ∧ Q member: t ∈ T prop: all: x:A. B[x] subtype_rel: A ⊆B cand: c∧ B spreadn: spread3 pi1: fst(t) nat: so_apply: x[s] bool: 𝔹 unit: Unit it: btrue: tt uiff: uiff(P;Q) uimplies: supposing a rless: x < y sq_exists: x:A [B[x]] false: False nat_plus: + ge: i ≥  not: ¬A satisfiable_int_formula: satisfiable_int_formula(fmla) bfalse: ff or: P ∨ Q sq_type: SQType(T) guard: {T} bnot: ¬bb ifthenelse: if then else fi  assert: b nequal: a ≠ b ∈  rev_implies:  Q iff: ⇐⇒ Q decidable: Dec(P) pi2: snd(t) rbetween: x≤y≤z rleq: x ≤ y rnonneg: rnonneg(x) le: A ≤ B less_than': less_than'(a;b) rev_uimplies: rev_uimplies(P;Q) req_int_terms: t1 ≡ t2 rge: x ≥ y so_lambda: λ2x.t[x] rmul: b rsub: y radd: b accelerate: accelerate(k;f) rnexp: x^k1 member-closure: y ∈ closure(A)

Latex:
\mforall{}[P,Q:\mBbbR{}  {}\mrightarrow{}  \mBbbP{}].
    ((\mexists{}a,b:\mBbbR{}.  ((P  a)  \mwedge{}  (Q  b)  \mwedge{}  (a  \mleq{}  b)))
    {}\mRightarrow{}  (\mexists{}c:\mBbbR{}
              (((r0  \mleq{}  c)  \mwedge{}  (c  <  r1))
              \mwedge{}  (\mforall{}a,b:\mBbbR{}.
                        (((P  a)  \mwedge{}  (Q  b)  \mwedge{}  (a  \mleq{}  b))
                        {}\mRightarrow{}  (\mexists{}a',b':\mBbbR{}
                                  ((P  a')
                                  \mwedge{}  (Q  b')
                                  \mwedge{}  (a  \mleq{}  a')
                                  \mwedge{}  (a'  \mleq{}  b')
                                  \mwedge{}  (b'  \mleq{}  b)
                                  \mwedge{}  ((b'  -  a')  \mleq{}  ((b  -  a)  *  c))))))))
    {}\mRightarrow{}  (\mexists{}y:\mBbbR{}.  (y  \mmember{}  closure(P)  \mwedge{}  y  \mmember{}  closure(Q))))



Date html generated: 2020_05_20-AM-11_29_04
Last ObjectModification: 2019_12_14-PM-04_50_56

Theory : reals


Home Index