SHIFTR (3sciport)

Performs a right shift with zero fill

SYNOPSIS

  boolean = SHIFTR( arg1, arg2 )

FUNCTION VALUE

  shiftr          Boolean. (Integer, Logical, or Real.)
                  The right shifted 64 bit boolean result.

ARGUMENTS

  arg1            Integer, Logical, or Real.
                  The 64 bit boolean input datum to be shifted.

  arg2            Integer.
                  The shift count.

DESCRIPTION

  The external function SHIFTR returns the 64 bit boolean result of right
  shifting input data arg1 by arg2 bits. The following list catalogues
  actions taken by SHIFTR for all values of arg2:

          [-inf,-65]      result is zero
          [-64,-1]        arg1 is left  shifted by arg2
          [0,64]          arg1 is right shifted by arg2
          [65,+inf]       result is zero

  For equations and other information, see Volume 3: UNICOS Math and
  Scientific Library Reference Manual SR-2081 7.0, Cray Research, Inc.

NOTES

  Since SHIFTR is not an ANSI Fortran 77 intrinsic function, it must be
  declared as an external function of type integer, logical or real. For
  example:

          EXTERNAL SHIFTR
          INTEGER  SHIFTR
          ...
          I = SHIFTR( '00000000FFFFFFFF'X,32 ) ! Same as I = 0

  For more information about boolean functions, see the sciport man page.