f77_spr2 Interface

public interface f77_spr2

Generic old style interface for SPR2. Supports s, d. See also: mfi_spr2, sspr2, dspr2.


Subroutines

public pure subroutine sspr2(uplo, n, alpha, x, incx, y, incy, ap)

Original interface for SSPR2 See also: mfi_spr2, f77_spr2.

Arguments

Type IntentOptional Attributes Name
character(len=1), intent(in) :: uplo
integer, intent(in) :: n
real(kind=REAL32), intent(in) :: alpha
real(kind=REAL32), intent(in) :: x(*)
integer, intent(in) :: incx
real(kind=REAL32), intent(in) :: y(*)
integer, intent(in) :: incy
real(kind=REAL32), intent(inout) :: ap(*)

public pure subroutine dspr2(uplo, n, alpha, x, incx, y, incy, ap)

Original interface for DSPR2 See also: mfi_spr2, f77_spr2.

Arguments

Type IntentOptional Attributes Name
character(len=1), intent(in) :: uplo
integer, intent(in) :: n
real(kind=REAL64), intent(in) :: alpha
real(kind=REAL64), intent(in) :: x(*)
integer, intent(in) :: incx
real(kind=REAL64), intent(in) :: y(*)
integer, intent(in) :: incy
real(kind=REAL64), intent(inout) :: ap(*)