penf Module

  1. penf.F90
  2. penf
module~~penf~4~~UsesGraph module~penf~4 penf module~penf_global_parameters_variables penf_global_parameters_variables module~penf_global_parameters_variables->module~penf~4 module~penf_b_size~4 penf_b_size module~penf_global_parameters_variables->module~penf_b_size~4 module~penf_stringify~3 penf_stringify module~penf_global_parameters_variables->module~penf_stringify~3 module~penf_b_size~4->module~penf~4 module~penf_b_size~4->module~penf_stringify~3 module~penf_stringify~3->module~penf~4 iso_fortran_env iso_fortran_env iso_fortran_env->module~penf_stringify~3
Help

Portability Environment for Fortran poor people.


Interfaces

Functions

Subroutines


Interfaces

public interface bit_size

Overloading of the intrinsic bit_size function for computing the number of bits of (also) real and character variables.

public interface digit

Compute the number of digits in decimal base of the input integer.

  • private elemental function digit_I8(n) result(digit)

    Compute the number of digits in decimal base of the input integer.

    Arguments

    Type IntentOptional AttributesName
    integer(kind=I8P), intent(in) :: n

    Input integer.

    Return Value integer(kind=I4P)

    Number of digits.

  • private elemental function digit_I4(n) result(digit)

    Compute the number of digits in decimal base of the input integer.

    Arguments

    Type IntentOptional AttributesName
    integer(kind=I4P), intent(in) :: n

    Input integer.

    Return Value integer(kind=I4P)

    Number of digits.

  • private elemental function digit_I2(n) result(digit)

    Compute the number of digits in decimal base of the input integer.

    Arguments

    Type IntentOptional AttributesName
    integer(kind=I2P), intent(in) :: n

    Input integer.

    Return Value integer(kind=I4P)

    Number of digits.

  • private elemental function digit_I1(n) result(digit)

    Compute the number of digits in decimal base of the input integer.

    Arguments

    Type IntentOptional AttributesName
    integer(kind=I1P), intent(in) :: n

    Input integer.

    Return Value integer(kind=I4P)

    Number of digits.


Functions

private elemental function digit_I8(n) result(digit)

Compute the number of digits in decimal base of the input integer.

Arguments

Type IntentOptional AttributesName
integer(kind=I8P), intent(in) :: n

Input integer.

Return Value integer(kind=I4P)

Number of digits.

private elemental function digit_I4(n) result(digit)

Compute the number of digits in decimal base of the input integer.

Arguments

Type IntentOptional AttributesName
integer(kind=I4P), intent(in) :: n

Input integer.

Return Value integer(kind=I4P)

Number of digits.

private elemental function digit_I2(n) result(digit)

Compute the number of digits in decimal base of the input integer.

Arguments

Type IntentOptional AttributesName
integer(kind=I2P), intent(in) :: n

Input integer.

Return Value integer(kind=I4P)

Number of digits.

private elemental function digit_I1(n) result(digit)

Compute the number of digits in decimal base of the input integer.

Arguments

Type IntentOptional AttributesName
integer(kind=I1P), intent(in) :: n

Input integer.

Return Value integer(kind=I4P)

Number of digits.


Subroutines

public subroutine check_endian()

Check the type of bit ordering (big or little endian) of the running architecture.

Arguments

None

public subroutine penf_init()

Initialize PENF's variables that are not initialized into the definition specification.

Arguments

None

public subroutine penf_print(unit, pref, iostat, iomsg)

Print to the specified unit the PENF's environment data.

Arguments

Type IntentOptional AttributesName
integer(kind=I4P), intent(in) :: unit

Logic unit.
character(len=*), intent(in), optional :: pref

Prefixing string.
integer(kind=I4P), intent(out), optional :: iostat

IO error.
character(len=*), intent(out), optional :: iomsg

IO error message.

All Modules