Home
last modified time | relevance | path

Searched refs:itask (Results 1 – 21 of 21) sorted by relevance

/phasta/phSolver/common/
H A Dctypes.f33 do itask = 1,numtask
104 & MPI_LONG_LONG_INT, sevsegtype(itask,16), ierr)
107 & MPI_DOUBLE_PRECISION, sevsegtype(itask,1), ierr)
114 call MPI_TYPE_HVECTOR(nsd, 1, lstride, sevsegtype(itask,1),
115 & sevsegtype(itask,2), ierr)
117 call MPI_TYPE_HVECTOR(ndof, 1, lstride, sevsegtype(itask,1),
118 & sevsegtype(itask,3), ierr)
121 & sevsegtype(itask,1),sevsegtype(itask,4), ierr)
123 & sevsegtype(itask,1),sevsegtype(itask,5), ierr)
124 call MPI_TYPE_HVECTOR(nflow,1,lstride,sevsegtype(itask,1),
[all …]
H A DcommuInt.f98 DO itask = 1, numtask
114 call MPI_ISEND(global(isgbeg, 1), 1, sevsegtype(itask,kdof),
121 call MPI_IRECV(global(isgbeg, 1), 1, sevsegtype(itask,kdof),
149 call MPI_ISEND(global(isgbeg, 1), 1, sevsegtype(itask,kdof),
H A Dcommu.f137 DO itask = 1, numtask
159 call MPI_ISEND(global(isgbeg, 1), 1, sevsegtype(itask,kdof),
178 call MPI_IRECV(global(isgbeg, 1), 1, sevsegtype(itask,kdof),
228 call MPI_ISEND(global(isgbeg, 1), 1, sevsegtype(itask,kdof),
H A Dgetvel.f50 do itask = 1, numtask
H A Dgetdmc.f223 do itask = 1, numtask
H A Dbardmc.f395 do itask = 1, numtask
/phasta/AcuStat/src/
H A Dctypes.f35 do itask = 1,numtask
106 & MPI_DOUBLE_PRECISION, sevsegtype(itask,1), ierr)
113 call MPI_TYPE_HVECTOR(nsd, 1, lstride, sevsegtype(itask,1),
114 & sevsegtype(itask,2), ierr)
116 call MPI_TYPE_HVECTOR(ndof, 1, lstride, sevsegtype(itask,1),
117 & sevsegtype(itask,3), ierr)
120 & sevsegtype(itask,1),sevsegtype(itask,4), ierr)
122 & sevsegtype(itask,1),sevsegtype(itask,5), ierr)
123 call MPI_TYPE_HVECTOR(nflow,1,lstride,sevsegtype(itask,1),
124 & sevsegtype(itask,6), ierr)
[all …]
H A DcommuMax.f134 DO itask = 1, numtask
152 call MPI_ISEND(global(isgbeg, 1), 1, sevsegtype(itask,kdof),
163 call MPI_IRECV(global(isgbeg, 1), 1, sevsegtype(itask,kdof),
197 call MPI_ISEND(global(isgbeg, 1), 1, sevsegtype(itask,kdof),
/phasta/M2NFixBnd/src/
H A Dctypes.f35 do itask = 1,numtask
106 & MPI_DOUBLE_PRECISION, sevsegtype(itask,1), ierr)
113 call MPI_TYPE_HVECTOR(nsd, 1, lstride, sevsegtype(itask,1),
114 & sevsegtype(itask,2), ierr)
116 call MPI_TYPE_HVECTOR(ndof, 1, lstride, sevsegtype(itask,1),
117 & sevsegtype(itask,3), ierr)
120 & sevsegtype(itask,1),sevsegtype(itask,4), ierr)
122 & sevsegtype(itask,1),sevsegtype(itask,5), ierr)
123 call MPI_TYPE_HVECTOR(nflow,1,lstride,sevsegtype(itask,1),
124 & sevsegtype(itask,6), ierr)
[all …]
H A DcommuMax.f135 DO itask = 1, numtask
153 call MPI_ISEND(global(isgbeg, 1), 1, sevsegtype(itask,kdof),
164 call MPI_IRECV(global(isgbeg, 1), 1, sevsegtype(itask,kdof),
198 call MPI_ISEND(global(isgbeg, 1), 1, sevsegtype(itask,kdof),
/phasta/M2N/src/
H A Dctypes.f34 do itask = 1,numtask
105 & MPI_DOUBLE_PRECISION, sevsegtype(itask,1), ierr)
112 call MPI_TYPE_HVECTOR(nsd, 1, lstride, sevsegtype(itask,1),
113 & sevsegtype(itask,2), ierr)
115 call MPI_TYPE_HVECTOR(ndof, 1, lstride, sevsegtype(itask,1),
116 & sevsegtype(itask,3), ierr)
119 & sevsegtype(itask,1),sevsegtype(itask,4), ierr)
121 & sevsegtype(itask,1),sevsegtype(itask,5), ierr)
122 call MPI_TYPE_HVECTOR(nflow,1,lstride,sevsegtype(itask,1),
123 & sevsegtype(itask,6), ierr)
[all …]
H A Dcommu.f131 DO itask = 1, numtask
149 call MPI_ISEND(global(isgbeg, 1), 1, sevsegtype(itask,kdof),
160 call MPI_IRECV(global(isgbeg, 1), 1, sevsegtype(itask,kdof),
194 call MPI_ISEND(global(isgbeg, 1), 1, sevsegtype(itask,kdof),
/phasta/phSolver/common/test/
H A DphIOreadIlwork.cc77 for(int itask=0;itask<numtask;itask++) { in main() local
111 for(int itask=0;itask<numtask;itask++) { in main() local
123 …printf("Communication %d:\ttag %d\townership %d\trank %d\tnumseg %d\tnumvtx %d\n",itask,itag,iacc,… in main()
/phasta/phSolver/compressible/
H A Dau1gmr.f84 do itask = 1, numtask
180 do itask = 1, numtask
H A Dbc3res.f180 do itask = 1, numtask
271 do itask = 1, numtask
H A Dsparseap.f117 do itask = 1, numtask
H A Dbc3bdg.f363 do itask = 1, numtask
453 do itask = 1, numtask
/phasta/phSolver/incompressible/
H A Dbc3per.f44 do itask = 1, numtask
H A DadvLES.f633 do itask = 1, numtask
746 do itask = 1, numtask
1171 do itask = 1, numtask
1522 do itask = 1, numtask
1958 do itask = 1, numtask
2271 do itask = 1, numtask
2705 do itask = 1, numtask
3451 do itask = 1, numtask
H A Dfilters.f1155 do itask = 1, numtask
1890 do itask = 1, numtask
2631 do itask = 1, numtask
/phasta/phSolver/AMG/
H A Dramg_paratools.f656 integer :: tasknnztot,itask,amgseg local