DSHIFTL (3sciport)

Returns the uppermost 64 bits of a left-shifted 128 bit integer

SYNOPSIS

  result = DSHIFTL( left, right, shift )

FUNCTION VALUE

  dshiftl         Integer.
                  The uppermost 64 bits of a left-shifted 128 bit value.

ARGUMENTS

  left            Integer.
                  An input argument.

  right           Integer.
                  An input argument.

  shift           Integer.
                  The shift count argument.

DESCRIPTION

  The external function DSHIFTL concatenates the two 64 bit arguments, left
  and right, into a single 128 bit value. The left argument is placed in the
  uppermost 64 bits and the right argument occupies the lowermost 64 bits.
  The entire 128 bit value is then shifted shift bits to the left and the
  uppermost 64 bits are returned as the result.

  Since DSHIFTL is not an ANSI Fortran 77 intrinsic function, it must be
  declared as EXTERNAL and INTEGER.

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