The TELEMAC-MASCARET system  trunk
Functions/Subroutines
sd_odrv.f File Reference

Go to the source code of this file.

Functions/Subroutines

subroutine sd_odrv (N, IA, JA, A, P, IP, NSP, ISP, PATH, FLAG)
 

Function/Subroutine Documentation

◆ sd_odrv()

subroutine sd_odrv ( integer, intent(in)  N,
integer, dimension(n+1), intent(inout)  IA,
integer, dimension(*), intent(inout)  JA,
double precision, dimension(*), intent(inout)  A,
integer, dimension(n), intent(inout)  P,
integer, dimension(n), intent(inout)  IP,
integer, intent(in)  NSP,
integer, dimension(nsp), intent(inout)  ISP,
integer, intent(in)  PATH,
integer, intent(inout)  FLAG 
)
Parameters
[in]n[out] A Real one-dimensional array containing the NONZERO ENTRIES IN (THE UPPER TRIANGLE OF) M, STORED BY ROWS; DIMENSION =NUMBER OF NONZERO ENTRIES IN (THE UPPER TRIANGLE OF) M
[out]FLAGInteger error flag; values and their meanings are - 0 NO ERRORS DETECTED 9N+K INSUFFICIENT STORAGE IN MD 10N+1 INSUFFICIENT STORAGE IN ODRV 11N+1 ILLEGAL PATH SPECIFICATION
[out]IAInteger one-dimensional array containing POINTERS TO DELIMIT ROWS IN JA AND A; DIMENSION = N+1
[out]IPInteger one-dimensional array used to return THE INVERSE OF THE PERMUTATION RETURNED IN P; DIMENSION = N
[out]ISPInteger one-dimensional array used for WORKING STORAGE; DIMENSION = NSP
[out]JAInteger one-dimensional array containing the COLUMN INDICES CORRESPONDING TO THE ELEMENTS OF A; DIMENSION = NUMBER OF NONZERO ENTRIES IN (THE UPPER TRIANGLE OF) M
[in]NOrder of the matrix
[in]NSPDeclared dimension of the one-dimensional ARRAY ISP; NSP MUST BE AT LEAST 3N+4K, WHERE K IS THE NUMBER OF NONZEROES IN THE STRICT UPPER TRIANGLE OF M
[out]PInteger one-dimensional array used to return THE PERMUTATION OF THE ROWS AND COLUMNS OF M CORRESPONDING TO THE MINIMUM DEGREE ORDERING; DIMENSION = N
[in]PATHInteger path specification; VALUES AND THEIR MEANINGS ARE - 1 FIND MINIMUM DEGREE ORDERING ONLY 2 FIND MINIMUM DEGREE ORDERING AND REORDER SYMMETRICALLY STORED MATRIX (USED WHEN ONLY THE NONZERO ENTRIES IN THE UPPER TRIANGLE OF M ARE BEING STORED) 3 REORDER SYMMETRICALLY STORED MATRIX AS SPECIFIED BY INPUT PERMUTATION (USED WHEN AN ORDERING HAS ALREADY BEEN DETERMINED AND ONLY THE NONZERO ENTRIES IN THE UPPER TRIANGLE OF M ARE BEING STORED) 4 SAME AS 2 BUT PUT DIAGONAL ENTRIES AT START OF EACH ROW 5 SAME AS 3 BUT PUT DIAGONAL ENTRIES AT START OF EACH ROW
[in]nsp[out] A Real one-dimensional array containing the NONZERO ENTRIES IN (THE UPPER TRIANGLE OF) M, STORED BY ROWS; DIMENSION =NUMBER OF NONZERO ENTRIES IN (THE UPPER TRIANGLE OF) M
[out]FLAGInteger error flag; values and their meanings are - 0 NO ERRORS DETECTED 9N+K INSUFFICIENT STORAGE IN MD 10N+1 INSUFFICIENT STORAGE IN ODRV 11N+1 ILLEGAL PATH SPECIFICATION
[out]IAInteger one-dimensional array containing POINTERS TO DELIMIT ROWS IN JA AND A; DIMENSION = N+1
[out]IPInteger one-dimensional array used to return THE INVERSE OF THE PERMUTATION RETURNED IN P; DIMENSION = N
[out]ISPInteger one-dimensional array used for WORKING STORAGE; DIMENSION = NSP
[out]JAInteger one-dimensional array containing the COLUMN INDICES CORRESPONDING TO THE ELEMENTS OF A; DIMENSION = NUMBER OF NONZERO ENTRIES IN (THE UPPER TRIANGLE OF) M
[in]NOrder of the matrix
[in]NSPDeclared dimension of the one-dimensional ARRAY ISP; NSP MUST BE AT LEAST 3N+4K, WHERE K IS THE NUMBER OF NONZEROES IN THE STRICT UPPER TRIANGLE OF M
[out]PInteger one-dimensional array used to return THE PERMUTATION OF THE ROWS AND COLUMNS OF M CORRESPONDING TO THE MINIMUM DEGREE ORDERING; DIMENSION = N
[in]PATHInteger path specification; VALUES AND THEIR MEANINGS ARE - 1 FIND MINIMUM DEGREE ORDERING ONLY 2 FIND MINIMUM DEGREE ORDERING AND REORDER SYMMETRICALLY STORED MATRIX (USED WHEN ONLY THE NONZERO ENTRIES IN THE UPPER TRIANGLE OF M ARE BEING STORED) 3 REORDER SYMMETRICALLY STORED MATRIX AS SPECIFIED BY INPUT PERMUTATION (USED WHEN AN ORDERING HAS ALREADY BEEN DETERMINED AND ONLY THE NONZERO ENTRIES IN THE UPPER TRIANGLE OF M ARE BEING STORED) 4 SAME AS 2 BUT PUT DIAGONAL ENTRIES AT START OF EACH ROW 5 SAME AS 3 BUT PUT DIAGONAL ENTRIES AT START OF EACH ROW
[in]path[out] A Real one-dimensional array containing the NONZERO ENTRIES IN (THE UPPER TRIANGLE OF) M, STORED BY ROWS; DIMENSION =NUMBER OF NONZERO ENTRIES IN (THE UPPER TRIANGLE OF) M
[out]FLAGInteger error flag; values and their meanings are - 0 NO ERRORS DETECTED 9N+K INSUFFICIENT STORAGE IN MD 10N+1 INSUFFICIENT STORAGE IN ODRV 11N+1 ILLEGAL PATH SPECIFICATION
[out]IAInteger one-dimensional array containing POINTERS TO DELIMIT ROWS IN JA AND A; DIMENSION = N+1
[out]IPInteger one-dimensional array used to return THE INVERSE OF THE PERMUTATION RETURNED IN P; DIMENSION = N
[out]ISPInteger one-dimensional array used for WORKING STORAGE; DIMENSION = NSP
[out]JAInteger one-dimensional array containing the COLUMN INDICES CORRESPONDING TO THE ELEMENTS OF A; DIMENSION = NUMBER OF NONZERO ENTRIES IN (THE UPPER TRIANGLE OF) M
[in]NOrder of the matrix
[in]NSPDeclared dimension of the one-dimensional ARRAY ISP; NSP MUST BE AT LEAST 3N+4K, WHERE K IS THE NUMBER OF NONZEROES IN THE STRICT UPPER TRIANGLE OF M
[out]PInteger one-dimensional array used to return THE PERMUTATION OF THE ROWS AND COLUMNS OF M CORRESPONDING TO THE MINIMUM DEGREE ORDERING; DIMENSION = N
[in]PATHInteger path specification; VALUES AND THEIR MEANINGS ARE - 1 FIND MINIMUM DEGREE ORDERING ONLY 2 FIND MINIMUM DEGREE ORDERING AND REORDER SYMMETRICALLY STORED MATRIX (USED WHEN ONLY THE NONZERO ENTRIES IN THE UPPER TRIANGLE OF M ARE BEING STORED) 3 REORDER SYMMETRICALLY STORED MATRIX AS SPECIFIED BY INPUT PERMUTATION (USED WHEN AN ORDERING HAS ALREADY BEEN DETERMINED AND ONLY THE NONZERO ENTRIES IN THE UPPER TRIANGLE OF M ARE BEING STORED) 4 SAME AS 2 BUT PUT DIAGONAL ENTRIES AT START OF EACH ROW 5 SAME AS 3 BUT PUT DIAGONAL ENTRIES AT START OF EACH ROW

Definition at line 7 of file sd_odrv.f.

+ Here is the call graph for this function:
+ Here is the caller graph for this function: