Home
last modified time | relevance | path

Searched refs:tag (Results 1 – 25 of 85) sorted by relevance

1234

/petsc/src/dm/tutorials/output/
H A Dswarm_ex1_6.out26 [0] >>>>> ( 0 units :: tag = 1) >>>>> [1]
27 [0] >>>>> ( 0 units :: tag = 2) >>>>> [2]
28 [0] >>>>> ( 0 units :: tag = 3) >>>>> [3]
29 [0] <<<<< ( 1 units :: tag = 4) <<<<< [1]
30 [0] <<<<< ( 1 units :: tag = 8) <<<<< [2]
31 [0] <<<<< ( 2 units :: tag = 12) <<<<< [3]
32 [1] >>>>> ( 1 units :: tag = 4) >>>>> [0]
33 [1] <<<<< ( 0 units :: tag = 1) <<<<< [0]
34 [2] >>>>> ( 1 units :: tag = 8) >>>>> [0]
35 [2] <<<<< ( 0 units :: tag = 2) <<<<< [0]
[all …]
H A Dswarm_ex1_8.out24 [0] >>>>> ( 308 units :: tag = 3) >>>>> [3]
25 [0] <<<<< ( 2820 units :: tag = 12) <<<<< [3]
26 [1] >>>>> ( 1256 units :: tag = 6) >>>>> [2]
27 [1] <<<<< ( 1972 units :: tag = 9) <<<<< [2]
28 [2] >>>>> ( 1972 units :: tag = 9) >>>>> [1]
29 [2] <<<<< ( 1256 units :: tag = 6) <<<<< [1]
30 [3] >>>>> ( 2820 units :: tag = 12) >>>>> [0]
31 [3] <<<<< ( 308 units :: tag = 3) <<<<< [0]
H A Dswarm_ex1_7.out115 [0] >>>>> ( 0 units :: tag = 1 ) >>>>> [1]
116 [0] >>>>> ( 0 units :: tag = 2 ) >>>>> [2]
117 [0] >>>>> ( 0 units :: tag = 3 ) >>>>> [3]
118 [0] <<<<< ( 0 units :: tag = 4 ) <<<<< [1]
119 [0] <<<<< ( 0 units :: tag = 8 ) <<<<< [2]
120 [0] <<<<< ( 0 units :: tag = 12 ) <<<<< [3]
122 [1] >>>>> ( 0 units :: tag = 4 ) >>>>> [0]
123 [1] >>>>> ( 0 units :: tag = 6 ) >>>>> [2]
124 [1] >>>>> ( 0 units :: tag = 7 ) >>>>> [3]
125 [1] <<<<< ( 0 units :: tag = 1 ) <<<<< [0]
[all …]
/petsc/src/sys/yaml/src/
H A Dloader.c373 yaml_char_t *tag = event->data.scalar.tag; in yaml_parser_load_scalar() local
377 if (!tag || strcmp((char *)tag, "!") == 0) { in yaml_parser_load_scalar()
378 yaml_free(tag); in yaml_parser_load_scalar()
379 tag = yaml_strdup((yaml_char_t *)YAML_DEFAULT_SCALAR_TAG); in yaml_parser_load_scalar()
380 if (!tag) goto error; in yaml_parser_load_scalar()
383 SCALAR_NODE_INIT(node, tag, event->data.scalar.value, in yaml_parser_load_scalar()
397 yaml_free(tag); in yaml_parser_load_scalar()
418 yaml_char_t *tag = event->data.sequence_start.tag; in yaml_parser_load_sequence() local
422 if (!tag || strcmp((char *)tag, "!") == 0) { in yaml_parser_load_sequence()
423 yaml_free(tag); in yaml_parser_load_sequence()
[all …]
H A Dparser.c536 yaml_char_t *tag = NULL; in yaml_parser_parse_node() local
566 tag_handle = token->data.tag.handle; in yaml_parser_parse_node()
567 tag_suffix = token->data.tag.suffix; in yaml_parser_parse_node()
577 tag_handle = token->data.tag.handle; in yaml_parser_parse_node()
578 tag_suffix = token->data.tag.suffix; in yaml_parser_parse_node()
596 tag = tag_suffix; in yaml_parser_parse_node()
608 tag = YAML_MALLOC(prefix_len+suffix_len+1); in yaml_parser_parse_node()
609 if (!tag) { in yaml_parser_parse_node()
613 memcpy(tag, tag_directive->prefix, prefix_len); in yaml_parser_parse_node()
614 memcpy(tag+prefix_len, tag_suffix, suffix_len); in yaml_parser_parse_node()
[all …]
/petsc/src/sys/utils/
H A Dmpimesg.c92 PetscMPIInt size, rank, tag, i, j; in PetscGatherMessageLengths() local
99 PetscCall(PetscCommGetNewTag(comm, &tag)); in PetscGatherMessageLengths()
107 … i++) PetscCallMPI(MPIU_Irecv((*olengths) + i, 1, MPI_INT, MPI_ANY_SOURCE, tag, comm, r_waits + i)… in PetscGatherMessageLengths()
112 PetscCallMPI(MPIU_Isend((void *)(ilengths + i), 1, MPI_INT, i, tag, comm, s_waits + j)); in PetscGatherMessageLengths()
170 PetscMPIInt size, rank, tag, i, j; in PetscGatherMessageLengths_Private() local
177 PetscCall(PetscCommGetNewTag(comm, &tag)); in PetscGatherMessageLengths_Private()
185 …i++) PetscCallMPI(MPIU_Irecv((*olengths) + i, 1, MPIU_INT, MPI_ANY_SOURCE, tag, comm, r_waits + i)… in PetscGatherMessageLengths_Private()
190 PetscCallMPI(MPIU_Isend((void *)(ilengths + i), 1, MPIU_INT, i, tag, comm, s_waits + j)); in PetscGatherMessageLengths_Private()
241 PetscMPIInt size, tag, i, j, *buf_s, *buf_r, *buf_j = NULL; in PetscGatherMessageLengths2() local
247 PetscCall(PetscCommGetNewTag(comm, &tag)); in PetscGatherMessageLengths2()
[all …]
H A Dmpits.c75 PetscMPIInt nrecvs, tag, done, i; in PetscCommBuildTwoSided_Ibarrier() local
83 PetscCall(PetscCommDuplicate(comm, &comm, &tag)); in PetscCommBuildTwoSided_Ibarrier()
88 …_Issend((void *)(tdata + count * unitbytes * i), count, dtype, toranks[i], tag, comm, sendreqs + i… in PetscCommBuildTwoSided_Ibarrier()
100 PetscCallMPI(MPI_Iprobe(MPI_ANY_SOURCE, tag, comm, &flag, &status)); in PetscCommBuildTwoSided_Ibarrier()
107 PetscCallMPI(MPI_Recv(buf, count, dtype, status.MPI_SOURCE, tag, comm, MPI_STATUS_IGNORE)); in PetscCommBuildTwoSided_Ibarrier()
135 PetscMPIInt size, rank, *iflags, nrecvs, tag, *franks, i, flg; in PetscCommBuildTwoSided_Allreduce() local
145 PetscCall(PetscCommDuplicate(comm, &comm, &tag)); in PetscCommBuildTwoSided_Allreduce()
164 …Irecv((void *)(fdata + count * unitbytes * i), count, dtype, MPI_ANY_SOURCE, tag, comm, reqs + i)); in PetscCommBuildTwoSided_Allreduce()
165 …U_Isend((void *)(tdata + count * unitbytes * i), count, dtype, toranks[i], tag, comm, sendreqs + i… in PetscCommBuildTwoSided_Allreduce()
181 PetscMPIInt size, *iflags, nrecvs, tag, *franks, i, flg; in PetscCommBuildTwoSided_RedScatter() local
[all …]
H A Dmpiu.c10 PetscMPIInt rank, size, tag = 0; in PetscSequentialPhaseBegin_Private() local
17 if (rank) PetscCallMPI(MPI_Recv(NULL, 0, MPI_INT, rank - 1, tag, comm, &status)); in PetscSequentialPhaseBegin_Private()
19 … % ng) < ng - 1 && rank != size - 1) PetscCallMPI(MPI_Send(NULL, 0, MPI_INT, rank + 1, tag, comm)); in PetscSequentialPhaseBegin_Private()
25 PetscMPIInt rank, size, tag = 0; in PetscSequentialPhaseEnd_Private() local
34 …ng - 1 || rank == size - 1) PetscCallMPI(MPI_Send(NULL, 0, MPI_INT, (rank + 1) % size, tag, comm)); in PetscSequentialPhaseEnd_Private()
35 if (rank == 0) PetscCallMPI(MPI_Recv(NULL, 0, MPI_INT, size - 1, tag, comm, &status)); in PetscSequentialPhaseEnd_Private()
/petsc/src/sys/tests/
H A Dex55.py10 comm.Send([data, MPI.INT], dest=1, tag=77)
13 comm.Recv([data, MPI.INT], source=0, tag=77)
18 comm.Send(data, dest=1, tag=13)
21 comm.Recv(data, source=0, tag=13)
H A Dex8.c50 static PetscErrorCode FSend(MPI_Comm comm, const PetscMPIInt tag[], PetscMPIInt tonum, PetscMPIInt … in FSend() argument
57 PetscCallMPI(MPI_Isend(&fctx->todata[tonum].rank, 1, MPIU_INT, rank, tag[0], comm, &req[0])); in FSend()
58 PetscCallMPI(MPI_Isend(&fctx->todata[tonum].value, 1, MPIU_SCALAR, rank, tag[1], comm, &req[1])); in FSend()
62 static PetscErrorCode FRecv(MPI_Comm comm, const PetscMPIInt tag[], PetscMPIInt rank, void *fromdat… in FRecv() argument
70 PetscCallMPI(MPI_Irecv(&buf->rank, 1, MPIU_INT, rank, tag[0], comm, &req[0])); in FRecv()
71 PetscCallMPI(MPI_Irecv(&buf->value, 1, MPIU_SCALAR, rank, tag[1], comm, &req[1])); in FRecv()
/petsc/src/sys/objects/
H A Dtagm.c36 PetscErrorCode PetscObjectGetNewTag(PetscObject obj, PetscMPIInt *tag) in PetscObjectGetNewTag() argument
39 PetscCall(PetscCommGetNewTag(obj->comm, tag)); in PetscObjectGetNewTag()
63 PetscErrorCode PetscCommGetNewTag(MPI_Comm comm, PetscMPIInt *tag) in PetscCommGetNewTag() argument
69 PetscAssertPointer(tag, 2); in PetscCommGetNewTag()
74 if (counter->tag < 1) { in PetscCommGetNewTag()
78 …counter->tag = *maxval - 128; /* hope that any still active tags were issued right at the beginnin… in PetscCommGetNewTag()
81 *tag = counter->tag--; in PetscCommGetNewTag()
223 counter->tag = *maxval; in PetscCommDuplicate()
253 if (counter->tag < 1) { in PetscCommDuplicate()
257 …counter->tag = *maxval - 128; /* hope that any still active tags were issued right at the beginnin… in PetscCommDuplicate()
[all …]
/petsc/include/petsc/mpiuni/
H A Dmpi.h414 …est, tag, comm) (MPIUNI_ARG(buf), MPIUNI_ARG(count), MPIUN… argument
416 …rce, tag, comm, status) (MPIUNI_ARG(buf), MPIUNI_ARG(count), MPIUNI_… argument
419 …dest, tag, comm) (MPIUNI_ARG(buf), MPIUNI_ARG(count), MPIUN… argument
420 …dest, tag, comm) (MPIUNI_ARG(buf), MPIUNI_ARG(count), MPIUN… argument
421 …dest, tag, comm) (MPIUNI_ARG(buf), MPIUNI_ARG(count), MPIUN… argument
424 …dest, tag, comm, request) (MPIUNI_ARG(buf), MPIUNI_ARG(count), MPIUNI… argument
425 …dest, tag, comm, request) (MPIUNI_ARG(buf), MPIUNI_ARG(count), MPIUNI… argument
426 …dest, tag, comm, request) (MPIUNI_ARG(buf), MPIUNI_ARG(count), MPIUNI… argument
428 …urce, tag, comm, request) (MPIUNI_ARG(buf), MPIUNI_ARG(count), MPIUNI_… argument
430 …dest, tag, comm, request) (MPIUNI_ARG(buf), MPIUNI_ARG(count), MPIUN… argument
[all …]
/petsc/src/ts/tutorials/autodiff/adolc-utils/
H A Ddrivers.cxx31 PetscErrorCode PetscAdolcComputeRHSJacobian(PetscInt tag, Mat A, const PetscScalar *u_vec, PetscCtx… in PetscAdolcComputeRHSJacobian() argument
39 if (adctx->Seed) fov_forward(tag, m, n, p, u_vec, adctx->Seed, NULL, J); in PetscAdolcComputeRHSJacobian()
40 else jacobian(tag, m, n, u_vec, J); in PetscAdolcComputeRHSJacobian()
69 PetscErrorCode PetscAdolcComputeRHSJacobianLocal(PetscInt tag, Mat A, const PetscScalar *u_vec, Pet… in PetscAdolcComputeRHSJacobianLocal() argument
77 if (adctx->Seed) fov_forward(tag, m, n, p, u_vec, adctx->Seed, NULL, J); in PetscAdolcComputeRHSJacobianLocal()
78 else jacobian(tag, m, n, u_vec, J); in PetscAdolcComputeRHSJacobianLocal()
168 PetscErrorCode PetscAdolcComputeIJacobianIDMass(PetscInt tag, Mat A, PetscScalar *u_vec, PetscReal … in PetscAdolcComputeIJacobianIDMass() argument
178 if (adctx->Seed) fov_forward(tag, m, n, p, u_vec, adctx->Seed, NULL, J); in PetscAdolcComputeIJacobianIDMass()
179 else jacobian(tag, m, n, u_vec, J); in PetscAdolcComputeIJacobianIDMass()
272 PetscErrorCode PetscAdolcComputeIJacobianLocalIDMass(PetscInt tag, Mat A, const PetscScalar *u_vec,… in PetscAdolcComputeIJacobianLocalIDMass() argument
[all …]
/petsc/src/dm/impls/moab/
H A Ddmmbvec.cxx38 PetscErrorCode DMMoabCreateVector(DM dm, moab::Tag tag, const moab::Range *range, PetscBool is_glob… in DMMoabCreateVector() argument
41 …PetscCheck(tag || (range && !range->empty()), PETSC_COMM_SELF, PETSC_ERR_ARG_WRONG, "Both tag and … in DMMoabCreateVector()
43 PetscCall(DMCreateVector_Moab_Private(dm, tag, range, is_global_vec, destroy_tag, vec)); in DMMoabCreateVector()
60 PetscErrorCode DMMoabGetVecTag(Vec vec, moab::Tag *tag) in DMMoabGetVecTag() argument
66 PetscAssertPointer(tag, 2); in DMMoabGetVecTag()
72 *tag = vmoab->tag; in DMMoabGetVecTag()
395 static PetscErrorCode DMCreateVector_Moab_Private(DM dm, moab::Tag tag, const moab::Range *userrang… in DMCreateVector_Moab_Private() argument
437 if (tag != 0) merr = mbiface->tag_get_name(tag, ttname); in DMCreateVector_Moab_Private()
452 …merr = mbiface->tag_get_handle(tag_name, dmmoab->numFields, moab::MB_TYPE_DOUBLE, tag, moab::MB_TA… in DMCreateVector_Moab_Private()
459 merr = mbiface->tag_get_data_type(tag, tag_type); in DMCreateVector_Moab_Private()
[all …]
/petsc/src/dm/impls/plex/tests/
H A Dex99.c90 char tag[PETSC_MAX_PATH_LEN], path[PETSC_MAX_PATH_LEN]; in main() local
126 …PetscCall(PetscSNPrintf(tag, sizeof(tag), "%s-%d-%d-%s%s", mshlist[msh], (int)dim, (int)order, fmt… in main()
128 PetscCall(PetscSNPrintf(out, sizeof(out), "%s/mesh-%s.msh", outdir, tag)); in main()
141 PetscCall(PetscSNPrintf(tag, sizeof(tag), "mesh-%s", mshlist[msh])); in main()
142 PetscCall(PetscObjectSetName((PetscObject)dm, tag)); in main()
/petsc/src/dm/impls/moab/tests/output/
H A Dex1_1.out3 Creating tag with name: petsc_tag;
4 Created VecMoab from existing tag.
/petsc/src/vec/is/utils/
H A Dpsort.c5 static PetscErrorCode PetscParallelSortInt_Bitonic_Merge(MPI_Comm comm, PetscMPIInt tag, PetscMPIIn… in PetscParallelSortInt_Bitonic_Merge() argument
32 …PetscCallMPI(MPI_Sendrecv(keys, n, MPIU_INT, partner, tag, buffer, n, MPIU_INT, partner, tag, comm… in PetscParallelSortInt_Bitonic_Merge()
41 …PetscCall(PetscParallelSortInt_Bitonic_Merge(comm, tag, rankStart, mid, rank, n, keys, buffer, for… in PetscParallelSortInt_Bitonic_Merge()
43 …PetscCall(PetscParallelSortInt_Bitonic_Merge(comm, tag, mid, rankEnd, rank, n, keys, buffer, forwa… in PetscParallelSortInt_Bitonic_Merge()
49 static PetscErrorCode PetscParallelSortInt_Bitonic_Recursive(MPI_Comm comm, PetscMPIInt tag, PetscM… in PetscParallelSortInt_Bitonic_Recursive() argument
67 …PetscCall(PetscParallelSortInt_Bitonic_Recursive(comm, tag, rankStart, mid, rank, n, keys, buffer,… in PetscParallelSortInt_Bitonic_Recursive()
69 …PetscCall(PetscParallelSortInt_Bitonic_Recursive(comm, tag, mid, rankEnd, rank, n, keys, buffer, f… in PetscParallelSortInt_Bitonic_Recursive()
72 …PetscCall(PetscParallelSortInt_Bitonic_Merge(comm, tag, rankStart, rankEnd, rank, n, keys, buffer,… in PetscParallelSortInt_Bitonic_Recursive()
78 PetscMPIInt size, rank, tag, mpin; in PetscParallelSortInt_Bitonic() local
83 PetscCall(PetscCommGetNewTag(comm, &tag)); in PetscParallelSortInt_Bitonic()
[all …]
/petsc/src/sys/fileio/
H A Dmprint.c580 PetscMPIInt rank, size, tag, i, j, n = 0, dummy = 0; in PetscSynchronizedFlush() local
585 PetscCall(PetscCommDuplicate(comm, &comm, &tag)); in PetscSynchronizedFlush()
594 PetscCallMPI(MPI_Send(&dummy, 1, MPI_INT, i, tag, comm)); in PetscSynchronizedFlush()
595 PetscCallMPI(MPI_Recv(&n, 1, MPI_INT, i, tag, comm, &status)); in PetscSynchronizedFlush()
599 PetscCallMPI(MPI_Recv(&size, 1, MPI_INT, i, tag, comm, &status)); in PetscSynchronizedFlush()
601 PetscCallMPI(MPI_Recv(message, size, MPI_CHAR, i, tag, comm, &status)); in PetscSynchronizedFlush()
609 PetscCallMPI(MPI_Recv(&dummy, 1, MPI_INT, 0, tag, comm, &status)); in PetscSynchronizedFlush()
610 PetscCallMPI(MPI_Send(&petsc_printfqueuelength, 1, MPI_INT, 0, tag, comm)); in PetscSynchronizedFlush()
612 PetscCallMPI(MPI_Send(&next->size, 1, MPI_INT, 0, tag, comm)); in PetscSynchronizedFlush()
613 PetscCallMPI(MPI_Send(next->string, (PetscMPIInt)next->size, MPI_CHAR, 0, tag, comm)); in PetscSynchronizedFlush()
/petsc/include/
H A Dpetsclog.h491 #define MPI_Irecv(buf, count, datatype, source, tag, comm, request) \ argument
492 …&(petsc_irecv_len_th)) || MPI_Irecv((buf), (count), (datatype), (source), (tag), (comm), (request)…
494 #define MPI_Irecv_c(buf, count, datatype, source, tag, comm, request) \ argument
495 …petsc_irecv_len_th)) || MPI_Irecv_c((buf), (count), (datatype), (source), (tag), (comm), (request)…
497 #define MPI_Isend(buf, count, datatype, dest, tag, comm, request) \ argument
498 …, &(petsc_isend_len_th)) || MPI_Isend((buf), (count), (datatype), (dest), (tag), (comm), (request)…
500 #define MPI_Isend_c(buf, count, datatype, dest, tag, comm, request) \ argument
501 …&(petsc_isend_len_th)) || MPI_Isend_c((buf), (count), (datatype), (dest), (tag), (comm), (request)…
511 #define MPI_Recv(buf, count, datatype, source, tag, comm, status) \ argument
512 …, (&petsc_recv_len_th)) || MPI_Recv((buf), (count), (datatype), (source), (tag), (comm), (status)))
[all …]
/petsc/src/dm/impls/plex/
H A Dplexvtu.c26 …nt root, const void *send, void *recv, PetscCount count, MPI_Datatype mpidatatype, PetscMPIInt tag) in TransferWrite() argument
33 PetscCallMPI(MPIU_Send((void *)send, count, mpidatatype, root, tag, comm)); in TransferWrite()
41 PetscCallMPI(MPIU_Recv(recv, count, mpidatatype, srank, tag, comm, &status)); in TransferWrite()
174 PetscMPIInt rank, size, tag; in DMPlexVTKWriteAll_VTU() local
191 PetscCall(PetscCommGetNewTag(PetscObjectComm((PetscObject)dm), &tag)); in DMPlexVTKWriteAll_VTU()
510 …mm, viewer, fp, r, 0, copy ? (const void *)y : (const void *)x, buffer, nsend, MPIU_VTUREAL, tag)); in DMPlexVTKWriteAll_VTU()
519 … PetscCall(TransferWrite(comm, viewer, fp, r, 0, connectivity, buffer, piece.nconn, MPI_INT, tag)); in DMPlexVTKWriteAll_VTU()
520 … PetscCall(TransferWrite(comm, viewer, fp, r, 0, offsets, buffer, piece.ncells, MPI_INT, tag)); in DMPlexVTKWriteAll_VTU()
521 … PetscCall(TransferWrite(comm, viewer, fp, r, 0, types, buffer, piece.ncells, MPI_CHAR, tag)); in DMPlexVTKWriteAll_VTU()
531 … PetscCall(TransferWrite(comm, viewer, fp, r, 0, owners, buffer, piece.ncells, MPI_INT, tag)); in DMPlexVTKWriteAll_VTU()
[all …]
/petsc/src/dm/impls/da/
H A Dgrvtk.c44 PetscMPIInt rank, size, tag; in DMDAVTKWriteAll_VTS() local
147 tag = ((PetscObject)viewer)->tag; in DMDAVTKWriteAll_VTS()
174 PetscCallMPI(MPIU_Recv(array, nnodes * cdim, MPIU_SCALAR, r, tag, comm, &status)); in DMDAVTKWriteAll_VTS()
190 PetscCallMPI(MPIU_Send((void *)coords, nnodes * cdim, MPIU_SCALAR, 0, tag, comm)); in DMDAVTKWriteAll_VTS()
221 PetscCallMPI(MPIU_Recv(array, nnodes * bs, MPIU_SCALAR, r, tag, comm, &status)); in DMDAVTKWriteAll_VTS()
242 … } else if (r == rank) PetscCallMPI(MPIU_Send((void *)x, nnodes * bs, MPIU_SCALAR, 0, tag, comm)); in DMDAVTKWriteAll_VTS()
269 PetscMPIInt rank, size, tag; in DMDAVTKWriteAll_VTR() local
363 tag = ((PetscObject)viewer)->tag; in DMDAVTKWriteAll_VTR()
391 PetscCallMPI(MPIU_Recv(array, xm + ym + zm, MPIU_SCALAR, r, tag, comm, &status)); in DMDAVTKWriteAll_VTR()
433 PetscCallMPI(MPIU_Send((void *)array2, xm + ym + zm, MPIU_SCALAR, 0, tag, comm)); in DMDAVTKWriteAll_VTR()
[all …]
/petsc/src/dm/impls/moab/tests/
H A Dex1.cxx44 moab::Tag tag = NULL; in CreateMesh() local
87 …merr = iface->tag_get_handle(user->tagname, 1, moab::MB_TYPE_DOUBLE, tag, moab::MB_TAG_CREAT | moa… in CreateMesh()
97 merr = iface->tag_set_data(tag, range, tag_vals.data()); in CreateMesh()
100 merr = iface->tag_get_length(tag, tagsize); in CreateMesh()
/petsc/src/tao/leastsquares/tutorials/
H A Dchwirut2f.F90249 PetscMPIInt tag
256 tag = IDLE_TAG
260 do while (tag /= DIE_TAG)
263 tag = status%MPI_TAG
265 tag = status(MPI_TAG)
267 if (tag == IDLE_TAG) then
269 else if (tag /= DIE_TAG) then
270 index = tag
275 PetscCallMPI(MPI_Send(f, one, MPIU_SCALAR, zero, tag, PETSC_COMM_WORLD, ierr))
340 PetscMPIInt tag, source
[all …]
H A Dchwirut2.c114 PetscMPIInt tag; in EvaluateFunction() local
128 tag = status.MPI_TAG; in EvaluateFunction()
129 f[tag] = (PetscReal)f_i; in EvaluateFunction()
604 PetscMPIInt tag = IDLE_TAG; in TaskWorker() local
612 while (tag != DIE_TAG) { in TaskWorker()
614 tag = status.MPI_TAG; in TaskWorker()
615 if (tag == IDLE_TAG) { in TaskWorker()
617 } else if (tag != DIE_TAG) { in TaskWorker()
618 index = (PetscInt)tag; in TaskWorker()
620 PetscCallMPI(MPI_Send(&f, 1, MPIU_REAL, 0, tag, PETSC_COMM_WORLD)); in TaskWorker()
/petsc/src/sys/yaml/include/
H A Dyaml.h260 } tag; member
393 yaml_char_t *tag; member
411 yaml_char_t *tag; member
423 yaml_char_t *tag; member
505 yaml_char_t *tag; member

1234