FLOATING(3F)							  FLOATING(3F)

NAME    [Toc]    [Back]

     - return scalar values associated with the	argument derived from the
     model of floating point data.

SYNOPSIS    [Toc]    [Back]

     exponent (x)
     fraction (x)
     nearest (x,s)
     rrspacing (x)
     scale (x,i)
     set_exponent (x,i)
     spacing (x)

DESCRIPTION    [Toc]    [Back]

     These Fortran 90 inquiry functions	return scalar values which describe
     the value of x as components of the model of floating point data. The
     model for real x is defined by section 13.71.1 of the Fortran standard.
     In	each case the argument x is of type real and with the exception	of
     exponent the type and kind	type parameter of each result is the same as
     x.

     The exponent function returns an integer of default type equal to the
     base two exponent (e) of x	if the argument	is non-zero. If	zero, the
     result is zero.

     The fraction function returns the fractional part ( X * 2 ** (-e))	of x
     if	the argument is	non-zero. If zero, the result is zero.

     The nearest function returns the nearest representable number to x	in the
     direction of infinity and with the	same sign as s.	 s is also of type
     real.

     The rrspacing function returns the	reciprocal of the relative spacing of
     numbers near x.

     The scale function	returns	x * ( 2	** i )

     The set_exponent function returns the number whose	fractional part	is the
     fractional	part of	x and whose exponent part is i , if this result	is
     within range. That	is the result is x * (2	** ( i - e )).	If x is	zero,
     the result	is zero.

     The spacing function returns the absolute spacing of numbers near x.












									Page 1






FLOATING(3F)							  FLOATING(3F)


									PPPPaaaaggggeeee 2222