mfi_unmr2 Interface

public interface mfi_unmr2

Generic modern interface for UNMR2. Supports c, z. See also: cunmr2, zunmr2.


Module Procedures

public pure subroutine mfi_cunmr2(a, tau, c, side, trans, info)

Modern interface for cunmr2. See also: mfi_unmr2, f77_unmr2. Multiplies a real matrix by the orthogonal matrix Q formed by gerq2

Arguments

Type IntentOptional Attributes Name
complex(kind=REAL32), intent(inout) :: a(:,:)
complex(kind=REAL32), intent(in) :: tau(:)
complex(kind=REAL32), intent(inout) :: c(:,:)
character(len=1), intent(in), optional :: side
character(len=1), intent(in), optional :: trans
integer, intent(out), optional :: info

public pure subroutine mfi_zunmr2(a, tau, c, side, trans, info)

Modern interface for zunmr2. See also: mfi_unmr2, f77_unmr2. Multiplies a real matrix by the orthogonal matrix Q formed by gerq2

Arguments

Type IntentOptional Attributes Name
complex(kind=REAL64), intent(inout) :: a(:,:)
complex(kind=REAL64), intent(in) :: tau(:)
complex(kind=REAL64), intent(inout) :: c(:,:)
character(len=1), intent(in), optional :: side
character(len=1), intent(in), optional :: trans
integer, intent(out), optional :: info