GTBITS

The GTBITS routine computes number of bits and round field.

USAGE:    CALL GTBITS(IBM,IDS,LEN,MG,G,GMIN,GMAX,NBIT)

   Input argument list:
      IBM      - INTEGER BITMAP FLAG (=0 FOR NO BITMAP)
      IDS      - INTEGER DECIMAL SCALING
                 (E.G. IDS=3 TO ROUND FIELD TO NEAREST MILLI-VALUE)
      LEN      - INTEGER LENGTH OF THE FIELD AND BITMAP
      MG       - INTEGER (LEN) BITMAP IF IBM=1 (0 TO SKIP, 1 TO KEEP)
      G        - REAL (LEN) FIELD
 
   Output argument list:
      GROUND   - REAL (LEN) FIELD ROUNDED TO DECIMAL SCALING
                 (SET TO ZERO WHERE BITMAP IS 0 IF IBM=1)
      GMIN     - REAL MINIMUM VALID ROUNDED FIELD VALUE
      GMAX     - REAL MAXIMUM VALID ROUNDED FIELD VALUE
      NBIT     - INTEGER NUMBER OF BITS TO PACK

 


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

   Date posted: 2/22/2007