[cc]mc | .hd dcot$m "calculate double precision cotangent" 04/27/83 longreal function dcot$m (x) longreal x .sp Library: vswtmath (Subsystem mathematical library) .fs This function calculates the cotangent of the angle whose measure is given (in radians) as the argument to the function. The argument must have an absolute value greater than 7.064835966E-9865 and less than 13176794.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 function return is zero. .im The function is calculated based on a minimax polynomial approximation over a reduced argument. It is 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 cot$m (2), dint$p (2), dtan$m (2), err$m (2), .br .ul SWT Math Library User's Guide [cc]mc