f77_blas_hpr Module


Uses


Interfaces

public interface f77_hpr

Generic old style interface for HPR. Supports c, z. See also: mfi_hpr, chpr, zhpr.

  • public pure subroutine chpr(uplo, n, alpha, x, incx, ap)

    Original interface for CHPR See also: mfi_hpr, hpr.

    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) :: ap(*)

  • public pure subroutine zhpr(uplo, n, alpha, x, incx, ap)

    Original interface for ZHPR See also: mfi_hpr, hpr.

    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) :: ap(*)