Nuprl Definition : faster-sin
faster-sin(x) ==  eval N = 8 * ((((x/MachinPi4()))/8 1) ÷ 2) in rsin(x - N * MachinPi4())
Definitions occuring in Statement : 
MachinPi4: MachinPi4()
, 
rsin: rsin(x)
, 
rdiv: (x/y)
, 
int-rdiv: (a)/k1
, 
int-rmul: k1 * a
, 
rsub: x - y
, 
callbyvalue: callbyvalue, 
apply: f a
, 
divide: n ÷ m
, 
multiply: n * m
, 
natural_number: $n
Definitions occuring in definition : 
callbyvalue: callbyvalue, 
multiply: n * m
, 
divide: n ÷ m
, 
apply: f a
, 
int-rdiv: (a)/k1
, 
rdiv: (x/y)
, 
natural_number: $n
, 
rsin: rsin(x)
, 
rsub: x - y
, 
int-rmul: k1 * a
, 
MachinPi4: MachinPi4()
FDL editor aliases : 
faster-sin
Latex:
faster-sin(x)  ==    eval  N  =  8  *  ((((x/MachinPi4()))/8  1)  \mdiv{}  2)  in  rsin(x  -  N  *  MachinPi4())
Date html generated:
2019_10_31-AM-06_08_14
Last ObjectModification:
2019_01_29-PM-03_13_25
Theory : reals_2
Home
Index