W3AI19

The W3AI19 routine fills a record block with logical records or
           lines of information.

USAGE: CALL W3AI19 (LINE, L, NBLK, N, NEXT)

   Input argument list:
      LINE       - ARRAY ADDRESS OF LOGICAL RECORD TO BE BLOCKED
      L          - NUMBER OF CHARACTERS IN LINE TO BE BLOCKED
      N          - MAXIMUM CHARACTER SIZE OF NBLK
      NEXT       - FLAG, INITIALIZED TO 0

   Output argument list:
      NBLK       - BLOCK FILLED WITH LOGICAL RECORDS
      NEXT       - CHARACTER COUNT, ERROR INDICATOR

   Exit states:
      NEXT = -1  LINE WILL NOT FIT INTO REMAINDER OF BLOCK;
                 OTHERWISE, NEXT IS SET TO (NEXT + L)
      NEXT = -2  N IS ZERO OR LESS
      NEXT = -3  L IS ZERO OR LESS

 


  
W3lib.tar
  
Library contains Fortran 90 decoder/encoder
   routines for GRIB edition 1. (Fortran90) 

   Date posted: 2/22/2007