Man page or keyword search:   man All Sections 1 - General Commands 2 - System Calls 3 - Subroutines, Functions 4 - Special Files 5 - File Formats 6 - Games and Screensavers 7 - Macros and Conventions 8 - Maintenence Commands 9 - Kernel Interface New Commands Server 4.4BSD AIX Alpinelinux Archlinux Aros BSDOS BSDi Bifrost CentOS Cygwin Darwin Debian DigitalUNIX DragonFly ElementaryOS Fedora FreeBSD Gentoo GhostBSD HP-UX Haiku Hurd IRIX Inferno JazzOS Kali Knoppix LinuxMint MacOSX Mageia Mandriva Manjaro Minix MirBSD NeXTSTEP NetBSD OPENSTEP OSF1 OpenBSD OpenDarwin OpenIndiana OpenMandriva OpenServer OpenSuSE OpenVMS Oracle PC-BSD Peanut Pidora Plan9 QNX Raspbian RedHat Scientific Slackware SmartOS Solaris SuSE SunOS Syllable Tru64 UNIXv7 Ubuntu Ultrix UnixWare Xenix YellowDog aLinux   31559 pages apropos Keyword Search (all sections) Output format html ascii pdf view pdf save postscript

SHIFTA(3I)					       Last changed: 1-6-98

NAME
     SHIFTA - Performs an arithmetic shift

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

IMPLEMENTATION
     UNICOS, UNICOS/mk, and IRIX systems

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

DESCRIPTION
     The SHIFTA intrinsic function performs a right shift with sign
     extension fill of the object i by j.  Its arguments are as follows:

     i	  The value to be shifted.  Must 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.

     For values of j outside these ranges, SHIFTA returns an undefined
     result.

     On UNICOS systems, an object is 64 bits.  On UNICOS/mk systems, an
     object is 32 bits or 64 bits.  On IRIX systems, an object is 8 bits,
     16 bits, 32 bits, or 64 bits.

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

NOTES
     The bit representation of the logical data type is not consistent
     among Cray Research systems.  For further details, see the Fortran
     Language Reference Manual, Volume 3, publication SR-3905.

RETURN VALUES
     SHIFTA returns a value of type Boolean on UNICOS and UNICOS/mk
     systems.  It returns an integer result on IRIX systems.

EXAMPLES
     The following section of Fortran code shows the SHIFTA function used
     in the case where i is of type integer.  The bit pattern of i and the
     bit pattern of the result are shown.  For clarity, a 16-bit value is
     used rather than a 64-bit value.

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

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

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

SEE ALSO
     Intrinsic Procedures Reference Manual, publication SR-2138, for the
     printed version of this man page.

Vote for polarhome