penf Module

module~~penf~~UsesGraph module~penf penf module~penf_global_parameters_variables penf_global_parameters_variables module~penf_global_parameters_variables->module~penf module~penf_b_size penf_b_size module~penf_global_parameters_variables->module~penf_b_size module~penf_stringify penf_stringify module~penf_global_parameters_variables->module~penf_stringify module~penf_b_size->module~penf module~penf_b_size->module~penf_stringify module~penf_stringify->module~penf iso_fortran_env iso_fortran_env iso_fortran_env->module~penf_stringify
Help

Portability Environment for Fortran poor people.

Used By

module~~penf~~UsedByGraph module~penf penf module~wenoof_polynomials wenoof_polynomials module~penf->module~wenoof_polynomials program~compact_real compact_real module~penf->program~compact_real module~wenoof wenoof module~penf->module~wenoof module~wenoof_smoothness_indicators wenoof_smoothness_indicators module~penf->module~wenoof_smoothness_indicators module~wenoof_interpolator_js wenoof_interpolator_js module~penf->module~wenoof_interpolator_js module~wenoof_smoothness_indicators_js wenoof_smoothness_indicators_js module~penf->module~wenoof_smoothness_indicators_js module~wenoof_polynomials_js wenoof_polynomials_js module~penf->module~wenoof_polynomials_js module~wenoof_alpha_coefficients_z wenoof_alpha_coefficients_z module~penf->module~wenoof_alpha_coefficients_z module~wenoof_interpolator wenoof_interpolator module~penf->module~wenoof_interpolator module~wenoof_alpha_coefficients wenoof_alpha_coefficients module~penf->module~wenoof_alpha_coefficients program~test_all test_all module~penf->program~test_all module~wenoof_optimal_weights_js wenoof_optimal_weights_js module~penf->module~wenoof_optimal_weights_js program~sin_reconstruction sin_reconstruction module~penf->program~sin_reconstruction module~wenoof_alpha_coefficients_m wenoof_alpha_coefficients_m module~penf->module~wenoof_alpha_coefficients_m module~wenoof_alpha_coefficients_js wenoof_alpha_coefficients_js module~penf->module~wenoof_alpha_coefficients_js module~wenoof_optimal_weights wenoof_optimal_weights module~penf->module~wenoof_optimal_weights module~wenoof_polynomials->module~wenoof module~wenoof_polynomials->module~wenoof_interpolator_js module~wenoof_polynomials->module~wenoof_polynomials_js module~wenoof_polynomials->module~wenoof_interpolator module~wenoof_objects_factory wenoof_objects_factory module~wenoof_polynomials->module~wenoof_objects_factory module~wenoof->program~sin_reconstruction module~wenoof_smoothness_indicators->module~wenoof module~wenoof_smoothness_indicators->module~wenoof_interpolator_js module~wenoof_smoothness_indicators->module~wenoof_smoothness_indicators_js module~wenoof_smoothness_indicators->module~wenoof_interpolator module~wenoof_smoothness_indicators->module~wenoof_objects_factory module~wenoof_interpolator_js->module~wenoof module~wenoof_smoothness_indicators_js->module~wenoof module~wenoof_smoothness_indicators_js->module~wenoof_interpolator_js module~wenoof_smoothness_indicators_js->module~wenoof_objects_factory module~wenoof_polynomials_js->module~wenoof module~wenoof_polynomials_js->module~wenoof_interpolator_js module~wenoof_polynomials_js->module~wenoof_objects_factory module~wenoof_alpha_coefficients_z->module~wenoof module~wenoof_alpha_coefficients_z->module~wenoof_interpolator_js module~wenoof_alpha_coefficients_z->module~wenoof_alpha_coefficients_m module~wenoof_alpha_coefficients_z->module~wenoof_objects_factory module~wenoof_interpolator->module~wenoof module~wenoof_interpolator->module~wenoof_interpolator_js module~wenoof_alpha_coefficients->module~wenoof module~wenoof_alpha_coefficients->module~wenoof_interpolator_js module~wenoof_alpha_coefficients->module~wenoof_alpha_coefficients_z module~wenoof_alpha_coefficients->module~wenoof_interpolator module~wenoof_alpha_coefficients->module~wenoof_alpha_coefficients_m module~wenoof_alpha_coefficients->module~wenoof_alpha_coefficients_js module~wenoof_alpha_coefficients->module~wenoof_objects_factory module~wenoof_optimal_weights_js->module~wenoof module~wenoof_optimal_weights_js->module~wenoof_interpolator_js module~wenoof_optimal_weights_js->module~wenoof_objects_factory module~wenoof_alpha_coefficients_m->module~wenoof module~wenoof_alpha_coefficients_m->module~wenoof_interpolator_js module~wenoof_alpha_coefficients_m->module~wenoof_objects_factory module~wenoof_alpha_coefficients_js->module~wenoof module~wenoof_alpha_coefficients_js->module~wenoof_interpolator_js module~wenoof_alpha_coefficients_js->module~wenoof_alpha_coefficients_m module~wenoof_alpha_coefficients_js->module~wenoof_objects_factory module~wenoof_optimal_weights->module~wenoof module~wenoof_optimal_weights->module~wenoof_interpolator_js module~wenoof_optimal_weights->module~wenoof_interpolator module~wenoof_optimal_weights->module~wenoof_optimal_weights_js module~wenoof_optimal_weights->module~wenoof_objects_factory module~wenoof_objects_factory->module~wenoof_interpolator
Help


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.