SBYTE

The SBYTE routine packs the byte into a target word or array.
          bits surrounding the byte in the target area are unchanged.

USAGE:    CALL SBYTE (IPACKD,IUNPKD,NOFF,NBITS)

   Input arguments:
      IPACKD    THE WORD OR ARRAY WHICH WILL CONTAIN THE
                PACKED BYTE.  BYTE MAY CROSS WORD BOUNDARIES.
      IUNPKD    THE WORD CONTAINING THE RIGHT-JUSTIFIED BYTE
                TO BE PACKED.
      NOFF      THE NUMBER OF BITS TO SKIP, LEFT TO RIGHT,
                IN 'IPACKD' IN ORDER TO LOCATE WHERE THE
                BYTE IS TO BE PACKED.
      NBITS     NUMBER OF BITS IN THE BYTE TO BE PACKED.
                MAXIMUM OF 64 BITS ON 64 BIT MACHINE, 32
                BITS ON 32 BIT MACHINE.

   Output arguments:
      IPACKD    WORD OR CONSECUTIVE WORDS CONTAINING THE
                REQUESTED BYTE.

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