SHIFTL (3sciport)

Performs a left shift with zero fill

SYNOPSIS

  boolean = SHIFTL( arg1, arg2 )

FUNCTION VALUE

  shiftl          Boolean. (Integer, Logical, or Real.)
                  The left 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 SHIFTL returns the 64 bit boolean result of left
  shifting input data arg1 by arg2 bits. The following list catalogues
  actions taken by SHIFTL for all values of arg2:

          [-inf,-65]      result is zero
          [-64,-1]        arg1 is right shifted by arg2
          [0,64]          arg1 is left  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 SHIFTL 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 SHIFTL
          INTEGER  SHIFTL
          ...
          I = SHIFTL( 'FFFFFFFF00000000'X,32 ) ! Same as I = 0

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