Step * of Lemma rsin-shift-pi

[x:ℝ]. (rsin(x + π-(rsin(x)))
BY
(Auto
   THEN (Assert (x + π((x + π/2) + π/2) BY
               (Unfold `pi` THEN (RWO "int-rmul-req" THENA Auto) THEN nRNorm THEN Auto))
   THEN RWW "-1 rsin-shift-half-pi rcos-shift-half-pi" 0
   THEN Auto) }


Latex:


Latex:
\mforall{}[x:\mBbbR{}].  (rsin(x  +  \mpi{})  =  -(rsin(x)))


By


Latex:
(Auto
  THEN  (Assert  (x  +  \mpi{})  =  ((x  +  \mpi{}/2)  +  \mpi{}/2)  BY
                          (Unfold  `pi`  0  THEN  (RWO  "int-rmul-req"  0  THENA  Auto)  THEN  nRNorm  0  THEN  Auto))
  THEN  RWW  "-1  rsin-shift-half-pi  rcos-shift-half-pi"  0
  THEN  Auto)




Home Index