f77_spr Interface

public interface f77_spr

Generic old style interface for SPR. Supports s, d. See also: mfi_spr, sspr, dspr.


Subroutines

public pure subroutine sspr(uplo, n, alpha, x, incx, ap)

Original interface for SSPR See also: mfi_spr, f77_spr.

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(inout) :: ap(*)

public pure subroutine dspr(uplo, n, alpha, x, incx, ap)

Original interface for DSPR See also: mfi_spr, f77_spr.

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(inout) :: ap(*)