--- 
:name: iladiag
:md5sum: dc4a24ef58c1ee18a364cb9ea175b8b2
:category: :function
:type: integer
:arguments: 
- diag: 
    :type: char
    :intent: input
:substitutions: {}

:fortran_help: "      INTEGER FUNCTION ILADIAG( DIAG )\n\n\
  *  Purpose\n\
  *  =======\n\
  *\n\
  *  This subroutine translated from a character string specifying if a\n\
  *  matrix has unit diagonal or not to the relevant BLAST-specified\n\
  *  integer constant.\n\
  *\n\
  *  ILADIAG returns an INTEGER.  If ILADIAG < 0, then the input is not a\n\
  *  character indicating a unit or non-unit diagonal.  Otherwise ILADIAG\n\
  *  returns the constant value corresponding to DIAG.\n\
  *\n\n\
  *  Arguments\n\
  *  =========\n\
  *  DIAG    (input) CHARACTER*1\n\
  *          = 'N':  A is non-unit triangular;\n\
  *          = 'U':  A is unit triangular.\n\n\
  *  =====================================================================\n\
  *\n"
