mfi_lamch Interface

public interface mfi_lamch

Generic modern interface for LAMCH. Supports s, d. See also: f77_lamch, f77_lamch.


Module Procedures

public pure function mfi_slamch(cmach, kind) result(res)

Modern interface for f77_lamch. See also: mfi_lamch, f77_lamch.

Arguments

Type IntentOptional Attributes Name
character(len=1), intent(in) :: cmach
real(kind=REAL32), intent(in) :: kind

Just a kind placeholder

Return Value real(kind=REAL32)

public pure function mfi_dlamch(cmach, kind) result(res)

Modern interface for f77_lamch. See also: mfi_lamch, f77_lamch.

Arguments

Type IntentOptional Attributes Name
character(len=1), intent(in) :: cmach
real(kind=REAL64), intent(in) :: kind

Just a kind placeholder

Return Value real(kind=REAL64)