/dports/math/mumps/mumps-5.1.2/src/ |
H A D | dana_mtrans.F | 82 JPERM(I) = 0 99 JPERM(J) = I 112 JPERM(J) = I0 141 80 JPERM(JJ) = II 145 JPERM(J) = I 248 I0 = JPERM(J) 249 JPERM(J) = I 812 JPERM(I) = 0_8 839 K = JPERM(J) 891 JPERM(J) = K [all …]
|
H A D | sana_mtrans.F | 82 JPERM(I) = 0 99 JPERM(J) = I 112 JPERM(J) = I0 141 80 JPERM(JJ) = II 145 JPERM(J) = I 248 I0 = JPERM(J) 249 JPERM(J) = I 812 JPERM(I) = 0_8 839 K = JPERM(J) 891 JPERM(J) = K [all …]
|
H A D | zana_mtrans.F | 82 JPERM(I) = 0 99 JPERM(J) = I 112 JPERM(J) = I0 141 80 JPERM(JJ) = II 145 JPERM(J) = I 248 I0 = JPERM(J) 249 JPERM(J) = I 812 JPERM(I) = 0_8 839 K = JPERM(J) 891 JPERM(J) = K [all …]
|
H A D | cana_mtrans.F | 82 JPERM(I) = 0 99 JPERM(J) = I 112 JPERM(J) = I0 141 80 JPERM(JJ) = II 145 JPERM(J) = I 248 I0 = JPERM(J) 249 JPERM(J) = I 812 JPERM(I) = 0_8 839 K = JPERM(J) 891 JPERM(J) = K [all …]
|
H A D | cana_aux.F | 69 INTEGER MTRANS, COMPRESS,NCMP,IERROR,J,JPERM,NCST local 261 JPERM = PIV(J) 262 FILS(JPERM) = J 263 IF (JPERM.NE.J) IDENT = .FALSE. 1791 INTEGER JPERM local 2150 JPERM = PERM(J) 2151 IW(IRNW+int(JPERM-1,8)) = J 2152 IF (JPERM.NE.J) IDENT = .FALSE.
|
H A D | dana_aux.F | 69 INTEGER MTRANS, COMPRESS,NCMP,IERROR,J,JPERM,NCST local 261 JPERM = PIV(J) 262 FILS(JPERM) = J 263 IF (JPERM.NE.J) IDENT = .FALSE. 1791 INTEGER JPERM local 2150 JPERM = PERM(J) 2151 IW(IRNW+int(JPERM-1,8)) = J 2152 IF (JPERM.NE.J) IDENT = .FALSE.
|
H A D | zana_aux.F | 69 INTEGER MTRANS, COMPRESS,NCMP,IERROR,J,JPERM,NCST local 261 JPERM = PIV(J) 262 FILS(JPERM) = J 263 IF (JPERM.NE.J) IDENT = .FALSE. 1791 INTEGER JPERM local 2150 JPERM = PERM(J) 2151 IW(IRNW+int(JPERM-1,8)) = J 2152 IF (JPERM.NE.J) IDENT = .FALSE.
|
H A D | sana_aux.F | 69 INTEGER MTRANS, COMPRESS,NCMP,IERROR,J,JPERM,NCST local 261 JPERM = PIV(J) 262 FILS(JPERM) = J 263 IF (JPERM.NE.J) IDENT = .FALSE. 1791 INTEGER JPERM local 2150 JPERM = PERM(J) 2151 IW(IRNW+int(JPERM-1,8)) = J 2152 IF (JPERM.NE.J) IDENT = .FALSE.
|
H A D | zsol_driver.F | 70 INTEGER I,K,JPERM, J, II, IZ2 local 2768 JPERM = UNS_PERM_INV(IRHS_SPARSE_COPY(IPOS+K-1)) 2769 IRHS_SPARSE_COPY(IPOS+K-1) = JPERM 3112 JPERM = id%UNS_PERM(I) 3113 id%RHS(I-1+KDEC) = C_RW2(JPERM) 4886 JPERM = id%UNS_PERM(I) 4887 id%RHS( KDEC+JPERM ) = C_RW1( I )
|
H A D | csol_driver.F | 70 INTEGER I,K,JPERM, J, II, IZ2 local 2768 JPERM = UNS_PERM_INV(IRHS_SPARSE_COPY(IPOS+K-1)) 2769 IRHS_SPARSE_COPY(IPOS+K-1) = JPERM 3112 JPERM = id%UNS_PERM(I) 3113 id%RHS(I-1+KDEC) = C_RW2(JPERM) 4886 JPERM = id%UNS_PERM(I) 4887 id%RHS( KDEC+JPERM ) = C_RW1( I )
|
/dports/science/nwchem-data/nwchem-7.0.2-release/src/lucia/ |
H A D | lucia1.F | 316 JPERM = 0 570 JPERM = JAEL 573 JPERM = JAEL + JPERM 607 JPERM = JBEL 610 JPERM = JBEL + JPERM 809 JPERM = 0 1045 JPERM = JAEL 1048 JPERM = JAEL + JPERM 1054 SIGN = (-1)**(IPERM+JPERM) 1081 JPERM = JBEL [all …]
|
/dports/science/nwchem/nwchem-7b21660b82ebd85ef659f6fba7e1e73433b0bd0a/src/lucia/ |
H A D | lucia1.F | 316 JPERM = 0 570 JPERM = JAEL 573 JPERM = JAEL + JPERM 607 JPERM = JBEL 610 JPERM = JBEL + JPERM 809 JPERM = 0 1045 JPERM = JAEL 1048 JPERM = JAEL + JPERM 1054 SIGN = (-1)**(IPERM+JPERM) 1081 JPERM = JBEL [all …]
|
/dports/science/dalton/dalton-66052b3af5ea7225e31178bf9a8b031913c72190/DALTON/sirius/ |
H A D | ciham.F | 591 JPERM = JAEL 594 JPERM = JAEL + JPERM 600 SIGN = (-1)**(IPERM+JPERM) 627 JPERM = JBEL 630 JPERM = JBEL + JPERM 636 SIGN = (-1)**(IPERM+JPERM)
|
/dports/math/ipopt/Ipopt-3.12.13/ThirdParty/Mumps/MUMPS/src/ |
H A D | zmumps_part2.F | 2555 INTEGER JPERM 6612 JPERM(K) = 0 6671 80 JPERM(JJ) = II 6675 JPERM(J) = I 6779 JPERM(J) = I 7321 JPERM(K) = 0 7348 K = JPERM(J) 7396 80 JPERM(JJ) = KK 7400 JPERM(J) = K 7544 JPERM(J) = ISP [all …]
|
H A D | cmumps_part2.F | 2555 INTEGER JPERM 6612 JPERM(K) = 0 6671 80 JPERM(JJ) = II 6675 JPERM(J) = I 6779 JPERM(J) = I 7321 JPERM(K) = 0 7348 K = JPERM(J) 7396 80 JPERM(JJ) = KK 7400 JPERM(J) = K 7544 JPERM(J) = ISP [all …]
|
H A D | dmumps_part2.F | 2556 INTEGER JPERM 6613 JPERM(K) = 0 6672 80 JPERM(JJ) = II 6676 JPERM(J) = I 6780 JPERM(J) = I 7322 JPERM(K) = 0 7349 K = JPERM(J) 7397 80 JPERM(JJ) = KK 7401 JPERM(J) = K 7545 JPERM(J) = ISP [all …]
|
H A D | smumps_part2.F | 2551 INTEGER JPERM 6608 JPERM(K) = 0 6667 80 JPERM(JJ) = II 6671 JPERM(J) = I 6775 JPERM(J) = I 7317 JPERM(K) = 0 7344 K = JPERM(J) 7392 80 JPERM(JJ) = KK 7396 JPERM(J) = K 7540 JPERM(J) = ISP [all …]
|
/dports/math/coinmumps/MUMPS_4.10.0/src/ |
H A D | cmumps_part2.F | 2555 INTEGER JPERM 6612 JPERM(K) = 0 6671 80 JPERM(JJ) = II 6675 JPERM(J) = I 6779 JPERM(J) = I 7321 JPERM(K) = 0 7348 K = JPERM(J) 7396 80 JPERM(JJ) = KK 7400 JPERM(J) = K 7544 JPERM(J) = ISP [all …]
|
H A D | dmumps_part2.F | 2556 INTEGER JPERM 6613 JPERM(K) = 0 6672 80 JPERM(JJ) = II 6676 JPERM(J) = I 6780 JPERM(J) = I 7322 JPERM(K) = 0 7349 K = JPERM(J) 7397 80 JPERM(JJ) = KK 7401 JPERM(J) = K 7545 JPERM(J) = ISP [all …]
|
H A D | smumps_part2.F | 2551 INTEGER JPERM local 6608 JPERM(K) = 0 6667 80 JPERM(JJ) = II 6671 JPERM(J) = I 6775 JPERM(J) = I 7317 JPERM(K) = 0 7344 K = JPERM(J) 7392 80 JPERM(JJ) = KK 7396 JPERM(J) = K 7540 JPERM(J) = ISP [all …]
|
H A D | zmumps_part2.F | 2555 INTEGER JPERM 6612 JPERM(K) = 0 6671 80 JPERM(JJ) = II 6675 JPERM(J) = I 6779 JPERM(J) = I 7321 JPERM(K) = 0 7348 K = JPERM(J) 7396 80 JPERM(JJ) = KK 7400 JPERM(J) = K 7544 JPERM(J) = ISP [all …]
|
/dports/math/mumps4/MUMPS_4.10.0/src/ |
H A D | cmumps_part2.F | 2555 INTEGER JPERM local 6612 JPERM(K) = 0 6671 80 JPERM(JJ) = II 6675 JPERM(J) = I 6779 JPERM(J) = I 7321 JPERM(K) = 0 7348 K = JPERM(J) 7396 80 JPERM(JJ) = KK 7400 JPERM(J) = K 7544 JPERM(J) = ISP [all …]
|
H A D | dmumps_part2.F | 2551 INTEGER JPERM local 6608 JPERM(K) = 0 6667 80 JPERM(JJ) = II 6671 JPERM(J) = I 6775 JPERM(J) = I 7317 JPERM(K) = 0 7344 K = JPERM(J) 7392 80 JPERM(JJ) = KK 7396 JPERM(J) = K 7540 JPERM(J) = ISP [all …]
|
H A D | zmumps_part2.F | 2555 INTEGER JPERM local 6612 JPERM(K) = 0 6671 80 JPERM(JJ) = II 6675 JPERM(J) = I 6779 JPERM(J) = I 7321 JPERM(K) = 0 7348 K = JPERM(J) 7396 80 JPERM(JJ) = KK 7400 JPERM(J) = K 7544 JPERM(J) = ISP [all …]
|
H A D | smumps_part2.F | 2551 INTEGER JPERM local 6608 JPERM(K) = 0 6667 80 JPERM(JJ) = II 6671 JPERM(J) = I 6775 JPERM(J) = I 7317 JPERM(K) = 0 7344 K = JPERM(J) 7392 80 JPERM(JJ) = KK 7396 JPERM(J) = K 7540 JPERM(J) = ISP [all …]
|