dm_real64_to_logical Subroutine

public pure elemental subroutine dm_real64_to_logical(f, l)

Converts 8-byte real to logical. If f equals 0.0, the result is .false., else .true..

Arguments

Type IntentOptional Attributes Name
real(kind=r8), intent(in) :: f

8-byte real value.
logical, intent(out) :: l

Logical value.

Calls

proc~~dm_real64_to_logical~~CallsGraph proc~dm_real64_to_logical dm_real64_to_logical interface~dm_equals dm_equals proc~dm_real64_to_logical->interface~dm_equals

Called by

proc~~dm_real64_to_logical~~CalledByGraph proc~dm_real64_to_logical dm_real64_to_logical interface~dm_from_real64 dm_from_real64 interface~dm_from_real64->proc~dm_real64_to_logical