[UP]

Manual Reference Pages  - bit_size (3)

NAME
bit_size(3f) - [FORTRAN:INTRINSIC:BIT INQUIRY] Bit size inquiry function

SYNTAX
result = bit_size(i)

DESCRIPTION
bit_size(i) returns the number of bits (integer precision plus sign bit) represented by the type of I.

ARGUMENTS
I The type shall be INTEGER.

RETURN VALUE
The return value is of type INTEGER of the same type as I.

EXAMPLE
Sample program: 

   program demo_bit_size
   use,intrinsic :: iso_fortran_env, only : int8, int16, int32, int64
   implicit none
   integer(kind=int64)          :: answer
   integer                      :: ilen
      write(*,’(i0)’)bit_size(bit_size(0_int8))
      write(*,’(i0)’)bit_size(bit_size(0_int16))
      write(*,’(i0)’)bit_size(bit_size(0_int32))
      write(*,’(i0)’)bit_size(bit_size(0_int64))
      answer=0_int64
      ilen=999
      ! notice use of INT(3f)
      ilen=min(ilen,int(bit_size(answer)))
      ! arguments to MIN(3f) would be of different TYPES
      !ilen=min(ilen,bit_size(answer))
      write(*,’(i0)’)ilen
   end program demo_bit_size
Expected output: 

    > 8
    > 16
    > 32
    > 64
    > 64

STANDARD
[[Fortran 95]] and later

CLASS
[[Inquiry function]]

bit_size (3) March 11, 2021
Generated by manServer 1.08 from 557a5cf4-8e8a-42b3-bb95-e528e8f25ce9 using man macros.