f77_symv Interface

public interface f77_symv

Generic old style interface for SYMV. Supports s, d. See also: mfi_symv, ssymv, dsymv.


Subroutines

public pure subroutine ssymv(uplo, n, alpha, a, lda, x, incx, beta, y, incy)

Original interface for SSYMV See also: mfi_symv, f77_symv.

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) :: a(lda,*)
integer, intent(in) :: lda
real(kind=REAL32), intent(in) :: x(*)
integer, intent(in) :: incx
real(kind=REAL32), intent(in) :: beta
real(kind=REAL32), intent(inout) :: y(*)
integer, intent(in) :: incy

public pure subroutine dsymv(uplo, n, alpha, a, lda, x, incx, beta, y, incy)

Original interface for DSYMV See also: mfi_symv, f77_symv.

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) :: a(lda,*)
integer, intent(in) :: lda
real(kind=REAL64), intent(in) :: x(*)
integer, intent(in) :: incx
real(kind=REAL64), intent(in) :: beta
real(kind=REAL64), intent(inout) :: y(*)
integer, intent(in) :: incy