libm_quadruple(3F)

Name

libm_quadruple - FORTRAN access to quadruple-precision functions (SPARC only)

Synopsis

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.

Description

These functions provide access to quadruple-precision libm functions. asind(x), sind(x), and so on involve degrees, rather than radians.

INTRINSICS

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.

sqrt(x) asin(x) acosd(x)* log(x) acos(x) asind(x)* log10(x) atan(x) acosd(x)* exp(x) atan2(x,y) atand(x)* x**y sinh(x) atan2d(x,y)* sin(x) cosh(x)* aint(x) cos(x) tanh(x)* anint(x) tan(x) sind(x)* nint(x)

* = nonstandard: it is an extension that this is intrinsic

NON-INTRINSIC FUNCTIONS

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.

q_copysign( x, y ) real*16 function q_fabs( x ) real*16 function q_fmod( x ) real*16 function q_infinity( ) real*16 function iq_finite( x ) integer function iq_fp_class( x ) integer function iq_ilogb( x ) integer function iq_isinf( x ) integer function iq_isnan( x ) integer function iq_isnormal( x ) integer function iq_issubnormal( x ) integer function iq_iszero( x ) integer function iq_signbit( x ) integer function q_max_normal() real*16 function q_max_subnormal() real*16 function q_min_normal() real*16 function q_min_subnormal() real*16 function q_nextafter( x, y ) real*16 function q_quiet_nan( n ) real*16 function q_remainder( x, y ) real*16 function q_scalbn( x, n ) real*16 function q_signaling_nan( n ) real*16 function

If you need to use any other quadruple-precision libm function, you can call a C function that calls the libm function.

Files

libm.a

See also

intro(3M)

Numerical Computation Guide

FORTRAN 77 Reference Manual