/dports/math/mumps/mumps-5.1.2/src/ |
H A D | csol_fwd_aux.F | 21 & PTRICB, argument 42 INTEGER PTRICB(KEEP(28)),PTRIST(KEEP(28)) local 90 PTRICB(STEP(FINODE)) = -1 102 PTRICB(STEP(FINODE)) = NCB + 1 138 PTRICB(STEP(FINODE)) = PTRICB(STEP(FINODE)) - LONG 244 PTRICB(STEP(FINODE)) = NCB + 1 287 PTRICB(STEP(FINODE)) = 288 & PTRICB(STEP(FINODE)) - NCV 1126 PTRICB(STEP(INODE)) = NCB + 1 1169 PTRICB(STEP( INODE )) = PTRICB(STEP( INODE )) - NUPDATE [all …]
|
H A D | dsol_fwd_aux.F | 21 & PTRICB, argument 42 INTEGER PTRICB(KEEP(28)),PTRIST(KEEP(28)) local 90 PTRICB(STEP(FINODE)) = -1 102 PTRICB(STEP(FINODE)) = NCB + 1 138 PTRICB(STEP(FINODE)) = PTRICB(STEP(FINODE)) - LONG 244 PTRICB(STEP(FINODE)) = NCB + 1 287 PTRICB(STEP(FINODE)) = 288 & PTRICB(STEP(FINODE)) - NCV 1124 PTRICB(STEP(INODE)) = NCB + 1 1167 PTRICB(STEP( INODE )) = PTRICB(STEP( INODE )) - NUPDATE [all …]
|
H A D | ssol_fwd_aux.F | 21 & PTRICB, argument 42 INTEGER PTRICB(KEEP(28)),PTRIST(KEEP(28)) local 90 PTRICB(STEP(FINODE)) = -1 102 PTRICB(STEP(FINODE)) = NCB + 1 138 PTRICB(STEP(FINODE)) = PTRICB(STEP(FINODE)) - LONG 244 PTRICB(STEP(FINODE)) = NCB + 1 287 PTRICB(STEP(FINODE)) = 288 & PTRICB(STEP(FINODE)) - NCV 1124 PTRICB(STEP(INODE)) = NCB + 1 1167 PTRICB(STEP( INODE )) = PTRICB(STEP( INODE )) - NUPDATE [all …]
|
H A D | zsol_fwd_aux.F | 21 & PTRICB, argument 42 INTEGER PTRICB(KEEP(28)),PTRIST(KEEP(28)) local 90 PTRICB(STEP(FINODE)) = -1 102 PTRICB(STEP(FINODE)) = NCB + 1 138 PTRICB(STEP(FINODE)) = PTRICB(STEP(FINODE)) - LONG 244 PTRICB(STEP(FINODE)) = NCB + 1 287 PTRICB(STEP(FINODE)) = 288 & PTRICB(STEP(FINODE)) - NCV 1126 PTRICB(STEP(INODE)) = NCB + 1 1169 PTRICB(STEP( INODE )) = PTRICB(STEP( INODE )) - NUPDATE [all …]
|
H A D | dsol_fwd.F | 15 & PTRICB, IWCB, LIWCB, argument 50 INTEGER PTRICB( KEEP(28) ) local 85 PTRICB = 0 118 & PTRICB, INFO, KEEP,KEEP8, DKEEP, STEP, 139 & PTRICB, PTRIST, PTRFAC, PROCNODE_STEPS,
|
H A D | ssol_fwd.F | 15 & PTRICB, IWCB, LIWCB, argument 50 INTEGER PTRICB( KEEP(28) ) local 85 PTRICB = 0 118 & PTRICB, INFO, KEEP,KEEP8, DKEEP, STEP, 139 & PTRICB, PTRIST, PTRFAC, PROCNODE_STEPS,
|
H A D | csol_fwd.F | 15 & PTRICB, IWCB, LIWCB, argument 50 INTEGER PTRICB( KEEP(28) ) local 85 PTRICB = 0 118 & PTRICB, INFO, KEEP,KEEP8, DKEEP, STEP, 139 & PTRICB, PTRIST, PTRFAC, PROCNODE_STEPS,
|
H A D | zsol_fwd.F | 15 & PTRICB, IWCB, LIWCB, argument 50 INTEGER PTRICB( KEEP(28) ) local 85 PTRICB = 0 118 & PTRICB, INFO, KEEP,KEEP8, DKEEP, STEP, 139 & PTRICB, PTRIST, PTRFAC, PROCNODE_STEPS,
|
H A D | csol_bwd_aux.F | 19 & IIPOOL, NBFINF, PTRICB, PTRACB, INFO, argument 47 INTEGER PTRICB(KEEP(28)), STEP( N ), FILS( N ) local 228 & POSWCB, POSIWCB, PTRICB, PTRACB) 328 & POSWCB, POSIWCB, PTRICB, PTRACB) 399 & IIPOOL, NBFINF, PTRICB, PTRACB, INFO, 516 & POSWCB, POSIWCB, PTRICB, PTRACB) 531 PTRICB(STEP( INODE )) = POSIWCB + 1 862 IWCB( PTRICB(STEP(INODE)) + 1 ) = 0 865 & POSWCB, POSIWCB, PTRICB, PTRACB) 955 IWCB( PTRICB(STEP( INODE )) + 1 ) = 0 [all …]
|
H A D | dsol_bwd_aux.F | 19 & IIPOOL, NBFINF, PTRICB, PTRACB, INFO, argument 47 INTEGER PTRICB(KEEP(28)), STEP( N ), FILS( N ) local 226 & POSWCB, POSIWCB, PTRICB, PTRACB) 326 & POSWCB, POSIWCB, PTRICB, PTRACB) 397 & IIPOOL, NBFINF, PTRICB, PTRACB, INFO, 514 & POSWCB, POSIWCB, PTRICB, PTRACB) 529 PTRICB(STEP( INODE )) = POSIWCB + 1 860 IWCB( PTRICB(STEP(INODE)) + 1 ) = 0 863 & POSWCB, POSIWCB, PTRICB, PTRACB) 953 IWCB( PTRICB(STEP( INODE )) + 1 ) = 0 [all …]
|
H A D | ssol_bwd_aux.F | 19 & IIPOOL, NBFINF, PTRICB, PTRACB, INFO, argument 47 INTEGER PTRICB(KEEP(28)), STEP( N ), FILS( N ) local 226 & POSWCB, POSIWCB, PTRICB, PTRACB) 326 & POSWCB, POSIWCB, PTRICB, PTRACB) 397 & IIPOOL, NBFINF, PTRICB, PTRACB, INFO, 514 & POSWCB, POSIWCB, PTRICB, PTRACB) 529 PTRICB(STEP( INODE )) = POSIWCB + 1 860 IWCB( PTRICB(STEP(INODE)) + 1 ) = 0 863 & POSWCB, POSIWCB, PTRICB, PTRACB) 953 IWCB( PTRICB(STEP( INODE )) + 1 ) = 0 [all …]
|
H A D | zsol_bwd_aux.F | 19 & IIPOOL, NBFINF, PTRICB, PTRACB, INFO, argument 47 INTEGER PTRICB(KEEP(28)), STEP( N ), FILS( N ) local 228 & POSWCB, POSIWCB, PTRICB, PTRACB) 328 & POSWCB, POSIWCB, PTRICB, PTRACB) 399 & IIPOOL, NBFINF, PTRICB, PTRACB, INFO, 516 & POSWCB, POSIWCB, PTRICB, PTRACB) 531 PTRICB(STEP( INODE )) = POSIWCB + 1 862 IWCB( PTRICB(STEP(INODE)) + 1 ) = 0 865 & POSWCB, POSIWCB, PTRICB, PTRACB) 955 IWCB( PTRICB(STEP( INODE )) + 1 ) = 0 [all …]
|
H A D | csol_bwd.F | 16 & PTRICB, PTRACB, IWCB, LIWW, W2, argument 46 & PTRICB(KEEP(28)) local 185 & IIPOOL, NBFINF, PTRICB, PTRACB, INFO, 385 & POSWCB, POSIWCB, PTRICB, PTRACB) 400 PTRICB(STEP( INODE )) = POSIWCB + 1 504 IWCB( PTRICB(STEP( INODE )) + 1 ) = 0 506 & POSWCB,POSIWCB,PTRICB,PTRACB) 583 PTRICB(STEP( INODE )) = POSIWCB + 1 586 IWCB( PTRICB(STEP( INODE )) + 1 ) = 1 1183 IWCB(PTRICB(STEP(INODE))+1) = IWCB(PTRICB(STEP(INODE))+1)-1 [all …]
|
H A D | dsol_bwd.F | 16 & PTRICB, PTRACB, IWCB, LIWW, W2, argument 46 & PTRICB(KEEP(28)) local 183 & IIPOOL, NBFINF, PTRICB, PTRACB, INFO, 383 & POSWCB, POSIWCB, PTRICB, PTRACB) 398 PTRICB(STEP( INODE )) = POSIWCB + 1 502 IWCB( PTRICB(STEP( INODE )) + 1 ) = 0 504 & POSWCB,POSIWCB,PTRICB,PTRACB) 581 PTRICB(STEP( INODE )) = POSIWCB + 1 584 IWCB( PTRICB(STEP( INODE )) + 1 ) = 1 1181 IWCB(PTRICB(STEP(INODE))+1) = IWCB(PTRICB(STEP(INODE))+1)-1 [all …]
|
H A D | ssol_bwd.F | 16 & PTRICB, PTRACB, IWCB, LIWW, W2, argument 46 & PTRICB(KEEP(28)) local 183 & IIPOOL, NBFINF, PTRICB, PTRACB, INFO, 383 & POSWCB, POSIWCB, PTRICB, PTRACB) 398 PTRICB(STEP( INODE )) = POSIWCB + 1 502 IWCB( PTRICB(STEP( INODE )) + 1 ) = 0 504 & POSWCB,POSIWCB,PTRICB,PTRACB) 581 PTRICB(STEP( INODE )) = POSIWCB + 1 584 IWCB( PTRICB(STEP( INODE )) + 1 ) = 1 1181 IWCB(PTRICB(STEP(INODE))+1) = IWCB(PTRICB(STEP(INODE))+1)-1 [all …]
|
H A D | zsol_bwd.F | 16 & PTRICB, PTRACB, IWCB, LIWW, W2, argument 46 & PTRICB(KEEP(28)) local 185 & IIPOOL, NBFINF, PTRICB, PTRACB, INFO, 385 & POSWCB, POSIWCB, PTRICB, PTRACB) 400 PTRICB(STEP( INODE )) = POSIWCB + 1 504 IWCB( PTRICB(STEP( INODE )) + 1 ) = 0 506 & POSWCB,POSIWCB,PTRICB,PTRACB) 583 PTRICB(STEP( INODE )) = POSIWCB + 1 586 IWCB( PTRICB(STEP( INODE )) + 1 ) = 1 1183 IWCB(PTRICB(STEP(INODE))+1) = IWCB(PTRICB(STEP(INODE))+1)-1 [all …]
|
/dports/math/ipopt/Ipopt-3.12.13/ThirdParty/Mumps/MUMPS/src/ |
H A D | zmumps_part8.F | 3296 PTRICB = NSTK_S + KEEP(28) 3297 PTRACB = PTRICB + KEEP(28) 3568 & IW1(PTRICB), IWCB, LIWW, 4785 & PTRICB, IWCB, LIWCB, 4818 INTEGER PTRICB( KEEP(28) ) 4845 PTRICB = 0 4918 & PTRICB, 5007 PTRICB(STEP(FINODE)) = PTRICB(STEP(FINODE)) - LONG 5108 PTRICB(STEP(FINODE)) = 5646 PTRICB(STEP( INODE )) = PTRICB(STEP( INODE )) - NUPDATE [all …]
|
H A D | cmumps_part8.F | 3296 PTRICB = NSTK_S + KEEP(28) 3297 PTRACB = PTRICB + KEEP(28) 3568 & IW1(PTRICB), IWCB, LIWW, 4785 & PTRICB, IWCB, LIWCB, 4818 INTEGER PTRICB( KEEP(28) ) 4845 PTRICB = 0 4918 & PTRICB, 5007 PTRICB(STEP(FINODE)) = PTRICB(STEP(FINODE)) - LONG 5108 PTRICB(STEP(FINODE)) = 5646 PTRICB(STEP( INODE )) = PTRICB(STEP( INODE )) - NUPDATE [all …]
|
H A D | smumps_part8.F | 3296 PTRICB = NSTK_S + KEEP(28) 3297 PTRACB = PTRICB + KEEP(28) 3568 & IW1(PTRICB), IWCB, LIWW, 4785 & PTRICB, IWCB, LIWCB, 4818 INTEGER PTRICB( KEEP(28) ) 4845 PTRICB = 0 4918 & PTRICB, 5007 PTRICB(STEP(FINODE)) = PTRICB(STEP(FINODE)) - LONG 5108 PTRICB(STEP(FINODE)) = 5644 PTRICB(STEP( INODE )) = PTRICB(STEP( INODE )) - NUPDATE [all …]
|
H A D | dmumps_part8.F | 3296 PTRICB = NSTK_S + KEEP(28) 3297 PTRACB = PTRICB + KEEP(28) 3568 & IW1(PTRICB), IWCB, LIWW, 4785 & PTRICB, IWCB, LIWCB, 4818 INTEGER PTRICB( KEEP(28) ) 4845 PTRICB = 0 4918 & PTRICB, 5007 PTRICB(STEP(FINODE)) = PTRICB(STEP(FINODE)) - LONG 5108 PTRICB(STEP(FINODE)) = 5644 PTRICB(STEP( INODE )) = PTRICB(STEP( INODE )) - NUPDATE [all …]
|
/dports/math/coinmumps/MUMPS_4.10.0/src/ |
H A D | cmumps_part8.F | 3296 PTRICB = NSTK_S + KEEP(28) 3297 PTRACB = PTRICB + KEEP(28) 3568 & IW1(PTRICB), IWCB, LIWW, 4785 & PTRICB, IWCB, LIWCB, 4818 INTEGER PTRICB( KEEP(28) ) 4845 PTRICB = 0 4918 & PTRICB, 5007 PTRICB(STEP(FINODE)) = PTRICB(STEP(FINODE)) - LONG 5108 PTRICB(STEP(FINODE)) = 5646 PTRICB(STEP( INODE )) = PTRICB(STEP( INODE )) - NUPDATE [all …]
|
H A D | dmumps_part8.F | 3296 PTRICB = NSTK_S + KEEP(28) 3297 PTRACB = PTRICB + KEEP(28) 3568 & IW1(PTRICB), IWCB, LIWW, 4785 & PTRICB, IWCB, LIWCB, 4818 INTEGER PTRICB( KEEP(28) ) 4845 PTRICB = 0 4918 & PTRICB, 5007 PTRICB(STEP(FINODE)) = PTRICB(STEP(FINODE)) - LONG 5108 PTRICB(STEP(FINODE)) = 5644 PTRICB(STEP( INODE )) = PTRICB(STEP( INODE )) - NUPDATE [all …]
|
H A D | zmumps_part8.F | 3296 PTRICB = NSTK_S + KEEP(28) 3297 PTRACB = PTRICB + KEEP(28) 3568 & IW1(PTRICB), IWCB, LIWW, 4785 & PTRICB, IWCB, LIWCB, 4818 INTEGER PTRICB( KEEP(28) ) 4845 PTRICB = 0 4918 & PTRICB, 5007 PTRICB(STEP(FINODE)) = PTRICB(STEP(FINODE)) - LONG 5108 PTRICB(STEP(FINODE)) = 5646 PTRICB(STEP( INODE )) = PTRICB(STEP( INODE )) - NUPDATE [all …]
|
H A D | smumps_part8.F | 3296 PTRICB = NSTK_S + KEEP(28) 3297 PTRACB = PTRICB + KEEP(28) 3568 & IW1(PTRICB), IWCB, LIWW, 4785 & PTRICB, IWCB, LIWCB, 4818 INTEGER PTRICB( KEEP(28) ) 4845 PTRICB = 0 4918 & PTRICB, 5007 PTRICB(STEP(FINODE)) = PTRICB(STEP(FINODE)) - LONG 5108 PTRICB(STEP(FINODE)) = 5644 PTRICB(STEP( INODE )) = PTRICB(STEP( INODE )) - NUPDATE [all …]
|
/dports/math/mumps4/MUMPS_4.10.0/src/ |
H A D | zmumps_part8.F | 3296 PTRICB = NSTK_S + KEEP(28) 3297 PTRACB = PTRICB + KEEP(28) 3568 & IW1(PTRICB), IWCB, LIWW, 4785 & PTRICB, IWCB, LIWCB, argument 4818 INTEGER PTRICB( KEEP(28) ) local 4845 PTRICB = 0 4918 & PTRICB, argument 5007 PTRICB(STEP(FINODE)) = PTRICB(STEP(FINODE)) - LONG 5108 PTRICB(STEP(FINODE)) = 5646 PTRICB(STEP( INODE )) = PTRICB(STEP( INODE )) - NUPDATE [all …]
|