|
|
1.1 ! root 1: .th SQRT III 3/15/72 ! 2: .sh NAME ! 3: sqrt \*- square root function ! 4: .sh SYNOPSIS ! 5: .br ! 6: .ft B ! 7: jsr r5,sqrt ! 8: .s3 ! 9: double sqrt(x) ! 10: .br ! 11: double x; ! 12: .ft R ! 13: .sh DESCRIPTION ! 14: The ! 15: square root of fr0 (resp. \fBx\fR) is returned (in fr0). ! 16: .sh DIAGNOSTICS ! 17: The c-bit is ! 18: set on negative arguments and 0 is returned. ! 19: There is no error return for C programs. ! 20: .sh BUGS ! 21: No error return from C.
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.