Step * of Lemma rcos-nonneg-upto-half-pi

x:{x:ℝx ∈ [r0, π/2]} (r0 ≤ rcos(x))
BY
(Auto
   THEN 1
   THEN ((Unhide THEN Auto) THEN (Assert r0 < π/2 BY Auto))
   THEN BLemma `rleq-iff-all-rless`
   THEN Auto
   THEN (InstLemma `function-is-continuous` [⌜[r0, π/2]⌝;⌜λ2x.rcos(x)⌝]⋅
         THENA (Auto THEN RepUR ``iproper`` THEN Auto THEN RWO "-1" THEN Auto)
         )) }

1
1. : ℝ
2. x ∈ [r0, π/2]
3. r0 < π/2
4. {e:ℝr0 < e} 
5. rcos(x) continuous for x ∈ [r0, π/2]
⊢ r0 ≤ (rcos(x) e)


Latex:


Latex:
\mforall{}x:\{x:\mBbbR{}|  x  \mmember{}  [r0,  \mpi{}/2]\}  .  (r0  \mleq{}  rcos(x))


By


Latex:
(Auto
  THEN  D  1
  THEN  ((Unhide  THEN  Auto)  THEN  (Assert  r0  <  \mpi{}/2  BY  Auto))
  THEN  BLemma  `rleq-iff-all-rless`
  THEN  Auto
  THEN  (InstLemma  `function-is-continuous`  [\mkleeneopen{}[r0,  \mpi{}/2]\mkleeneclose{};\mkleeneopen{}\mlambda{}\msubtwo{}x.rcos(x)\mkleeneclose{}]\mcdot{}
              THENA  (Auto  THEN  RepUR  ``iproper``  0  THEN  Auto  THEN  RWO  "-1"  0  THEN  Auto)
              ))




Home Index