f77_her Interface

public interface f77_her

Generic old style interface for HER. Supports c, z. See also: mfi_her, cher, zher.


Subroutines

public pure subroutine cher(uplo, n, alpha, x, incx, a, lda)

Original interface for CHER See also: mfi_her, f77_her.

Arguments

Type IntentOptional Attributes Name
character(len=1), intent(in) :: uplo
integer, intent(in) :: n
real(kind=wp), intent(in) :: alpha
complex(kind=REAL32), intent(in) :: x(*)
integer, intent(in) :: incx
complex(kind=REAL32), intent(inout) :: a(lda,*)
integer, intent(in) :: lda

public pure subroutine zher(uplo, n, alpha, x, incx, a, lda)

Original interface for ZHER See also: mfi_her, f77_her.

Arguments

Type IntentOptional Attributes Name
character(len=1), intent(in) :: uplo
integer, intent(in) :: n
real(kind=wp), intent(in) :: alpha
complex(kind=REAL64), intent(in) :: x(*)
integer, intent(in) :: incx
complex(kind=REAL64), intent(inout) :: a(lda,*)
integer, intent(in) :: lda