f77_swap Interface

public interface f77_swap

Generic old style interface for SWAP. Supports s, d, c, z. See also: mfi_swap, sswap, dswap, cswap, zswap.


Subroutines

public pure subroutine sswap(n, x, incx, y, incy)

Original interface for SSWAP See also: mfi_swap, f77_swap.

Arguments

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

public pure subroutine dswap(n, x, incx, y, incy)

Original interface for DSWAP See also: mfi_swap, f77_swap.

Arguments

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

public pure subroutine cswap(n, x, incx, y, incy)

Original interface for CSWAP See also: mfi_swap, f77_swap.

Arguments

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

public pure subroutine zswap(n, x, incx, y, incy)

Original interface for ZSWAP See also: mfi_swap, f77_swap.

Arguments

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