1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30
|
---
: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"
|