Home
last modified time | relevance | path

Searched refs:JCN_LOC (Results 1 – 16 of 16) sorted by relevance

/dports/math/mumps/mumps-5.1.2/src/
H A Dcana_aux_par.F43 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 Ddana_aux_par.F43 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 Dzana_aux_par.F43 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 Dsana_aux_par.F43 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 Dzmumps_part2.F4304 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 Dcmumps_part2.F4304 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 Ddmumps_part2.F4305 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 Dsmumps_part2.F4300 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 Dcmumps_part2.F4304 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 Ddmumps_part2.F4305 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 Dsmumps_part2.F4300 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 Dzmumps_part2.F4304 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 Dcmumps_part2.F4304 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 Ddmumps_part2.F4300 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 Dzmumps_part2.F4304 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 Dsmumps_part2.F4300 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,