|
|
1.1 ! root 1: .th ATAN III 4/30/73 ! 2: .sh NAME ! 3: atan \*- arc tangent function ! 4: .sh SYNOPSIS ! 5: .ft B ! 6: jsr r5,atan\fR[\fB2\fR]\fB ! 7: .s3 ! 8: .br ! 9: double atan(x) ! 10: .br ! 11: double x; ! 12: .br ! 13: .s3 ! 14: double atan2(x, y) ! 15: .br ! 16: double x, y; ! 17: .ft R ! 18: .sh DESCRIPTION ! 19: The ! 20: \fIatan\fR entry returns the arc tangent ! 21: of fr0 in fr0; ! 22: from C, the arc tangent of \fIx\fR is returned. ! 23: The range is \*-\*p/2 to \*p/2. ! 24: The \fIatan2\fR entry returns the arc tangent ! 25: of fr0/fr1 in fr0; ! 26: from C, the arc tangent of ! 27: \fIx/y\fR is returned. ! 28: The range is \*-\*p to \(*p. ! 29: .sh DIAGNOSTIC ! 30: There is no error return. ! 31: .sh BUGS
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.