/dports/math/mumps/mumps-5.1.2/src/ |
H A D | sfac_mem_compress_cb.F | 33 &(IW,LIW,IXXP,ICURRENT,NEXT, RCURRENT,ISIZE2SHIFT) argument 36 INTEGER(8) :: RCURRENT local 42 RCURRENT = RCURRENT - RSIZE 97 INTEGER(8) :: RCURRENT local 114 RCURRENT = LA+1_8 136 RBEGCONTIG=RCURRENT+RCURRENT_SIZE-1_8 140 IF (PTRAST(STEP(INODE)).EQ.RCURRENT) 206 RBEG2SHIFT = RCURRENT + FREE_IN_REC 244 RCURRENT = RCURRENT - RCURRENT_SIZE 292 INTEGER(8) :: LA, RCURRENT local [all …]
|
H A D | zfac_mem_compress_cb.F | 33 &(IW,LIW,IXXP,ICURRENT,NEXT, RCURRENT,ISIZE2SHIFT) argument 36 INTEGER(8) :: RCURRENT local 42 RCURRENT = RCURRENT - RSIZE 97 INTEGER(8) :: RCURRENT local 114 RCURRENT = LA+1_8 136 RBEGCONTIG=RCURRENT+RCURRENT_SIZE-1_8 140 IF (PTRAST(STEP(INODE)).EQ.RCURRENT) 206 RBEG2SHIFT = RCURRENT + FREE_IN_REC 244 RCURRENT = RCURRENT - RCURRENT_SIZE 292 INTEGER(8) :: LA, RCURRENT local [all …]
|
H A D | cfac_mem_compress_cb.F | 33 &(IW,LIW,IXXP,ICURRENT,NEXT, RCURRENT,ISIZE2SHIFT) argument 36 INTEGER(8) :: RCURRENT local 42 RCURRENT = RCURRENT - RSIZE 97 INTEGER(8) :: RCURRENT local 114 RCURRENT = LA+1_8 136 RBEGCONTIG=RCURRENT+RCURRENT_SIZE-1_8 140 IF (PTRAST(STEP(INODE)).EQ.RCURRENT) 206 RBEG2SHIFT = RCURRENT + FREE_IN_REC 244 RCURRENT = RCURRENT - RCURRENT_SIZE 292 INTEGER(8) :: LA, RCURRENT local [all …]
|
H A D | dfac_mem_compress_cb.F | 33 &(IW,LIW,IXXP,ICURRENT,NEXT, RCURRENT,ISIZE2SHIFT) argument 36 INTEGER(8) :: RCURRENT local 42 RCURRENT = RCURRENT - RSIZE 97 INTEGER(8) :: RCURRENT local 114 RCURRENT = LA+1_8 136 RBEGCONTIG=RCURRENT+RCURRENT_SIZE-1_8 140 IF (PTRAST(STEP(INODE)).EQ.RCURRENT) 206 RBEG2SHIFT = RCURRENT + FREE_IN_REC 244 RCURRENT = RCURRENT - RCURRENT_SIZE 292 INTEGER(8) :: LA, RCURRENT local [all …]
|
/dports/math/ipopt/Ipopt-3.12.13/ThirdParty/Mumps/MUMPS/src/ |
H A D | cmumps_part4.F | 4411 INTEGER(8) :: RCURRENT 4417 RCURRENT = RCURRENT - RSIZE 4469 INTEGER(8) :: RCURRENT 4482 RCURRENT = LA+1_8 4560 CALL CMUMPS_627(A,LA,RCURRENT, 4566 CALL CMUMPS_627(A,LA,RCURRENT, 4573 RBEG2SHIFT = RCURRENT + FREE_IN_REC 4611 RCURRENT = RCURRENT - RCURRENT_SIZE 4650 SUBROUTINE CMUMPS_627(A, LA, RCURRENT, argument 4656 INTEGER(8) :: LA, RCURRENT [all …]
|
H A D | dmumps_part4.F | 4411 INTEGER(8) :: RCURRENT 4417 RCURRENT = RCURRENT - RSIZE 4469 INTEGER(8) :: RCURRENT 4482 RCURRENT = LA+1_8 4560 CALL DMUMPS_627(A,LA,RCURRENT, 4566 CALL DMUMPS_627(A,LA,RCURRENT, 4573 RBEG2SHIFT = RCURRENT + FREE_IN_REC 4611 RCURRENT = RCURRENT - RCURRENT_SIZE 4650 SUBROUTINE DMUMPS_627(A, LA, RCURRENT, argument 4656 INTEGER(8) :: LA, RCURRENT [all …]
|
H A D | zmumps_part4.F | 4411 INTEGER(8) :: RCURRENT 4417 RCURRENT = RCURRENT - RSIZE 4469 INTEGER(8) :: RCURRENT 4482 RCURRENT = LA+1_8 4560 CALL ZMUMPS_627(A,LA,RCURRENT, 4566 CALL ZMUMPS_627(A,LA,RCURRENT, 4573 RBEG2SHIFT = RCURRENT + FREE_IN_REC 4611 RCURRENT = RCURRENT - RCURRENT_SIZE 4650 SUBROUTINE ZMUMPS_627(A, LA, RCURRENT, argument 4656 INTEGER(8) :: LA, RCURRENT [all …]
|
H A D | smumps_part4.F | 4411 INTEGER(8) :: RCURRENT 4417 RCURRENT = RCURRENT - RSIZE 4469 INTEGER(8) :: RCURRENT 4482 RCURRENT = LA+1_8 4560 CALL SMUMPS_627(A,LA,RCURRENT, 4566 CALL SMUMPS_627(A,LA,RCURRENT, 4573 RBEG2SHIFT = RCURRENT + FREE_IN_REC 4611 RCURRENT = RCURRENT - RCURRENT_SIZE 4650 SUBROUTINE SMUMPS_627(A, LA, RCURRENT, argument 4656 INTEGER(8) :: LA, RCURRENT [all …]
|
/dports/math/coinmumps/MUMPS_4.10.0/src/ |
H A D | dmumps_part4.F | 4411 INTEGER(8) :: RCURRENT 4417 RCURRENT = RCURRENT - RSIZE 4469 INTEGER(8) :: RCURRENT 4482 RCURRENT = LA+1_8 4560 CALL DMUMPS_627(A,LA,RCURRENT, 4566 CALL DMUMPS_627(A,LA,RCURRENT, 4573 RBEG2SHIFT = RCURRENT + FREE_IN_REC 4611 RCURRENT = RCURRENT - RCURRENT_SIZE 4650 SUBROUTINE DMUMPS_627(A, LA, RCURRENT, argument 4656 INTEGER(8) :: LA, RCURRENT [all …]
|
H A D | smumps_part4.F | 4411 INTEGER(8) :: RCURRENT local 4417 RCURRENT = RCURRENT - RSIZE 4469 INTEGER(8) :: RCURRENT local 4482 RCURRENT = LA+1_8 4560 CALL SMUMPS_627(A,LA,RCURRENT, 4566 CALL SMUMPS_627(A,LA,RCURRENT, 4573 RBEG2SHIFT = RCURRENT + FREE_IN_REC 4611 RCURRENT = RCURRENT - RCURRENT_SIZE 4650 SUBROUTINE SMUMPS_627(A, LA, RCURRENT, argument 4656 INTEGER(8) :: LA, RCURRENT local [all …]
|
H A D | zmumps_part4.F | 4411 INTEGER(8) :: RCURRENT 4417 RCURRENT = RCURRENT - RSIZE 4469 INTEGER(8) :: RCURRENT 4482 RCURRENT = LA+1_8 4560 CALL ZMUMPS_627(A,LA,RCURRENT, 4566 CALL ZMUMPS_627(A,LA,RCURRENT, 4573 RBEG2SHIFT = RCURRENT + FREE_IN_REC 4611 RCURRENT = RCURRENT - RCURRENT_SIZE 4650 SUBROUTINE ZMUMPS_627(A, LA, RCURRENT, argument 4656 INTEGER(8) :: LA, RCURRENT [all …]
|
H A D | cmumps_part4.F | 4411 INTEGER(8) :: RCURRENT local 4417 RCURRENT = RCURRENT - RSIZE 4469 INTEGER(8) :: RCURRENT local 4482 RCURRENT = LA+1_8 4560 CALL CMUMPS_627(A,LA,RCURRENT, 4566 CALL CMUMPS_627(A,LA,RCURRENT, 4573 RBEG2SHIFT = RCURRENT + FREE_IN_REC 4611 RCURRENT = RCURRENT - RCURRENT_SIZE 4650 SUBROUTINE CMUMPS_627(A, LA, RCURRENT, argument 4656 INTEGER(8) :: LA, RCURRENT local [all …]
|
/dports/math/mumps4/MUMPS_4.10.0/src/ |
H A D | cmumps_part4.F | 4411 INTEGER(8) :: RCURRENT local 4417 RCURRENT = RCURRENT - RSIZE 4469 INTEGER(8) :: RCURRENT local 4482 RCURRENT = LA+1_8 4560 CALL CMUMPS_627(A,LA,RCURRENT, 4566 CALL CMUMPS_627(A,LA,RCURRENT, 4573 RBEG2SHIFT = RCURRENT + FREE_IN_REC 4611 RCURRENT = RCURRENT - RCURRENT_SIZE 4650 SUBROUTINE CMUMPS_627(A, LA, RCURRENT, argument 4656 INTEGER(8) :: LA, RCURRENT local [all …]
|
H A D | dmumps_part4.F | 4411 INTEGER(8) :: RCURRENT local 4417 RCURRENT = RCURRENT - RSIZE 4469 INTEGER(8) :: RCURRENT local 4482 RCURRENT = LA+1_8 4560 CALL DMUMPS_627(A,LA,RCURRENT, 4566 CALL DMUMPS_627(A,LA,RCURRENT, 4573 RBEG2SHIFT = RCURRENT + FREE_IN_REC 4611 RCURRENT = RCURRENT - RCURRENT_SIZE 4650 SUBROUTINE DMUMPS_627(A, LA, RCURRENT, argument 4656 INTEGER(8) :: LA, RCURRENT local [all …]
|
H A D | zmumps_part4.F | 4411 INTEGER(8) :: RCURRENT local 4417 RCURRENT = RCURRENT - RSIZE 4469 INTEGER(8) :: RCURRENT local 4482 RCURRENT = LA+1_8 4560 CALL ZMUMPS_627(A,LA,RCURRENT, 4566 CALL ZMUMPS_627(A,LA,RCURRENT, 4573 RBEG2SHIFT = RCURRENT + FREE_IN_REC 4611 RCURRENT = RCURRENT - RCURRENT_SIZE 4650 SUBROUTINE ZMUMPS_627(A, LA, RCURRENT, argument 4656 INTEGER(8) :: LA, RCURRENT local [all …]
|
H A D | smumps_part4.F | 4411 INTEGER(8) :: RCURRENT local 4417 RCURRENT = RCURRENT - RSIZE 4469 INTEGER(8) :: RCURRENT local 4482 RCURRENT = LA+1_8 4560 CALL SMUMPS_627(A,LA,RCURRENT, 4566 CALL SMUMPS_627(A,LA,RCURRENT, 4573 RBEG2SHIFT = RCURRENT + FREE_IN_REC 4611 RCURRENT = RCURRENT - RCURRENT_SIZE 4650 SUBROUTINE SMUMPS_627(A, LA, RCURRENT, argument 4656 INTEGER(8) :: LA, RCURRENT local [all …]
|