Home
last modified time | relevance | path

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

/dports/math/mumps/mumps-5.1.2/src/
H A Dcana_aux_par.F866 INTEGER(8), POINTER :: LVARPT(:) local
881 nullify(MYLIST, LVARPT,
971 CALL MUMPS_I8REALLOC(LVARPT, TOTNCLIQUES+1, id%INFO,
975 LVARPT(1) = 1_8
980 LVARPT(ICLIQUES+1) = LVARPT(ICLIQUES)+LENG(I)
982 LSTVAR(LVARPT(ICLIQUES)+J) =
992 LVARPT(ICLIQUES+1) = LVARPT(ICLIQUES)+K
1167 & TMP1, LVARPT, MEMCNT=MEMCNT)
1209 INTEGER(8) :: LVARPT(:) local
1232 DO INNZ=LVARPT(I), LVARPT(I+1)-1
[all …]
H A Ddana_aux_par.F866 INTEGER(8), POINTER :: LVARPT(:) local
881 nullify(MYLIST, LVARPT,
971 CALL MUMPS_I8REALLOC(LVARPT, TOTNCLIQUES+1, id%INFO,
975 LVARPT(1) = 1_8
980 LVARPT(ICLIQUES+1) = LVARPT(ICLIQUES)+LENG(I)
982 LSTVAR(LVARPT(ICLIQUES)+J) =
992 LVARPT(ICLIQUES+1) = LVARPT(ICLIQUES)+K
1167 & TMP1, LVARPT, MEMCNT=MEMCNT)
1209 INTEGER(8) :: LVARPT(:) local
1232 DO INNZ=LVARPT(I), LVARPT(I+1)-1
[all …]
H A Dzana_aux_par.F866 INTEGER(8), POINTER :: LVARPT(:) local
881 nullify(MYLIST, LVARPT,
971 CALL MUMPS_I8REALLOC(LVARPT, TOTNCLIQUES+1, id%INFO,
975 LVARPT(1) = 1_8
980 LVARPT(ICLIQUES+1) = LVARPT(ICLIQUES)+LENG(I)
982 LSTVAR(LVARPT(ICLIQUES)+J) =
992 LVARPT(ICLIQUES+1) = LVARPT(ICLIQUES)+K
1167 & TMP1, LVARPT, MEMCNT=MEMCNT)
1209 INTEGER(8) :: LVARPT(:) local
1232 DO INNZ=LVARPT(I), LVARPT(I+1)-1
[all …]
H A Dsana_aux_par.F866 INTEGER(8), POINTER :: LVARPT(:) local
881 nullify(MYLIST, LVARPT,
971 CALL MUMPS_I8REALLOC(LVARPT, TOTNCLIQUES+1, id%INFO,
975 LVARPT(1) = 1_8
980 LVARPT(ICLIQUES+1) = LVARPT(ICLIQUES)+LENG(I)
982 LSTVAR(LVARPT(ICLIQUES)+J) =
992 LVARPT(ICLIQUES+1) = LVARPT(ICLIQUES)+K
1167 & TMP1, LVARPT, MEMCNT=MEMCNT)
1209 INTEGER(8) :: LVARPT(:) local
1232 DO INNZ=LVARPT(I), LVARPT(I+1)-1
[all …]
/dports/math/ipopt/Ipopt-3.12.13/ThirdParty/Mumps/MUMPS/src/
H A Dzmumps_part2.F5208 & MYNVAR(:), LVARPT(:),
5226 nullify(NROOTS, MYLIST, MYNVAR, LVARPT, DISPLS,
5316 LVARPT => NEXT
5356 CALL MUMPS_733(LVARPT, NCLIQUES+1, id%INFO,
5360 CALL MUMPS_733(LVARPT, 2, id%INFO,
5391 LVARPT(1) = 1
5393 LVARPT(I) = LVARPT(I-1) + LVARPT(I)
5409 NEXT => LVARPT
5589 & LVARPT, MEMCNT=MEMCNT)
5653 DO J=LVARPT(I), LVARPT(I+1)-1
[all …]
H A Dcmumps_part2.F5208 & MYNVAR(:), LVARPT(:),
5226 nullify(NROOTS, MYLIST, MYNVAR, LVARPT, DISPLS,
5316 LVARPT => NEXT
5356 CALL MUMPS_733(LVARPT, NCLIQUES+1, id%INFO,
5360 CALL MUMPS_733(LVARPT, 2, id%INFO,
5391 LVARPT(1) = 1
5393 LVARPT(I) = LVARPT(I-1) + LVARPT(I)
5409 NEXT => LVARPT
5589 & LVARPT, MEMCNT=MEMCNT)
5653 DO J=LVARPT(I), LVARPT(I+1)-1
[all …]
H A Ddmumps_part2.F5209 & MYNVAR(:), LVARPT(:),
5227 nullify(NROOTS, MYLIST, MYNVAR, LVARPT, DISPLS,
5317 LVARPT => NEXT
5357 CALL MUMPS_733(LVARPT, NCLIQUES+1, id%INFO,
5361 CALL MUMPS_733(LVARPT, 2, id%INFO,
5392 LVARPT(1) = 1
5394 LVARPT(I) = LVARPT(I-1) + LVARPT(I)
5410 NEXT => LVARPT
5590 & LVARPT, MEMCNT=MEMCNT)
5654 DO J=LVARPT(I), LVARPT(I+1)-1
[all …]
H A Dsmumps_part2.F5204 & MYNVAR(:), LVARPT(:),
5222 nullify(NROOTS, MYLIST, MYNVAR, LVARPT, DISPLS,
5312 LVARPT => NEXT
5352 CALL MUMPS_733(LVARPT, NCLIQUES+1, id%INFO,
5356 CALL MUMPS_733(LVARPT, 2, id%INFO,
5387 LVARPT(1) = 1
5389 LVARPT(I) = LVARPT(I-1) + LVARPT(I)
5405 NEXT => LVARPT
5585 & LVARPT, MEMCNT=MEMCNT)
5649 DO J=LVARPT(I), LVARPT(I+1)-1
[all …]
/dports/math/coinmumps/MUMPS_4.10.0/src/
H A Dcmumps_part2.F5208 & MYNVAR(:), LVARPT(:),
5226 nullify(NROOTS, MYLIST, MYNVAR, LVARPT, DISPLS,
5316 LVARPT => NEXT
5356 CALL MUMPS_733(LVARPT, NCLIQUES+1, id%INFO,
5360 CALL MUMPS_733(LVARPT, 2, id%INFO,
5391 LVARPT(1) = 1
5393 LVARPT(I) = LVARPT(I-1) + LVARPT(I)
5409 NEXT => LVARPT
5589 & LVARPT, MEMCNT=MEMCNT)
5653 DO J=LVARPT(I), LVARPT(I+1)-1
[all …]
H A Ddmumps_part2.F5209 & MYNVAR(:), LVARPT(:),
5227 nullify(NROOTS, MYLIST, MYNVAR, LVARPT, DISPLS,
5317 LVARPT => NEXT
5357 CALL MUMPS_733(LVARPT, NCLIQUES+1, id%INFO,
5361 CALL MUMPS_733(LVARPT, 2, id%INFO,
5392 LVARPT(1) = 1
5394 LVARPT(I) = LVARPT(I-1) + LVARPT(I)
5410 NEXT => LVARPT
5590 & LVARPT, MEMCNT=MEMCNT)
5654 DO J=LVARPT(I), LVARPT(I+1)-1
[all …]
H A Dsmumps_part2.F5204 & MYNVAR(:), LVARPT(:), local
5222 nullify(NROOTS, MYLIST, MYNVAR, LVARPT, DISPLS,
5312 LVARPT => NEXT
5352 CALL MUMPS_733(LVARPT, NCLIQUES+1, id%INFO,
5356 CALL MUMPS_733(LVARPT, 2, id%INFO,
5387 LVARPT(1) = 1
5389 LVARPT(I) = LVARPT(I-1) + LVARPT(I)
5405 NEXT => LVARPT
5585 & LVARPT, MEMCNT=MEMCNT)
5649 DO J=LVARPT(I), LVARPT(I+1)-1
[all …]
H A Dzmumps_part2.F5208 & MYNVAR(:), LVARPT(:),
5226 nullify(NROOTS, MYLIST, MYNVAR, LVARPT, DISPLS,
5316 LVARPT => NEXT
5356 CALL MUMPS_733(LVARPT, NCLIQUES+1, id%INFO,
5360 CALL MUMPS_733(LVARPT, 2, id%INFO,
5391 LVARPT(1) = 1
5393 LVARPT(I) = LVARPT(I-1) + LVARPT(I)
5409 NEXT => LVARPT
5589 & LVARPT, MEMCNT=MEMCNT)
5653 DO J=LVARPT(I), LVARPT(I+1)-1
[all …]
/dports/math/mumps4/MUMPS_4.10.0/src/
H A Dcmumps_part2.F5208 & MYNVAR(:), LVARPT(:), local
5226 nullify(NROOTS, MYLIST, MYNVAR, LVARPT, DISPLS,
5316 LVARPT => NEXT
5356 CALL MUMPS_733(LVARPT, NCLIQUES+1, id%INFO,
5360 CALL MUMPS_733(LVARPT, 2, id%INFO,
5391 LVARPT(1) = 1
5393 LVARPT(I) = LVARPT(I-1) + LVARPT(I)
5409 NEXT => LVARPT
5589 & LVARPT, MEMCNT=MEMCNT)
5653 DO J=LVARPT(I), LVARPT(I+1)-1
[all …]
H A Ddmumps_part2.F5204 & MYNVAR(:), LVARPT(:), local
5222 nullify(NROOTS, MYLIST, MYNVAR, LVARPT, DISPLS,
5312 LVARPT => NEXT
5352 CALL MUMPS_733(LVARPT, NCLIQUES+1, id%INFO,
5356 CALL MUMPS_733(LVARPT, 2, id%INFO,
5387 LVARPT(1) = 1
5389 LVARPT(I) = LVARPT(I-1) + LVARPT(I)
5405 NEXT => LVARPT
5585 & LVARPT, MEMCNT=MEMCNT)
5649 DO J=LVARPT(I), LVARPT(I+1)-1
[all …]
H A Dzmumps_part2.F5208 & MYNVAR(:), LVARPT(:), local
5226 nullify(NROOTS, MYLIST, MYNVAR, LVARPT, DISPLS,
5316 LVARPT => NEXT
5356 CALL MUMPS_733(LVARPT, NCLIQUES+1, id%INFO,
5360 CALL MUMPS_733(LVARPT, 2, id%INFO,
5391 LVARPT(1) = 1
5393 LVARPT(I) = LVARPT(I-1) + LVARPT(I)
5409 NEXT => LVARPT
5589 & LVARPT, MEMCNT=MEMCNT)
5653 DO J=LVARPT(I), LVARPT(I+1)-1
[all …]
H A Dsmumps_part2.F5204 & MYNVAR(:), LVARPT(:), local
5222 nullify(NROOTS, MYLIST, MYNVAR, LVARPT, DISPLS,
5312 LVARPT => NEXT
5352 CALL MUMPS_733(LVARPT, NCLIQUES+1, id%INFO,
5356 CALL MUMPS_733(LVARPT, 2, id%INFO,
5387 LVARPT(1) = 1
5389 LVARPT(I) = LVARPT(I-1) + LVARPT(I)
5405 NEXT => LVARPT
5585 & LVARPT, MEMCNT=MEMCNT)
5649 DO J=LVARPT(I), LVARPT(I+1)-1
[all …]