Home
last modified time | relevance | path

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

/dports/math/mumps/mumps-5.1.2/src/
H A Dsfac_mem_compress_cb.F33 &(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 Dzfac_mem_compress_cb.F33 &(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 Dcfac_mem_compress_cb.F33 &(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 Ddfac_mem_compress_cb.F33 &(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 Dcmumps_part4.F4411 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 Ddmumps_part4.F4411 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 Dzmumps_part4.F4411 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 Dsmumps_part4.F4411 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 Ddmumps_part4.F4411 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 Dsmumps_part4.F4411 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 Dzmumps_part4.F4411 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 Dcmumps_part4.F4411 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 Dcmumps_part4.F4411 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 Ddmumps_part4.F4411 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 Dzmumps_part4.F4411 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 Dsmumps_part4.F4411 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 …]