f77_hpr Interface
public interface f77_hpr
Generic old style interface for HPR. Supports c, z. See also: mfi_hpr, chpr, zhpr.
Subroutines
public pure subroutine chpr(uplo, n, alpha, x, incx, ap)
Original interface for CHPR See also: mfi_hpr, f77_hpr.
Arguments
| Type | Intent | Optional | 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, f77_hpr.
Arguments
| Type | Intent | Optional | 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(*) |