mfi_blas_her2k Module


Uses


Interfaces

public interface mfi_her2k

Generic modern interface for HER2K. Supports c, z. See also: cher2k, zher2k.

  • public pure subroutine mfi_cher2k(a, b, c, uplo, trans, alpha, beta)

    Modern interface for f77_her2k. See also: mfi_her2k, f77_her2k.

    Arguments

    Type IntentOptional Attributes Name
    complex(kind=REAL32), intent(in) :: a(:,:)
    complex(kind=REAL32), intent(in) :: b(:,:)
    complex(kind=REAL32), intent(inout) :: c(:,:)
    character(len=1), intent(in), optional :: uplo
    character(len=1), intent(in), optional :: trans
    complex(kind=REAL32), intent(in), optional :: alpha
    real(kind=wp), intent(in), optional :: beta

  • public pure subroutine mfi_zher2k(a, b, c, uplo, trans, alpha, beta)

    Modern interface for f77_her2k. See also: mfi_her2k, f77_her2k.

    Arguments

    Type IntentOptional Attributes Name
    complex(kind=REAL64), intent(in) :: a(:,:)
    complex(kind=REAL64), intent(in) :: b(:,:)
    complex(kind=REAL64), intent(inout) :: c(:,:)
    character(len=1), intent(in), optional :: uplo
    character(len=1), intent(in), optional :: trans
    complex(kind=REAL64), intent(in), optional :: alpha
    real(kind=wp), intent(in), optional :: beta

Subroutines

public pure subroutine mfi_cher2k(a, b, c, uplo, trans, alpha, beta)

Modern interface for f77_her2k. See also: mfi_her2k, f77_her2k.

Arguments

Type IntentOptional Attributes Name
complex(kind=REAL32), intent(in) :: a(:,:)
complex(kind=REAL32), intent(in) :: b(:,:)
complex(kind=REAL32), intent(inout) :: c(:,:)
character(len=1), intent(in), optional :: uplo
character(len=1), intent(in), optional :: trans
complex(kind=REAL32), intent(in), optional :: alpha
real(kind=wp), intent(in), optional :: beta

public pure subroutine mfi_zher2k(a, b, c, uplo, trans, alpha, beta)

Modern interface for f77_her2k. See also: mfi_her2k, f77_her2k.

Arguments

Type IntentOptional Attributes Name
complex(kind=REAL64), intent(in) :: a(:,:)
complex(kind=REAL64), intent(in) :: b(:,:)
complex(kind=REAL64), intent(inout) :: c(:,:)
character(len=1), intent(in), optional :: uplo
character(len=1), intent(in), optional :: trans
complex(kind=REAL64), intent(in), optional :: alpha
real(kind=wp), intent(in), optional :: beta