Home
last modified time | relevance | path

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

/dports/math/mumps/mumps-5.1.2/src/
H A Dcana_aux_par.F26 INTEGER, POINTER :: PERITAB(:) => null() component
80 ord%PERITAB => WORK1(id%N+1 : 2*id%N)
125 NULLIFY(ord%PERITAB)
469 ord%PERITAB(ord%PERMTAB(I)) = I
541 CALL MUMPS_REALLOC(ord%PERITAB, id%N, id%INFO,
579 CALL MPI_BCAST (ord%PERITAB(1), id%N, MPI_INTEGER,
1131 GLOB_IDX = ord%PERITAB(I+ord%FIRST(PROC+1)-1)
1140 GPE(GLOB_IDX) = -ord%PERITAB(-BUF_PE1(I)+
1194 GIDX = ord%PERITAB(J)
1603 MAPTAB(ord%PERITAB(J)) = I
[all …]
H A Ddana_aux_par.F26 INTEGER, POINTER :: PERITAB(:) => null() component
80 ord%PERITAB => WORK1(id%N+1 : 2*id%N)
125 NULLIFY(ord%PERITAB)
469 ord%PERITAB(ord%PERMTAB(I)) = I
541 CALL MUMPS_REALLOC(ord%PERITAB, id%N, id%INFO,
579 CALL MPI_BCAST (ord%PERITAB(1), id%N, MPI_INTEGER,
1131 GLOB_IDX = ord%PERITAB(I+ord%FIRST(PROC+1)-1)
1140 GPE(GLOB_IDX) = -ord%PERITAB(-BUF_PE1(I)+
1194 GIDX = ord%PERITAB(J)
1603 MAPTAB(ord%PERITAB(J)) = I
[all …]
H A Dzana_aux_par.F26 INTEGER, POINTER :: PERITAB(:) => null() component
80 ord%PERITAB => WORK1(id%N+1 : 2*id%N)
125 NULLIFY(ord%PERITAB)
469 ord%PERITAB(ord%PERMTAB(I)) = I
541 CALL MUMPS_REALLOC(ord%PERITAB, id%N, id%INFO,
579 CALL MPI_BCAST (ord%PERITAB(1), id%N, MPI_INTEGER,
1131 GLOB_IDX = ord%PERITAB(I+ord%FIRST(PROC+1)-1)
1140 GPE(GLOB_IDX) = -ord%PERITAB(-BUF_PE1(I)+
1194 GIDX = ord%PERITAB(J)
1603 MAPTAB(ord%PERITAB(J)) = I
[all …]
H A Dsana_aux_par.F26 INTEGER, POINTER :: PERITAB(:) => null() component
80 ord%PERITAB => WORK1(id%N+1 : 2*id%N)
125 NULLIFY(ord%PERITAB)
469 ord%PERITAB(ord%PERMTAB(I)) = I
541 CALL MUMPS_REALLOC(ord%PERITAB, id%N, id%INFO,
579 CALL MPI_BCAST (ord%PERITAB(1), id%N, MPI_INTEGER,
1131 GLOB_IDX = ord%PERITAB(I+ord%FIRST(PROC+1)-1)
1140 GPE(GLOB_IDX) = -ord%PERITAB(-BUF_PE1(I)+
1194 GIDX = ord%PERITAB(J)
1603 MAPTAB(ord%PERITAB(J)) = I
[all …]
/dports/math/ipopt/Ipopt-3.12.13/ThirdParty/Mumps/MUMPS/src/
H A Dzmumps_part2.F4288 INTEGER, POINTER :: PERITAB(:) => null() component
4339 ord%PERITAB => WORK1(id%N+1 : 2*id%N)
4393 NULLIFY(ord%PERITAB)
4671 CALL MUMPS_733(ord%PERITAB, id%N, id%INFO, LP,
4749 ord%PERITAB(ord%PERMTAB(I)) = I
4860 CALL MUMPS_733(ord%PERITAB, id%N, id%INFO,
4944 CALL MPI_BCAST (ord%PERITAB, id%N, MPI_INTEGER,
5550 GLOB_IDX = ord%PERITAB(I+ord%FIRST(PROC+1)-1)
5559 GPE(GLOB_IDX) = -ord%PERITAB(-BUF_PE1(I)+
5615 GIDX = ord%PERITAB(J)
[all …]
H A Dcmumps_part2.F4288 INTEGER, POINTER :: PERITAB(:) => null() component
4339 ord%PERITAB => WORK1(id%N+1 : 2*id%N)
4393 NULLIFY(ord%PERITAB)
4671 CALL MUMPS_733(ord%PERITAB, id%N, id%INFO, LP,
4749 ord%PERITAB(ord%PERMTAB(I)) = I
4860 CALL MUMPS_733(ord%PERITAB, id%N, id%INFO,
4944 CALL MPI_BCAST (ord%PERITAB, id%N, MPI_INTEGER,
5550 GLOB_IDX = ord%PERITAB(I+ord%FIRST(PROC+1)-1)
5559 GPE(GLOB_IDX) = -ord%PERITAB(-BUF_PE1(I)+
5615 GIDX = ord%PERITAB(J)
[all …]
H A Ddmumps_part2.F4289 INTEGER, POINTER :: PERITAB(:) => null() component
4340 ord%PERITAB => WORK1(id%N+1 : 2*id%N)
4394 NULLIFY(ord%PERITAB)
4672 CALL MUMPS_733(ord%PERITAB, id%N, id%INFO, LP,
4750 ord%PERITAB(ord%PERMTAB(I)) = I
4861 CALL MUMPS_733(ord%PERITAB, id%N, id%INFO,
4945 CALL MPI_BCAST (ord%PERITAB, id%N, MPI_INTEGER,
5551 GLOB_IDX = ord%PERITAB(I+ord%FIRST(PROC+1)-1)
5560 GPE(GLOB_IDX) = -ord%PERITAB(-BUF_PE1(I)+
5616 GIDX = ord%PERITAB(J)
[all …]
H A Dsmumps_part2.F4284 INTEGER, POINTER :: PERITAB(:) => null() component
4335 ord%PERITAB => WORK1(id%N+1 : 2*id%N)
4389 NULLIFY(ord%PERITAB)
4667 CALL MUMPS_733(ord%PERITAB, id%N, id%INFO, LP,
4745 ord%PERITAB(ord%PERMTAB(I)) = I
4856 CALL MUMPS_733(ord%PERITAB, id%N, id%INFO,
4940 CALL MPI_BCAST (ord%PERITAB, id%N, MPI_INTEGER,
5546 GLOB_IDX = ord%PERITAB(I+ord%FIRST(PROC+1)-1)
5555 GPE(GLOB_IDX) = -ord%PERITAB(-BUF_PE1(I)+
5611 GIDX = ord%PERITAB(J)
[all …]
/dports/math/coinmumps/MUMPS_4.10.0/src/
H A Dcmumps_part2.F4288 INTEGER, POINTER :: PERITAB(:) => null() component
4339 ord%PERITAB => WORK1(id%N+1 : 2*id%N)
4393 NULLIFY(ord%PERITAB)
4671 CALL MUMPS_733(ord%PERITAB, id%N, id%INFO, LP,
4749 ord%PERITAB(ord%PERMTAB(I)) = I
4860 CALL MUMPS_733(ord%PERITAB, id%N, id%INFO,
4944 CALL MPI_BCAST (ord%PERITAB, id%N, MPI_INTEGER,
5550 GLOB_IDX = ord%PERITAB(I+ord%FIRST(PROC+1)-1)
5559 GPE(GLOB_IDX) = -ord%PERITAB(-BUF_PE1(I)+
5615 GIDX = ord%PERITAB(J)
[all …]
H A Ddmumps_part2.F4289 INTEGER, POINTER :: PERITAB(:) => null() component
4340 ord%PERITAB => WORK1(id%N+1 : 2*id%N)
4394 NULLIFY(ord%PERITAB)
4672 CALL MUMPS_733(ord%PERITAB, id%N, id%INFO, LP,
4750 ord%PERITAB(ord%PERMTAB(I)) = I
4861 CALL MUMPS_733(ord%PERITAB, id%N, id%INFO,
4945 CALL MPI_BCAST (ord%PERITAB, id%N, MPI_INTEGER,
5551 GLOB_IDX = ord%PERITAB(I+ord%FIRST(PROC+1)-1)
5560 GPE(GLOB_IDX) = -ord%PERITAB(-BUF_PE1(I)+
5616 GIDX = ord%PERITAB(J)
[all …]
H A Dsmumps_part2.F4284 INTEGER, POINTER :: PERITAB(:) => null() component
4335 ord%PERITAB => WORK1(id%N+1 : 2*id%N)
4389 NULLIFY(ord%PERITAB)
4667 CALL MUMPS_733(ord%PERITAB, id%N, id%INFO, LP,
4745 ord%PERITAB(ord%PERMTAB(I)) = I
4856 CALL MUMPS_733(ord%PERITAB, id%N, id%INFO,
4940 CALL MPI_BCAST (ord%PERITAB, id%N, MPI_INTEGER,
5546 GLOB_IDX = ord%PERITAB(I+ord%FIRST(PROC+1)-1)
5555 GPE(GLOB_IDX) = -ord%PERITAB(-BUF_PE1(I)+
5611 GIDX = ord%PERITAB(J)
[all …]
H A Dzmumps_part2.F4288 INTEGER, POINTER :: PERITAB(:) => null() component
4339 ord%PERITAB => WORK1(id%N+1 : 2*id%N)
4393 NULLIFY(ord%PERITAB)
4671 CALL MUMPS_733(ord%PERITAB, id%N, id%INFO, LP,
4749 ord%PERITAB(ord%PERMTAB(I)) = I
4860 CALL MUMPS_733(ord%PERITAB, id%N, id%INFO,
4944 CALL MPI_BCAST (ord%PERITAB, id%N, MPI_INTEGER,
5550 GLOB_IDX = ord%PERITAB(I+ord%FIRST(PROC+1)-1)
5559 GPE(GLOB_IDX) = -ord%PERITAB(-BUF_PE1(I)+
5615 GIDX = ord%PERITAB(J)
[all …]
/dports/math/mumps4/MUMPS_4.10.0/src/
H A Dcmumps_part2.F4288 INTEGER, POINTER :: PERITAB(:) => null() component
4339 ord%PERITAB => WORK1(id%N+1 : 2*id%N)
4393 NULLIFY(ord%PERITAB)
4671 CALL MUMPS_733(ord%PERITAB, id%N, id%INFO, LP,
4749 ord%PERITAB(ord%PERMTAB(I)) = I
4860 CALL MUMPS_733(ord%PERITAB, id%N, id%INFO,
4944 CALL MPI_BCAST (ord%PERITAB, id%N, MPI_INTEGER,
5550 GLOB_IDX = ord%PERITAB(I+ord%FIRST(PROC+1)-1)
5559 GPE(GLOB_IDX) = -ord%PERITAB(-BUF_PE1(I)+
5615 GIDX = ord%PERITAB(J)
[all …]
H A Ddmumps_part2.F4284 INTEGER, POINTER :: PERITAB(:) => null() component
4335 ord%PERITAB => WORK1(id%N+1 : 2*id%N)
4389 NULLIFY(ord%PERITAB)
4667 CALL MUMPS_733(ord%PERITAB, id%N, id%INFO, LP,
4745 ord%PERITAB(ord%PERMTAB(I)) = I
4856 CALL MUMPS_733(ord%PERITAB, id%N, id%INFO,
4940 CALL MPI_BCAST (ord%PERITAB, id%N, MPI_INTEGER,
5546 GLOB_IDX = ord%PERITAB(I+ord%FIRST(PROC+1)-1)
5555 GPE(GLOB_IDX) = -ord%PERITAB(-BUF_PE1(I)+
5611 GIDX = ord%PERITAB(J)
[all …]
H A Dzmumps_part2.F4288 INTEGER, POINTER :: PERITAB(:) => null() component
4339 ord%PERITAB => WORK1(id%N+1 : 2*id%N)
4393 NULLIFY(ord%PERITAB)
4671 CALL MUMPS_733(ord%PERITAB, id%N, id%INFO, LP,
4749 ord%PERITAB(ord%PERMTAB(I)) = I
4860 CALL MUMPS_733(ord%PERITAB, id%N, id%INFO,
4944 CALL MPI_BCAST (ord%PERITAB, id%N, MPI_INTEGER,
5550 GLOB_IDX = ord%PERITAB(I+ord%FIRST(PROC+1)-1)
5559 GPE(GLOB_IDX) = -ord%PERITAB(-BUF_PE1(I)+
5615 GIDX = ord%PERITAB(J)
[all …]
H A Dsmumps_part2.F4284 INTEGER, POINTER :: PERITAB(:) => null() component
4335 ord%PERITAB => WORK1(id%N+1 : 2*id%N)
4389 NULLIFY(ord%PERITAB)
4667 CALL MUMPS_733(ord%PERITAB, id%N, id%INFO, LP,
4745 ord%PERITAB(ord%PERMTAB(I)) = I
4856 CALL MUMPS_733(ord%PERITAB, id%N, id%INFO,
4940 CALL MPI_BCAST (ord%PERITAB, id%N, MPI_INTEGER,
5546 GLOB_IDX = ord%PERITAB(I+ord%FIRST(PROC+1)-1)
5555 GPE(GLOB_IDX) = -ord%PERITAB(-BUF_PE1(I)+
5611 GIDX = ord%PERITAB(J)
[all …]