File: iladiag

package info (click to toggle)
ruby-lapack 1.7.2-1
  • links: PTS, VCS
  • area: main
  • in suites: stretch
  • size: 29,304 kB
  • ctags: 3,419
  • sloc: ansic: 190,572; ruby: 3,937; makefile: 4
file content (30 lines) | stat: -rw-r--r-- 930 bytes parent folder | download | duplicates (5)
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"