mfi_hpr2 Interface

public interface mfi_hpr2

Generic modern interface for HPR2. Supports c, z. See also: chpr2, zhpr2.


Module Procedures

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

Modern interface for chpr2. See also: mfi_hpr2, f77_hpr2.

Arguments

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

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

Modern interface for zhpr2. See also: mfi_hpr2, f77_hpr2.

Arguments

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