/dports/math/mumps/mumps-5.1.2/src/ |
H A D | cana_lr.F | 77 INTEGER :: METIS_IDX_SIZE local 131 CALL MUMPS_METIS_IDXSIZE(METIS_IDX_SIZE) 132 IF (METIS_IDX_SIZE .EQ. 64) THEN
|
H A D | zana_lr.F | 77 INTEGER :: METIS_IDX_SIZE local 131 CALL MUMPS_METIS_IDXSIZE(METIS_IDX_SIZE) 132 IF (METIS_IDX_SIZE .EQ. 64) THEN
|
H A D | dana_lr.F | 77 INTEGER :: METIS_IDX_SIZE local 131 CALL MUMPS_METIS_IDXSIZE(METIS_IDX_SIZE) 132 IF (METIS_IDX_SIZE .EQ. 64) THEN
|
H A D | sana_lr.F | 77 INTEGER :: METIS_IDX_SIZE local 131 CALL MUMPS_METIS_IDXSIZE(METIS_IDX_SIZE) 132 IF (METIS_IDX_SIZE .EQ. 64) THEN
|
H A D | cana_aux_ELT.F | 52 INTEGER :: OPT_METIS_SIZE, METIS_IDX_SIZE local 260 CALL MUMPS_METIS_IDXSIZE(METIS_IDX_SIZE) 261 IF (KEEP(10).EQ.1.AND.METIS_IDX_SIZE.NE.64) THEN 266 IF (METIS_IDX_SIZE .EQ. 32) THEN 275 ELSE IF (METIS_IDX_SIZE .EQ. 64) THEN 288 & METIS_IDX_SIZE
|
H A D | zana_aux_ELT.F | 52 INTEGER :: OPT_METIS_SIZE, METIS_IDX_SIZE local 260 CALL MUMPS_METIS_IDXSIZE(METIS_IDX_SIZE) 261 IF (KEEP(10).EQ.1.AND.METIS_IDX_SIZE.NE.64) THEN 266 IF (METIS_IDX_SIZE .EQ. 32) THEN 275 ELSE IF (METIS_IDX_SIZE .EQ. 64) THEN 288 & METIS_IDX_SIZE
|
H A D | sana_aux_ELT.F | 52 INTEGER :: OPT_METIS_SIZE, METIS_IDX_SIZE local 260 CALL MUMPS_METIS_IDXSIZE(METIS_IDX_SIZE) 261 IF (KEEP(10).EQ.1.AND.METIS_IDX_SIZE.NE.64) THEN 266 IF (METIS_IDX_SIZE .EQ. 32) THEN 275 ELSE IF (METIS_IDX_SIZE .EQ. 64) THEN 288 & METIS_IDX_SIZE
|
H A D | dana_aux_ELT.F | 52 INTEGER :: OPT_METIS_SIZE, METIS_IDX_SIZE local 260 CALL MUMPS_METIS_IDXSIZE(METIS_IDX_SIZE) 261 IF (KEEP(10).EQ.1.AND.METIS_IDX_SIZE.NE.64) THEN 266 IF (METIS_IDX_SIZE .EQ. 32) THEN 275 ELSE IF (METIS_IDX_SIZE .EQ. 64) THEN 288 & METIS_IDX_SIZE
|
H A D | cana_aux.F | 51 INTEGER METIS_IDX_SIZE local 539 CALL MUMPS_METIS_IDXSIZE(METIS_IDX_SIZE) 575 IF (METIS_IDX_SIZE .EQ.32) THEN 580 ELSE IF (METIS_IDX_SIZE .EQ.64) THEN 588 & METIS_IDX_SIZE 592 IF (METIS_IDX_SIZE .EQ.32) THEN 597 ELSE IF (METIS_IDX_SIZE .EQ.64) THEN 605 & METIS_IDX_SIZE 615 IF (METIS_IDX_SIZE .EQ. 32) THEN 620 ELSE IF (METIS_IDX_SIZE .EQ. 64) THEN [all …]
|
H A D | dana_aux.F | 51 INTEGER METIS_IDX_SIZE local 539 CALL MUMPS_METIS_IDXSIZE(METIS_IDX_SIZE) 575 IF (METIS_IDX_SIZE .EQ.32) THEN 580 ELSE IF (METIS_IDX_SIZE .EQ.64) THEN 588 & METIS_IDX_SIZE 592 IF (METIS_IDX_SIZE .EQ.32) THEN 597 ELSE IF (METIS_IDX_SIZE .EQ.64) THEN 605 & METIS_IDX_SIZE 615 IF (METIS_IDX_SIZE .EQ. 32) THEN 620 ELSE IF (METIS_IDX_SIZE .EQ. 64) THEN [all …]
|
H A D | zana_aux.F | 51 INTEGER METIS_IDX_SIZE local 539 CALL MUMPS_METIS_IDXSIZE(METIS_IDX_SIZE) 575 IF (METIS_IDX_SIZE .EQ.32) THEN 580 ELSE IF (METIS_IDX_SIZE .EQ.64) THEN 588 & METIS_IDX_SIZE 592 IF (METIS_IDX_SIZE .EQ.32) THEN 597 ELSE IF (METIS_IDX_SIZE .EQ.64) THEN 605 & METIS_IDX_SIZE 615 IF (METIS_IDX_SIZE .EQ. 32) THEN 620 ELSE IF (METIS_IDX_SIZE .EQ. 64) THEN [all …]
|
H A D | sana_aux.F | 51 INTEGER METIS_IDX_SIZE local 539 CALL MUMPS_METIS_IDXSIZE(METIS_IDX_SIZE) 575 IF (METIS_IDX_SIZE .EQ.32) THEN 580 ELSE IF (METIS_IDX_SIZE .EQ.64) THEN 588 & METIS_IDX_SIZE 592 IF (METIS_IDX_SIZE .EQ.32) THEN 597 ELSE IF (METIS_IDX_SIZE .EQ.64) THEN 605 & METIS_IDX_SIZE 615 IF (METIS_IDX_SIZE .EQ. 32) THEN 620 ELSE IF (METIS_IDX_SIZE .EQ. 64) THEN [all …]
|
H A D | cana_aux_par.F | 377 INTEGER :: I, MYID, NPROCS, IERR, BASE, METIS_IDX_SIZE local 421 CALL MUMPS_METIS_IDXSIZE(METIS_IDX_SIZE) 422 IF (METIS_IDX_SIZE.EQ.32) THEN 431 ELSE IF (METIS_IDX_SIZE.EQ.64) THEN 439 & METIS_IDX_SIZE
|
H A D | dana_aux_par.F | 377 INTEGER :: I, MYID, NPROCS, IERR, BASE, METIS_IDX_SIZE local 421 CALL MUMPS_METIS_IDXSIZE(METIS_IDX_SIZE) 422 IF (METIS_IDX_SIZE.EQ.32) THEN 431 ELSE IF (METIS_IDX_SIZE.EQ.64) THEN 439 & METIS_IDX_SIZE
|
H A D | zana_aux_par.F | 377 INTEGER :: I, MYID, NPROCS, IERR, BASE, METIS_IDX_SIZE local 421 CALL MUMPS_METIS_IDXSIZE(METIS_IDX_SIZE) 422 IF (METIS_IDX_SIZE.EQ.32) THEN 431 ELSE IF (METIS_IDX_SIZE.EQ.64) THEN 439 & METIS_IDX_SIZE
|
H A D | sana_aux_par.F | 377 INTEGER :: I, MYID, NPROCS, IERR, BASE, METIS_IDX_SIZE local 421 CALL MUMPS_METIS_IDXSIZE(METIS_IDX_SIZE) 422 IF (METIS_IDX_SIZE.EQ.32) THEN 431 ELSE IF (METIS_IDX_SIZE.EQ.64) THEN 439 & METIS_IDX_SIZE
|