f77_syr2k Interface

public interface f77_syr2k

Generic old style interface for SYR2K. Supports s, d. See also: mfi_syr2k, ssyr2k, dsyr2k.


Subroutines

public pure subroutine ssyr2k(uplo, trans, n, k, alpha, a, lda, b, ldb, beta, c, ldc)

Original interface for SSYR2K See also: mfi_syr2k, f77_syr2k.

Arguments

Type IntentOptional Attributes Name
character(len=1), intent(in) :: uplo
character(len=1), intent(in) :: trans
integer, intent(in) :: n
integer, intent(in) :: k
real(kind=REAL32), intent(in) :: alpha
real(kind=REAL32), intent(in) :: a(lda,*)
integer, intent(in) :: lda
real(kind=REAL32), intent(in) :: b(ldb,*)
integer, intent(in) :: ldb
real(kind=REAL32), intent(in) :: beta
real(kind=REAL32), intent(inout) :: c(ldc,*)
integer, intent(in) :: ldc

public pure subroutine dsyr2k(uplo, trans, n, k, alpha, a, lda, b, ldb, beta, c, ldc)

Original interface for DSYR2K See also: mfi_syr2k, f77_syr2k.

Arguments

Type IntentOptional Attributes Name
character(len=1), intent(in) :: uplo
character(len=1), intent(in) :: trans
integer, intent(in) :: n
integer, intent(in) :: k
real(kind=REAL64), intent(in) :: alpha
real(kind=REAL64), intent(in) :: a(lda,*)
integer, intent(in) :: lda
real(kind=REAL64), intent(in) :: b(ldb,*)
integer, intent(in) :: ldb
real(kind=REAL64), intent(in) :: beta
real(kind=REAL64), intent(inout) :: c(ldc,*)
integer, intent(in) :: ldc