f77_asum Interface

public interface f77_asum

Generic old style interface for ASUM. Supports s, d, sc, dz. See also: mfi_asum, sasum, dasum, scasum, dzasum.


Functions

public pure function sasum(n, x, incx)

Original interface for SASUM See also: mfi_asum, f77_asum.

Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: n
real(kind=REAL32), intent(in) :: x(*)
integer, intent(in) :: incx

Return Value real(kind=REAL32)

public pure function scasum(n, x, incx)

Original interface for SCASUM See also: mfi_asum, f77_asum.

Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: n
complex(kind=REAL32), intent(in) :: x(*)
integer, intent(in) :: incx

Return Value real(kind=REAL32)

public pure function dasum(n, x, incx)

Original interface for DASUM See also: mfi_asum, f77_asum.

Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: n
real(kind=REAL64), intent(in) :: x(*)
integer, intent(in) :: incx

Return Value real(kind=REAL64)

public pure function dzasum(n, x, incx)

Original interface for DZASUM See also: mfi_asum, f77_asum.

Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: n
complex(kind=REAL64), intent(in) :: x(*)
integer, intent(in) :: incx

Return Value real(kind=REAL64)