Step
*
1
1
1
of Lemma
rabs-cosine-rleq
1. x : ℝ
2. (sine(x)^2 + cosine(x)^2) = r1
⊢ cosine(x)^2 ≤ r1^2
BY
{ ((RWO "rnexp-int" 0 THENA Auto) THEN (Subst' 1^2 ~ 1 0 THENA Auto) THEN (nRAdd ⌜-(sine(x)^2)⌝ (-1)⋅ THENA Auto)) }
1
1. x : ℝ
2. cosine(x)^2 = (r1 + -(sine(x)^2))
⊢ cosine(x)^2 ≤ r1
Latex:
Latex:
1.  x  :  \mBbbR{}
2.  (sine(x)\^{}2  +  cosine(x)\^{}2)  =  r1
\mvdash{}  cosine(x)\^{}2  \mleq{}  r1\^{}2
By
Latex:
((RWO  "rnexp-int"  0  THENA  Auto)
  THEN  (Subst'  1\^{}2  \msim{}  1  0  THENA  Auto)
  THEN  (nRAdd  \mkleeneopen{}-(sine(x)\^{}2)\mkleeneclose{}  (-1)\mcdot{}  THENA  Auto))
Home
Index