|
|
1.1 ! root 1: .th SIN III 3/15/72 ! 2: .sh NAME ! 3: sin \*- sine, cosine ! 4: .sh SYNOPSIS ! 5: .nf ! 6: .ft B ! 7: jsr r5,sin (cos) ! 8: .s3 ! 9: double sin(x) ! 10: double x; ! 11: .s3 ! 12: double cos(x) ! 13: double x; ! 14: .fi ! 15: .ft R ! 16: .sh DESCRIPTION ! 17: The ! 18: sine (cosine) of fr0 (resp. \fBx\fR), measured in radians, ! 19: is returned (in fr0). ! 20: .s3 ! 21: The magnitude of the argument should be checked ! 22: by the caller to make sure the result is meaningful. ! 23: .sh BUGS
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.