inv Interface

public interface inv

Compute 1/z


Module Procedures

private pure elemental module function invi(i) result(res)

Return the real 1/i for integer i

Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: i

Return Value real(kind=dp)

private pure elemental module function invr(x) result(res)

Return 1/x

Arguments

Type IntentOptional Attributes Name
real(kind=dp), intent(in) :: x

Return Value real(kind=dp)

private pure elemental module function invz(z) result(res)

Return 1/z for complex z. If the imaginary part of z is 0, flip its sign

Arguments

Type IntentOptional Attributes Name
complex(kind=dp), intent(in) :: z

Return Value complex(kind=dp)