iladiag function

int iladiag(
  1. String DIAG
)

Implementation

int iladiag(final String DIAG) {
  const BLAS_NON_UNIT_DIAG = 131, BLAS_UNIT_DIAG = 132;
  if (lsame(DIAG, 'N')) {
    return BLAS_NON_UNIT_DIAG;
  } else if (lsame(DIAG, 'U')) {
    return BLAS_UNIT_DIAG;
  } else {
    return -1;
  }
}