Step * 1 of Lemma half-pi_wf

.....assertion..... 
π/2(slower) n.eval in (rcos-seq(exp-ratio(1;3164556962025316455;0;m;1000000000) 1) m) ÷ 4) ∈ (ℕ+ ⟶ ℤ)
BY
(((FunExt THENA Auto) THEN RepUR ``half-pi`` 0) THEN RepeatFor ((CallByValueReduce THENA Auto)) THEN Auto) }


Latex:


Latex:
.....assertion..... 
\mpi{}/2(slower)
=  (\mlambda{}n.eval  m  =  4  *  n  in
            (rcos-seq(exp-ratio(1;3164556962025316455;0;m;1000000000)  +  1)  m)  \mdiv{}  4)


By


Latex:
(((FunExt  THENA  Auto)  THEN  RepUR  ``half-pi``  0)
  THEN  RepeatFor  2  ((CallByValueReduce  0  THENA  Auto))
  THEN  Auto)




Home Index