byte_size_I1P Function

private elemental function byte_size_I1P(i) result(bytes)

Arguments

TypeIntentOptionalAttributesName
integer(kind=I1P), intent(in) :: i

Return Value integer(kind=I1P)


Called by

proc~~byte_size_i1p~6~~CalledByGraph proc~byte_size_i1p~6 byte_size_I1P interface~byte_size~6 byte_size interface~byte_size~6->proc~byte_size_i1p~6

Contents

Source Code


Source Code

   elemental function byte_size_I1P(i) result(bytes)
   !< Compute the number of bytes of an integer variable.
   !<
   !<```fortran
   !< use penf
   !< print FI1P, byte_size(1_I1P)
   !<```
   !=> 1 <<<
   integer(I1P), intent(in) :: i     !< Integer variable whose number of bytes must be computed.
   integer(I1P)             :: bytes !< Number of bytes of i.

   bytes = bit_size(i) / 8_I1P
   endfunction byte_size_I1P