!>
!> CLQT04 tests CGELQT and CGEMLQT.
!> 

M

!>          M is INTEGER
!>          Number of rows in test matrix.
!> 

N

!>          N is INTEGER
!>          Number of columns in test matrix.
!> 

NB

!>          NB is INTEGER
!>          Block size of test matrix.  NB <= Min(M,N).
!> 

RESULT

!>          RESULT is DOUBLE PRECISION array, dimension (6)
!>          Results of each of the six tests below.
!>
!>          RESULT(1) = | A - L Q |
!>          RESULT(2) = | I - Q Q^H |
!>          RESULT(3) = | Q C - Q C |
!>          RESULT(4) = | Q^H C - Q^H C |
!>          RESULT(5) = | C Q - C Q |
!>          RESULT(6) = | C Q^H - C Q^H |
!> 

Univ. of Tennessee

Univ. of California Berkeley

Univ. of Colorado Denver

NAG Ltd.