Step * 1 of Lemma rcos-reduce2


1. : ℝ
2. : ℝ
3. v1 : ℝ
4. ((v1 v1) v) (v1^2 v^2)
5. rcos((x)/2 (x)/2) (v1^2 v^2)
⊢ rcos(x) rcos((x)/2 (x)/2)
BY
((BLemma `rcos_functionality` THEN Auto) THEN RWO "int-rdiv-req" THEN Auto THEN nRMul ⌜r(2)⌝ 0⋅ THEN Auto) }


Latex:


Latex:

1.  x  :  \mBbbR{}
2.  v  :  \mBbbR{}
3.  v1  :  \mBbbR{}
4.  ((v1  *  v1)  -  v  *  v)  =  (v1\^{}2  -  v\^{}2)
5.  rcos((x)/2  +  (x)/2)  =  (v1\^{}2  -  v\^{}2)
\mvdash{}  rcos(x)  =  rcos((x)/2  +  (x)/2)


By


Latex:
((BLemma  `rcos\_functionality`  THEN  Auto)
  THEN  RWO  "int-rdiv-req"  0
  THEN  Auto
  THEN  nRMul  \mkleeneopen{}r(2)\mkleeneclose{}  0\mcdot{}
  THEN  Auto)




Home Index