ObjectScript Reference
$ZCOS


$ZCOS(n)
n  An angle in radians ranging from Pi to 2 Pi (inclusive). Other supplied numeric values are converted to a value within this range. 
READ "Input a number: ",num IF $ZABS(num)>(2*$ZPI) { WRITE !,"number is a larger than 2 pi" } ELSE { WRITE !,"the cosine is: ",$ZCOS(num) } QUIT
WRITE !,"the cosine is: ",$ZCOS(0.0) WRITE !,"the cosine is: ",$ZCOS($DOUBLE(0.0)) WRITE !,"the cosine is: ",$ZCOS(1.0) WRITE !,"the cosine is: ",$ZCOS($DOUBLE(1.0)) WRITE !,"the cosine is: ",$ZCOS($ZPI) WRITE !,"the cosine is: ",$ZCOS($DOUBLE($ZPI))