shiftr(3I)

NAME
     SHIFTR - Performs a right shift with zero fill

SYNOPSIS
     SHIFTR ([I=]i,[J=]j)

STANDARDS
     CF90 and MIPSpro 7 Fortran 90 compiler extension to Fortran 95

DESCRIPTION
     The SHIFTR intrinsic function performs a right shift with zero fill of
     the i by j bits.  It accepts the following arguments:

     i    The value to be shifted.  i can be of type Boolean, integer,
          real, or Cray pointer.

     j    The number of bits to shift the value.  Must be of type integer
          or Boolean.  j must be within the range 0 <= j <=size, where size
          is the size, in bits, of i.  That is, if i is a 64-bit object, j
          must be within the range 0 <= j <= 64.

     An object is 8 bits, 16 bits, 32 bits, or 64 bits.

     SHIFTR is an elemental function.  The name of this intrinsic cannot be
     passed as an argument.

NOTES
     This is an outmoded routine.  Refer to the MIPSpro Fortran Language
     Reference Manual, Volume 2, for information about outmoded features
     and their preferred standard alternatives.

RETURN VALUES
     SHIFTR returns a value of type integer on IRIX systems.

EXAMPLES
     The following section of Fortran code shows the SHIFTR function used
     in the case where i is of type integer.  The bit pattern of i and the
     bit pattern of the result are also given.  For simplicity, a 16-bit
     object is used.

          INTEGER I1, I2, I3
          ...
          I2 = 5
          I3 = SHIFTR(I1,I2)

           ---------------------------------------------------------------
          | 1 | 1 | 1 | 1 | 1 | 1 | 1 | 1 | 0 | 0 | 0 | 0 | 0 | 0 | 0 | 0 |
           ---------------------------------------------------------------
                                       I1 (i)

           ---------------------------------------------------------------
          | 0 | 0 | 0 | 0 | 0 | 1 | 1 | 1 | 1 | 1 | 1 | 1 | 1 | 0 | 0 | 0 |
           ---------------------------------------------------------------
                                       I3 (result)