next up previous contents index
Next: Purpose Up: Linear Least Squares Problems Previous: Example 2 (from Program   Contents   Index


LA_GELSY 


SUBROUTINE LA_GELSY( A, B, RANK=rank, & 


JPVT= jpvt, RCOND= rcond, INFO= info ) 

type(wp), INTENT(INOUT) :: A(:,:), rhs 


INTEGER, INTENT(OUT), OPTIONAL :: RANK 


INTEGER, INTENT(INOUT), OPTIONAL :: JPVT(:) 


REAL(wp), INTENT(IN), OPTIONAL :: RCOND 


INTEGER, INTENT(OUT), OPTIONAL :: INFO 


where 

type ::= REAL $\mid$ COMPLEX 

wp   ::= KIND(1.0) $\mid$ KIND(1.0D0) 

rhs  ::= B(:,:) $\mid$ B(:)



Susan Blackford 2001-08-19