Fortran Wiki
btest

Skip the Navigation Links | Home Page | All Pages | Recently Revised | Authors | Feeds | Export |

Description

btest(i,pos) returns logical .true. if the bit at pos in i is set.

Standard

Fortran 95 and later

Class

Elemental function

Syntax

result = btest(i, pos)

Arguments

• i - The type shall be integer.
• pos - The type shall be integer. A value of zero refers to the least significant bit.

Return value

The return value is of type logical

Example

program test_btest
 integer :: i = 32768 + 1024 + 64
 integer :: pos
 logical :: bool
 do pos=0,16
 bool = btest(i, pos)
 print *, pos, bool
 end do
end program test_btest

ibclr, ibits, ibset, iand, ior, ieor, mvbits

Revised on April 22, 2015 05:49:10 by Anonymous Coward (192.171.3.126) (791 characters / 0.0 pages)

Edit | Back in time (3 revisions) | See changes | History | Views: Print | TeX | Source | Linked from: Intrinsic procedures, ibset