SYNOPSIS
- DOUBLE PRECISION
- FUNCTION ZLA_PORPVGRW( UPLO, NCOLS, A, LDA, AF, LDAF, WORK )
- IMPLICIT NONE
- CHARACTER*1 UPLO
- INTEGER NCOLS, LDA, LDAF
- COMPLEX*16 A( LDA, * ), AF( LDAF, * )
- DOUBLE PRECISION WORK( * )
PURPOSE
ZLA_PORPVGRW computes ... .ARGUMENTS