f77_blas_her2k Module


Uses


Interfaces

public interface f77_her2k

Generic old style interface for HER2K. Supports c, z. See also: mfi_her2k, cher2k, zher2k.

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

    Original interface for CHER2K See also: mfi_her2k, her2k.

    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
    complex(kind=REAL32), intent(in) :: alpha
    complex(kind=REAL32), intent(in) :: a(lda,*)
    integer, intent(in) :: lda
    complex(kind=REAL32), intent(in) :: b(ldb,*)
    integer, intent(in) :: ldb
    real(kind=wp), intent(in) :: beta
    complex(kind=REAL32), intent(inout) :: c(ldc,*)
    integer, intent(in) :: ldc

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

    Original interface for ZHER2K See also: mfi_her2k, her2k.

    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
    complex(kind=REAL64), intent(in) :: alpha
    complex(kind=REAL64), intent(in) :: a(lda,*)
    integer, intent(in) :: lda
    complex(kind=REAL64), intent(in) :: b(ldb,*)
    integer, intent(in) :: ldb
    real(kind=wp), intent(in) :: beta
    complex(kind=REAL64), intent(inout) :: c(ldc,*)
    integer, intent(in) :: ldc