Museum

Home

Lab Overview

Retrotechnology Articles

Online Manuals

⇒ bit(3F) — Sun FORTRAN 1.1

Media Vault

Software Library

Restoration Projects

Artifacts Sought

BIT(3F)  —  FORTRAN LIBRARY ROUTINES

NAME

bit − and, or, xor, not, rshift, lshift, bic, bis, bit, setbit functions

SYNOPSIS

(generic) function and (word1, word2) (generic) function or (word1, word2) (generic) function xor (word1, word2) (generic) function not (word) (generic) function rshift (word, nbits) (generic) function lshift (word, nbits) subroutine bic (bitnum, word)
integer∗4 bitnum, word subroutine bis (bitnum, word)
integer∗4 bitnum, word subroutine setbit (bitnum, word, state)
integer∗4 bitnum, word, state logical function bit (bitnum, word)
integer∗4 bitnum, word

DESCRIPTION

The and, or, xor, not, rshift, and lshift functions are generic functions expanded inline by  the compiler.  Their arguments must be integer or logical values (short or long).  The returned value has the data type of the first argument. 

Bits are numbered such that bit 0 is the least significant bit, and bit 31 is the most significant. 

and computes the bitwise ‘and’ of its arguments. 

or computes the bitwise ‘or’ of its arguments. 

xor computes the bitwise ‘exclusive or’ of its arguments. 

not returns the bitwise complement of its argument. 

lshift is a logical left shift with no end around carry. 

rshift is an arithmatic right shift with sign extension.  No test is made for a reasonable value of nbits.

Bic, bis, and setbit are external subroutines which operate on integer∗4 arguments. 

bis sets bitnum in word.

bic clears bitnum in word.

setbit sets bitnum in word to 1 if state is nonzero and clears it otherwise. 

bit is an external function which tests bitnum in word and returns .true. if bitnum is a 1 (one), and returns .false. if bitnum is a 0 (zero). 

FILES

/usr/lib/libF77.a

Sun Release 4.0  —  Last change: 31 March 1988

Typewritten Software • bear@typewritten.org • Edmonds, WA 98026