Searched refs:next_task (Results 1 – 2 of 2) sorted by relevance
| /petsc/src/tao/leastsquares/tutorials/ |
| H A D | chwirut2.c | 115 PetscInt finishedtasks, next_task, checkedin; in EvaluateFunction() local
119 next_task = 0; in EvaluateFunction()
133 if (next_task < NOBSERVATIONS) { in EvaluateFunction()
134 …PetscCallMPI(MPI_Send(x, NPARAMETERS, MPIU_REAL, status.MPI_SOURCE, (PetscMPIInt)next_task, PETSC_… in EvaluateFunction()
135 next_task++; in EvaluateFunction()
|
| H A D | chwirut2f.F90 | 339 PetscMPIInt next_task
365 next_task = zero
384 if (next_task < m) then
386 PetscCallMPI(MPI_Send(x_v, nn, MPIU_SCALAR, source, next_task, PETSC_COMM_WORLD, ierr))
387 next_task = next_task + one
|