DIGITS

 DIGITS (number)

 Class:  Inquiry function - Generic

 Returns the number of significant binary digits for numbers of
 the same type and kind type parameter as the argument.  The
 argument can be an integer or real number (scalar or array
 valued).

 The result is type default integer.

 The models for integer and real numbers are described in the
 HP Fortran for OpenVMS Language Reference Manual.

 Example:

 If X is of type REAL*4, DIGITS (X) has the value 24.