[cc]mc | .hd sin$m "calculate sine" 04/27/83 longreal function sin$m (x) real x .sp Library: vswtmath (Subsystem mathematical library) .fs This function returns the sine of the angle whose measure (in radians) is given by the argument. The absolute value of the angle must be less than 26353588.0. The condition SWT_MATH_ERROR$ is signalled if there is an argument error. An on-unit can be established to deal with this error; the SWT Math Library contains a default handler named 'err$m' which the user may utilize. If an error is signalled, the default return value will be zero. .sp This function is intended to serve as a single precision function although it returns a double precision result. The function has been coded so that any value returned will not overflow or underflow a single precision floating point value. The double precision register overlaps the single precision register so it is possible to declare and use this function as simply a "real" function. .im The function is implemented as a minimax polynomial approximation. Note that for angles sufficiently small the value of the sine function is equal to the measure of the angle. Adapted from the algorithm given in the book .ul Software Manual for the Elementary Functions by William Waite and William Cody, Jr. (Prentice-Hall, 1980). .ca dint$p, Primos signl$ .sa asin$m (2), cos$m (2), dint$p (2), dsin$m (2), err$m (2), .br .ul SWT Math Library User's Guide [cc]mc