W3FI03

The W3FI03 routine transfers  default integer words to 16 bit IBM half-words.

USAGE:    CALL W3FI03(IN,IDEST,NUM,IER)

   Input argument list:
      IN       - STARTING ADDRESS FOR ARRAY OF DEFAULT INTEGERS
      NUM      - NUMBER OF NUMBERS IN 'IN' TO TRANSFER.

   Output argument list:      (INCLUDING WORK ARRAYS)
      IDEST    - STARTING ADDRESS FOR ARRAY OF 16 BIT IBM HALF-WORDS
      IER      - ERROR RETURN CODE AS FOLLOWS:
                   IER = 0 - TRANSFER SUCCESSFUL, ALL NUMBERS
                           - TRANSFERRED WITHOUT OVERFLOW
                   IER = 1 - THE TRANSFER OF ONE OR MORE NUMBERS
                           - RESULTED IN AN OVERFLOW

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