/dports/math/mumps/mumps-5.1.2/src/ |
H A D | cana_aux_par.F | 43 INTEGER, POINTER :: JCN_LOC(:) => null() component 1024 & top_graph%JCN_LOC, ord%TOPNODES, MEMCNT=MEMCNT) 1224 IF((LPERM(top_graph%JCN_LOC(INNZ)) .NE. 0) .AND. 1225 & (top_graph%JCN_LOC(INNZ) .NE. top_graph%IRN_LOC(INNZ))) 1257 IF((LPERM(top_graph%JCN_LOC(INNZ)) .NE. 0) .AND. 1258 & (top_graph%JCN_LOC(INNZ) .NE. top_graph%IRN_LOC(INNZ))) 1263 & LPERM(top_graph%JCN_LOC(INNZ)) 1800 CALL MUMPS_IREALLOC8(top_graph%JCN_LOC, max(1_8,NEW_LOCNNZ), 1804 ALLOCATE(top_graph%IRN_LOC(1), top_graph%JCN_LOC(1)) 1808 top_graph%JCN_LOC(1:TOP_CNT) = TSENDJ(1:TOP_CNT) [all …]
|
H A D | dana_aux_par.F | 43 INTEGER, POINTER :: JCN_LOC(:) => null() component 1024 & top_graph%JCN_LOC, ord%TOPNODES, MEMCNT=MEMCNT) 1224 IF((LPERM(top_graph%JCN_LOC(INNZ)) .NE. 0) .AND. 1225 & (top_graph%JCN_LOC(INNZ) .NE. top_graph%IRN_LOC(INNZ))) 1257 IF((LPERM(top_graph%JCN_LOC(INNZ)) .NE. 0) .AND. 1258 & (top_graph%JCN_LOC(INNZ) .NE. top_graph%IRN_LOC(INNZ))) 1263 & LPERM(top_graph%JCN_LOC(INNZ)) 1800 CALL MUMPS_IREALLOC8(top_graph%JCN_LOC, max(1_8,NEW_LOCNNZ), 1804 ALLOCATE(top_graph%IRN_LOC(1), top_graph%JCN_LOC(1)) 1808 top_graph%JCN_LOC(1:TOP_CNT) = TSENDJ(1:TOP_CNT) [all …]
|
H A D | zana_aux_par.F | 43 INTEGER, POINTER :: JCN_LOC(:) => null() component 1024 & top_graph%JCN_LOC, ord%TOPNODES, MEMCNT=MEMCNT) 1224 IF((LPERM(top_graph%JCN_LOC(INNZ)) .NE. 0) .AND. 1225 & (top_graph%JCN_LOC(INNZ) .NE. top_graph%IRN_LOC(INNZ))) 1257 IF((LPERM(top_graph%JCN_LOC(INNZ)) .NE. 0) .AND. 1258 & (top_graph%JCN_LOC(INNZ) .NE. top_graph%IRN_LOC(INNZ))) 1263 & LPERM(top_graph%JCN_LOC(INNZ)) 1800 CALL MUMPS_IREALLOC8(top_graph%JCN_LOC, max(1_8,NEW_LOCNNZ), 1804 ALLOCATE(top_graph%IRN_LOC(1), top_graph%JCN_LOC(1)) 1808 top_graph%JCN_LOC(1:TOP_CNT) = TSENDJ(1:TOP_CNT) [all …]
|
H A D | sana_aux_par.F | 43 INTEGER, POINTER :: JCN_LOC(:) => null() component 1024 & top_graph%JCN_LOC, ord%TOPNODES, MEMCNT=MEMCNT) 1224 IF((LPERM(top_graph%JCN_LOC(INNZ)) .NE. 0) .AND. 1225 & (top_graph%JCN_LOC(INNZ) .NE. top_graph%IRN_LOC(INNZ))) 1257 IF((LPERM(top_graph%JCN_LOC(INNZ)) .NE. 0) .AND. 1258 & (top_graph%JCN_LOC(INNZ) .NE. top_graph%IRN_LOC(INNZ))) 1263 & LPERM(top_graph%JCN_LOC(INNZ)) 1800 CALL MUMPS_IREALLOC8(top_graph%JCN_LOC, max(1_8,NEW_LOCNNZ), 1804 ALLOCATE(top_graph%IRN_LOC(1), top_graph%JCN_LOC(1)) 1808 top_graph%JCN_LOC(1:TOP_CNT) = TSENDJ(1:TOP_CNT) [all …]
|
/dports/math/ipopt/Ipopt-3.12.13/ThirdParty/Mumps/MUMPS/src/ |
H A D | zmumps_part2.F | 4304 INTEGER, POINTER :: JCN_LOC(:) => null() component 5405 & top_graph%JCN_LOC, ord%TOPNODES, MEMCNT=MEMCNT) 5646 IF((LPERM(top_graph%JCN_LOC(I)) .NE. 0) .AND. 5647 & (top_graph%JCN_LOC(I) .NE. top_graph%IRN_LOC(I))) THEN 5681 IF((LPERM(top_graph%JCN_LOC(I)) .NE. 0) .AND. 5682 & (top_graph%JCN_LOC(I) .NE. top_graph%IRN_LOC(I))) THEN 5686 & LPERM(top_graph%JCN_LOC(I)) 6225 CALL MUMPS_733(top_graph%JCN_LOC, NEW_LOCNNZ, id%INFO, 6233 ALLOCATE(top_graph%IRN_LOC(1), top_graph%JCN_LOC(1)) 6239 & top_graph%JCN_LOC(1), RCVCNT(1), RDISPL(1), MPI_INTEGER,
|
H A D | cmumps_part2.F | 4304 INTEGER, POINTER :: JCN_LOC(:) => null() component 5405 & top_graph%JCN_LOC, ord%TOPNODES, MEMCNT=MEMCNT) 5646 IF((LPERM(top_graph%JCN_LOC(I)) .NE. 0) .AND. 5647 & (top_graph%JCN_LOC(I) .NE. top_graph%IRN_LOC(I))) THEN 5681 IF((LPERM(top_graph%JCN_LOC(I)) .NE. 0) .AND. 5682 & (top_graph%JCN_LOC(I) .NE. top_graph%IRN_LOC(I))) THEN 5686 & LPERM(top_graph%JCN_LOC(I)) 6225 CALL MUMPS_733(top_graph%JCN_LOC, NEW_LOCNNZ, id%INFO, 6233 ALLOCATE(top_graph%IRN_LOC(1), top_graph%JCN_LOC(1)) 6239 & top_graph%JCN_LOC(1), RCVCNT(1), RDISPL(1), MPI_INTEGER,
|
H A D | dmumps_part2.F | 4305 INTEGER, POINTER :: JCN_LOC(:) => null() component 5406 & top_graph%JCN_LOC, ord%TOPNODES, MEMCNT=MEMCNT) 5647 IF((LPERM(top_graph%JCN_LOC(I)) .NE. 0) .AND. 5648 & (top_graph%JCN_LOC(I) .NE. top_graph%IRN_LOC(I))) THEN 5682 IF((LPERM(top_graph%JCN_LOC(I)) .NE. 0) .AND. 5683 & (top_graph%JCN_LOC(I) .NE. top_graph%IRN_LOC(I))) THEN 5687 & LPERM(top_graph%JCN_LOC(I)) 6226 CALL MUMPS_733(top_graph%JCN_LOC, NEW_LOCNNZ, id%INFO, 6234 ALLOCATE(top_graph%IRN_LOC(1), top_graph%JCN_LOC(1)) 6240 & top_graph%JCN_LOC(1), RCVCNT(1), RDISPL(1), MPI_INTEGER,
|
H A D | smumps_part2.F | 4300 INTEGER, POINTER :: JCN_LOC(:) => null() component 5401 & top_graph%JCN_LOC, ord%TOPNODES, MEMCNT=MEMCNT) 5642 IF((LPERM(top_graph%JCN_LOC(I)) .NE. 0) .AND. 5643 & (top_graph%JCN_LOC(I) .NE. top_graph%IRN_LOC(I))) THEN 5677 IF((LPERM(top_graph%JCN_LOC(I)) .NE. 0) .AND. 5678 & (top_graph%JCN_LOC(I) .NE. top_graph%IRN_LOC(I))) THEN 5682 & LPERM(top_graph%JCN_LOC(I)) 6221 CALL MUMPS_733(top_graph%JCN_LOC, NEW_LOCNNZ, id%INFO, 6229 ALLOCATE(top_graph%IRN_LOC(1), top_graph%JCN_LOC(1)) 6235 & top_graph%JCN_LOC(1), RCVCNT(1), RDISPL(1), MPI_INTEGER,
|
/dports/math/coinmumps/MUMPS_4.10.0/src/ |
H A D | cmumps_part2.F | 4304 INTEGER, POINTER :: JCN_LOC(:) => null() component 5405 & top_graph%JCN_LOC, ord%TOPNODES, MEMCNT=MEMCNT) 5646 IF((LPERM(top_graph%JCN_LOC(I)) .NE. 0) .AND. 5647 & (top_graph%JCN_LOC(I) .NE. top_graph%IRN_LOC(I))) THEN 5681 IF((LPERM(top_graph%JCN_LOC(I)) .NE. 0) .AND. 5682 & (top_graph%JCN_LOC(I) .NE. top_graph%IRN_LOC(I))) THEN 5686 & LPERM(top_graph%JCN_LOC(I)) 6225 CALL MUMPS_733(top_graph%JCN_LOC, NEW_LOCNNZ, id%INFO, 6233 ALLOCATE(top_graph%IRN_LOC(1), top_graph%JCN_LOC(1)) 6239 & top_graph%JCN_LOC(1), RCVCNT(1), RDISPL(1), MPI_INTEGER,
|
H A D | dmumps_part2.F | 4305 INTEGER, POINTER :: JCN_LOC(:) => null() component 5406 & top_graph%JCN_LOC, ord%TOPNODES, MEMCNT=MEMCNT) 5647 IF((LPERM(top_graph%JCN_LOC(I)) .NE. 0) .AND. 5648 & (top_graph%JCN_LOC(I) .NE. top_graph%IRN_LOC(I))) THEN 5682 IF((LPERM(top_graph%JCN_LOC(I)) .NE. 0) .AND. 5683 & (top_graph%JCN_LOC(I) .NE. top_graph%IRN_LOC(I))) THEN 5687 & LPERM(top_graph%JCN_LOC(I)) 6226 CALL MUMPS_733(top_graph%JCN_LOC, NEW_LOCNNZ, id%INFO, 6234 ALLOCATE(top_graph%IRN_LOC(1), top_graph%JCN_LOC(1)) 6240 & top_graph%JCN_LOC(1), RCVCNT(1), RDISPL(1), MPI_INTEGER,
|
H A D | smumps_part2.F | 4300 INTEGER, POINTER :: JCN_LOC(:) => null() component 5401 & top_graph%JCN_LOC, ord%TOPNODES, MEMCNT=MEMCNT) 5642 IF((LPERM(top_graph%JCN_LOC(I)) .NE. 0) .AND. 5643 & (top_graph%JCN_LOC(I) .NE. top_graph%IRN_LOC(I))) THEN 5677 IF((LPERM(top_graph%JCN_LOC(I)) .NE. 0) .AND. 5678 & (top_graph%JCN_LOC(I) .NE. top_graph%IRN_LOC(I))) THEN 5682 & LPERM(top_graph%JCN_LOC(I)) 6221 CALL MUMPS_733(top_graph%JCN_LOC, NEW_LOCNNZ, id%INFO, 6229 ALLOCATE(top_graph%IRN_LOC(1), top_graph%JCN_LOC(1)) 6235 & top_graph%JCN_LOC(1), RCVCNT(1), RDISPL(1), MPI_INTEGER,
|
H A D | zmumps_part2.F | 4304 INTEGER, POINTER :: JCN_LOC(:) => null() component 5405 & top_graph%JCN_LOC, ord%TOPNODES, MEMCNT=MEMCNT) 5646 IF((LPERM(top_graph%JCN_LOC(I)) .NE. 0) .AND. 5647 & (top_graph%JCN_LOC(I) .NE. top_graph%IRN_LOC(I))) THEN 5681 IF((LPERM(top_graph%JCN_LOC(I)) .NE. 0) .AND. 5682 & (top_graph%JCN_LOC(I) .NE. top_graph%IRN_LOC(I))) THEN 5686 & LPERM(top_graph%JCN_LOC(I)) 6225 CALL MUMPS_733(top_graph%JCN_LOC, NEW_LOCNNZ, id%INFO, 6233 ALLOCATE(top_graph%IRN_LOC(1), top_graph%JCN_LOC(1)) 6239 & top_graph%JCN_LOC(1), RCVCNT(1), RDISPL(1), MPI_INTEGER,
|
/dports/math/mumps4/MUMPS_4.10.0/src/ |
H A D | cmumps_part2.F | 4304 INTEGER, POINTER :: JCN_LOC(:) => null() component 5405 & top_graph%JCN_LOC, ord%TOPNODES, MEMCNT=MEMCNT) 5646 IF((LPERM(top_graph%JCN_LOC(I)) .NE. 0) .AND. 5647 & (top_graph%JCN_LOC(I) .NE. top_graph%IRN_LOC(I))) THEN 5681 IF((LPERM(top_graph%JCN_LOC(I)) .NE. 0) .AND. 5682 & (top_graph%JCN_LOC(I) .NE. top_graph%IRN_LOC(I))) THEN 5686 & LPERM(top_graph%JCN_LOC(I)) 6225 CALL MUMPS_733(top_graph%JCN_LOC, NEW_LOCNNZ, id%INFO, 6233 ALLOCATE(top_graph%IRN_LOC(1), top_graph%JCN_LOC(1)) 6239 & top_graph%JCN_LOC(1), RCVCNT(1), RDISPL(1), MPI_INTEGER,
|
H A D | dmumps_part2.F | 4300 INTEGER, POINTER :: JCN_LOC(:) => null() component 5401 & top_graph%JCN_LOC, ord%TOPNODES, MEMCNT=MEMCNT) 5642 IF((LPERM(top_graph%JCN_LOC(I)) .NE. 0) .AND. 5643 & (top_graph%JCN_LOC(I) .NE. top_graph%IRN_LOC(I))) THEN 5677 IF((LPERM(top_graph%JCN_LOC(I)) .NE. 0) .AND. 5678 & (top_graph%JCN_LOC(I) .NE. top_graph%IRN_LOC(I))) THEN 5682 & LPERM(top_graph%JCN_LOC(I)) 6221 CALL MUMPS_733(top_graph%JCN_LOC, NEW_LOCNNZ, id%INFO, 6229 ALLOCATE(top_graph%IRN_LOC(1), top_graph%JCN_LOC(1)) 6235 & top_graph%JCN_LOC(1), RCVCNT(1), RDISPL(1), MPI_INTEGER,
|
H A D | zmumps_part2.F | 4304 INTEGER, POINTER :: JCN_LOC(:) => null() component 5405 & top_graph%JCN_LOC, ord%TOPNODES, MEMCNT=MEMCNT) 5646 IF((LPERM(top_graph%JCN_LOC(I)) .NE. 0) .AND. 5647 & (top_graph%JCN_LOC(I) .NE. top_graph%IRN_LOC(I))) THEN 5681 IF((LPERM(top_graph%JCN_LOC(I)) .NE. 0) .AND. 5682 & (top_graph%JCN_LOC(I) .NE. top_graph%IRN_LOC(I))) THEN 5686 & LPERM(top_graph%JCN_LOC(I)) 6225 CALL MUMPS_733(top_graph%JCN_LOC, NEW_LOCNNZ, id%INFO, 6233 ALLOCATE(top_graph%IRN_LOC(1), top_graph%JCN_LOC(1)) 6239 & top_graph%JCN_LOC(1), RCVCNT(1), RDISPL(1), MPI_INTEGER,
|
H A D | smumps_part2.F | 4300 INTEGER, POINTER :: JCN_LOC(:) => null() component 5401 & top_graph%JCN_LOC, ord%TOPNODES, MEMCNT=MEMCNT) 5642 IF((LPERM(top_graph%JCN_LOC(I)) .NE. 0) .AND. 5643 & (top_graph%JCN_LOC(I) .NE. top_graph%IRN_LOC(I))) THEN 5677 IF((LPERM(top_graph%JCN_LOC(I)) .NE. 0) .AND. 5678 & (top_graph%JCN_LOC(I) .NE. top_graph%IRN_LOC(I))) THEN 5682 & LPERM(top_graph%JCN_LOC(I)) 6221 CALL MUMPS_733(top_graph%JCN_LOC, NEW_LOCNNZ, id%INFO, 6229 ALLOCATE(top_graph%IRN_LOC(1), top_graph%JCN_LOC(1)) 6235 & top_graph%JCN_LOC(1), RCVCNT(1), RDISPL(1), MPI_INTEGER,
|