f77_hpr2 Interface

public interface f77_hpr2

Generic old style interface for HPR2. Supports c, z. See also: mfi_hpr2, chpr2, zhpr2.


Subroutines

public pure subroutine chpr2(uplo, n, alpha, x, incx, y, incy, ap)

Original interface for CHPR2 See also: mfi_hpr2, f77_hpr2.

Arguments

Type IntentOptional Attributes Name
character(len=1), intent(in) :: uplo
integer, intent(in) :: n
complex(kind=REAL32), intent(in) :: alpha
complex(kind=REAL32), intent(in) :: x(*)
integer, intent(in) :: incx
complex(kind=REAL32), intent(in) :: y(*)
integer, intent(in) :: incy
complex(kind=REAL32), intent(inout) :: ap(*)

public pure subroutine zhpr2(uplo, n, alpha, x, incx, y, incy, ap)

Original interface for ZHPR2 See also: mfi_hpr2, f77_hpr2.

Arguments

Type IntentOptional Attributes Name
character(len=1), intent(in) :: uplo
integer, intent(in) :: n
complex(kind=REAL64), intent(in) :: alpha
complex(kind=REAL64), intent(in) :: x(*)
integer, intent(in) :: incx
complex(kind=REAL64), intent(in) :: y(*)
integer, intent(in) :: incy
complex(kind=REAL64), intent(inout) :: ap(*)