libm_quadruple - FORTRAN access to quadruple precision functions (SPARC only)
Example for non-intrinsics:
REAL*16 c, q_acosh, q_hypot, q_infinity, s, x, y, z z = q_acosh( x ) i = iq_finite( x ) z = q_hypot( x, y ) z = q_infinity() CALL q_sincos( x, s, c )
Quad functions used are in a REAL*16 statement.
These functions provide access to quadruple precision libm and libsunmath functions. asind(x), sind(x), and so on involve degrees, rather than radians.
The following FORTRAN intrinsic functions return quadruple precision values if their arguments are quadruple precision. You need not put them in a type statement. If the function needed is available as an intrinsic function, it is simpler to use an intrinsic than a non-intrinsic function.
The variables c, l, p, s, u, x, and y are REAL*16.
|
* = nonstandard: it is an extension that this is intrinsic
Note: The functions listed below are deprecated and may be removed in a future release. Fortran programs may invoke the corresponding C functions instead using the C-Fortran interface features described in the Fortran Programming Guide.
These functions do not correspond to standard FORTRAN generic intrinsic functions, so their data types are determined by the usual FORTRAN data typing rules.
If you use one of these quad functions, put it into a REAL*16 statement, or type it with IMPLICIT.
For meanings of routines and arguments, do a man command on the routine name without the q_; the output is a C man page for the double precision function, but the meanings are the same.
Variables c, l, p, s, u, x, and y are REAL*16.
|
If you need to use any other quadruple precision libm function, you can call a C function that calls the libm function.
Numerical Computation Guide
Fortran Library Reference Manual
Fortran Programming Guide