home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Collection of Education
/
collectionofeducationcarat1997.iso
/
SCIENCE
/
MRCRY209.ZIP
/
ASINH.C
< prev
next >
Wrap
C/C++ Source or Header
|
1992-11-04
|
482b
|
28 lines
/* Asinh.c
inverse hyperbolic sine
Source to ASINH.BIN. Rebuild with Borland C++:
bcc -c -mt! asinh
tlink x02 asinh /t/x/c,asinh.bin,,fp ld
If you are using a coprocessor, you can also build with:
bcc -c -mt! asinh
tlink x01 asinh f87 /t/x/c,asinh.bin,,fp ld
With older versions of Borland C++ (Turbo C), compile with:
tcc -c -mt asinh
*/
#include "mathl.h"
void pascal xmain(double far *x)
{
x[0] = logl(x[1] + sqrtl(x[1]*x[1] + 1));
}