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 |