Q9IE32

The Q9IE32 routine converts IBM370 floating point numbers to ieee
           floating point numbers.

USAGE:    CALL Q9IE32(A, B, N, ISTAT)

   Input argument list:
      A        - REAL*4 ARRAY OF IBM370 32 BIT FLOATING POINT NUMBERS
      N        - NUMBER OF POINTS TO CONVERT
 
    Output argument list:
      B        - REAL*4 ARRAY OF IEEE 32 BIT FLOATING POINT NUMBERS
      ISTAT    - NUMBER OF POINT GREATER THAN 10E+38, NUMBERS ARE SET TO
                 IEEE INFINITY, ONE IS ADDED TO ISTAT. NUMBERS LESS THAN
                 E-38 ARE SET TO ZERO , ONE IS  NOT ADDED TO ISTAT.
 
REMARKS:
        See ieee task 754 standard floating point arithmetic
        for more information about ieee floating point.

 
W3lib.tar Library contains Fortran 90 decoder/encoder routines for GRIB edition 1. (Fortran90)
Date posted: 2/22/2007