f77_blas_syr2 Module


Uses


Interfaces

public interface f77_syr2

Generic old style interface for SYR2. Supports s, d. See also: mfi_syr2, ssyr2, dsyr2.

  • public pure subroutine ssyr2(uplo, n, alpha, x, incx, y, incy, a, lda)

    Original interface for SSYR2 See also: mfi_syr2, syr2.

    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) :: a(lda,*)
    integer, intent(in) :: lda

  • public pure subroutine dsyr2(uplo, n, alpha, x, incx, y, incy, a, lda)

    Original interface for DSYR2 See also: mfi_syr2, syr2.

    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) :: a(lda,*)
    integer, intent(in) :: lda