Trigonometric functions: Difference between revisions

m
→‎{{header|REXX}}: optimized the Acos function.
m (→‎{{header|REXX}}: elided a line of dead code.)
m (→‎{{header|REXX}}: optimized the Acos function.)
Line 3,576:
 
$fuzz: return min(arg(1), max(1, digits() - arg(2) ) )
Acos: procedure; parse arg x; if x<-1|x>1 then call AcosErr; return .5*pi()*.5-Asin(x)
AcosD: return r2d(Acos(arg(1)))
AsinD: return r2d(Asin(arg(1)))