Home
last modified time | relevance | path

Searched refs:link (Results 1 – 25 of 74) sorted by relevance

123

/petsc/src/vec/is/sf/impls/basic/
H A Dsfpack.c55 …static PetscErrorCode CPPJoin4(Pack, Type, BS, EQ)(PetscSFLink link, PetscInt count, PetscInt star…
59 PetscInt i, j, k, X, Y, r, bs = link->bs; \
96 …static PetscErrorCode CPPJoin4(UnpackAndInsert, Type, BS, EQ)(PetscSFLink link, PetscInt count, Pe…
100 PetscInt i, j, k, X, Y, r, bs = link->bs; \
137 …static PetscErrorCode CPPJoin4(UnpackAnd##Opname, Type, BS, EQ)(PetscSFLink link, PetscInt count, …
141 PetscInt i, j, k, X, Y, r, bs = link->bs; \
170 …static PetscErrorCode CPPJoin4(FetchAnd##Opname, Type, BS, EQ)(PetscSFLink link, PetscInt count, P…
173 PetscInt i, j, k, r, l, bs = link->bs; \
191 …static PetscErrorCode CPPJoin4(ScatterAnd##Opname, Type, BS, EQ)(PetscSFLink link, PetscInt count,…
195 PetscInt i, j, k, s, t, X, Y, bs = link->bs; \
[all …]
H A Dsfmpi.c6 static PetscErrorCode PetscSFLinkFinishCommunication_Default(PetscSF sf, PetscSFLink link, PetscSFD… in PetscSFLinkFinishCommunication_Default() argument
9 const PetscMemType rootmtype_mpi = link->rootmtype_mpi, leafmtype_mpi = link->leafmtype_mpi; in PetscSFLinkFinishCommunication_Default()
10 const PetscInt rootdirect_mpi = link->rootdirect_mpi, leafdirect_mpi = link->leafdirect_mpi; in PetscSFLinkFinishCommunication_Default()
23 …size_t size = (bas->ioffset[i + bas->ndiranks + 1] - bas->ioffset[i + bas->ndiranks]) * link->unit… in PetscSFLinkFinishCommunication_Default()
24 …ytes) with MPI tag %10d ... ", rank, rootaction, bas->iranks[i + bas->ndiranks], size, link->tag)); in PetscSFLinkFinishCommunication_Default()
25 …PetscCallMPI(MPI_Wait(link->rootreqs[direction][rootmtype_mpi][rootdirect_mpi] + i, MPI_STATUS_IGN… in PetscSFLinkFinishCommunication_Default()
29 … size_t size = (sf->roffset[i + sf->ndranks + 1] - sf->roffset[i + sf->ndranks]) * link->unitbytes; in PetscSFLinkFinishCommunication_Default()
30 …zu bytes) with MPI tag %10d ... ", rank, leafaction, sf->ranks[i + sf->ndranks], size, link->tag)); in PetscSFLinkFinishCommunication_Default()
31 …PetscCallMPI(MPI_Wait(link->leafreqs[direction][leafmtype_mpi][leafdirect_mpi] + i, MPI_STATUS_IGN… in PetscSFLinkFinishCommunication_Default()
36 …if (bas->nrootreqs) PetscCallMPI(MPI_Waitall(bas->nrootreqs, link->rootreqs[direction][rootmtype_m… in PetscSFLinkFinishCommunication_Default()
[all …]
H A Dsfbasic.c6 static PetscErrorCode PetscSFLinkInitMPIRequests_Persistent_Basic(PetscSF sf, PetscSFLink link, Pet… in PetscSFLinkInitMPIRequests_Persistent_Basic() argument
14 MPI_Datatype unit = link->unit; in PetscSFLinkInitMPIRequests_Persistent_Basic()
15 …const PetscMemType rootmtype_mpi = link->rootmtype_mpi, leafmtype_mpi = link->leafmtype_mpi; /* Us… in PetscSFLinkInitMPIRequests_Persistent_Basic()
16 const PetscInt rootdirect_mpi = link->rootdirect_mpi, leafdirect_mpi = link->leafdirect_mpi; in PetscSFLinkInitMPIRequests_Persistent_Basic()
19 …if (bas->rootbuflen[PETSCSF_REMOTE] && !link->rootreqsinited[direction][rootmtype_mpi][rootdirect_… in PetscSFLinkInitMPIRequests_Persistent_Basic()
23 disp = (rootoffset[i] - rootoffset[ndrootranks]) * link->unitbytes; in PetscSFLinkInitMPIRequests_Persistent_Basic()
25 …tscCallMPI(MPIU_Recv_init(link->rootbuf[PETSCSF_REMOTE][rootmtype_mpi] + disp, cnt, unit, bas->ira… in PetscSFLinkInitMPIRequests_Persistent_Basic()
29 disp = (rootoffset[i] - rootoffset[ndrootranks]) * link->unitbytes; in PetscSFLinkInitMPIRequests_Persistent_Basic()
31 …tscCallMPI(MPIU_Send_init(link->rootbuf[PETSCSF_REMOTE][rootmtype_mpi] + disp, cnt, unit, bas->ira… in PetscSFLinkInitMPIRequests_Persistent_Basic()
34 link->rootreqsinited[direction][rootmtype_mpi][rootdirect_mpi] = PETSC_TRUE; in PetscSFLinkInitMPIRequests_Persistent_Basic()
[all …]
H A Dsfpack.h220 static inline PetscErrorCode PetscSFLinkGetPack(PetscSFLink link, PetscMemType mtype, PetscErrorCod… in PetscSFLinkGetPack() argument
223 if (PetscMemTypeHost(mtype)) *Pack = link->h_Pack; in PetscSFLinkGetPack()
225 else *Pack = link->d_Pack; in PetscSFLinkGetPack()
266 static inline PetscErrorCode PetscSFLinkGetMPIBuffersAndRequests(PetscSF sf, PetscSFLink link, Pets… in PetscSFLinkGetMPIBuffersAndRequests() argument
268 …const PetscMemType rootmtype_mpi = link->rootmtype_mpi, leafmtype_mpi = link->leafmtype_mpi; /* me… in PetscSFLinkGetMPIBuffersAndRequests()
269 const PetscInt rootdirect_mpi = link->rootdirect_mpi, leafdirect_mpi = link->leafdirect_mpi; in PetscSFLinkGetMPIBuffersAndRequests()
272 …if (link->InitMPIRequests) PetscCall((*link->InitMPIRequests)(sf, link, direction)); // init (pers… in PetscSFLinkGetMPIBuffersAndRequests()
274 if (rootbuf) *rootbuf = link->rootbuf[PETSCSF_REMOTE][rootmtype_mpi]; in PetscSFLinkGetMPIBuffersAndRequests()
275 if (leafbuf) *leafbuf = link->leafbuf[PETSCSF_REMOTE][leafmtype_mpi]; in PetscSFLinkGetMPIBuffersAndRequests()
276 if (rootreqs) *rootreqs = link->rootreqs[direction][rootmtype_mpi][rootdirect_mpi]; in PetscSFLinkGetMPIBuffersAndRequests()
[all …]
/petsc/src/vec/is/sf/impls/basic/kokkos/
H A Dsfkok.kokkos.cxx232 static PetscErrorCode Pack(PetscSFLink link, PetscInt count, PetscInt start, PetscSFPackOpt opt, co… in Pack() argument
235 …const PetscInt M = EQ ? 1 : link->bs / BS, MBS = M * BS; /* If EQ, then MBS will be a compil… in Pack()
254 static PetscErrorCode UnpackAndOp(PetscSFLink link, PetscInt count, PetscInt start, PetscSFPackOpt … in UnpackAndOp() argument
258 const PetscInt M = EQ ? 1 : link->bs / BS, MBS = M * BS; in UnpackAndOp()
274 static PetscErrorCode FetchAndOp(PetscSFLink link, PetscInt count, PetscInt start, PetscSFPackOpt o… in FetchAndOp() argument
278 const PetscInt M = EQ ? 1 : link->bs / BS, MBS = M * BS; in FetchAndOp()
293 static PetscErrorCode ScatterAndOp(PetscSFLink link, PetscInt count, PetscInt srcStart, PetscSFPack… in ScatterAndOp() argument
296 const PetscInt M = (EQ) ? 1 : link->bs / BS, MBS = M * BS; in ScatterAndOp()
358 static PetscErrorCode ScatterAndInsert(PetscSFLink link, PetscInt count, PetscInt srcStart, PetscSF… in ScatterAndInsert() argument
368 size_t sz = count * link->unitbytes; in ScatterAndInsert()
[all …]
/petsc/src/vec/is/sf/impls/basic/cupm/
H A Dsfcupm_impl.hpp276 inline PetscErrorCode SfInterface<T>::Pack(PetscSFLink link, PetscInt count, PetscInt start, PetscS… in Pack() argument
283 …MemcpyAsync(buf, (char *)data + start * link->unitbytes, count * link->unitbytes, cupmMemcpyDevice… in Pack()
285 …PetscCall(PetscCUPMLaunchKernel1D(count, 0, link->stream, kernels::d_Pack<Type, BS, EQ>, link->bs,… in Pack()
292 inline PetscErrorCode SfInterface<T>::UnpackAndOp(PetscSFLink link, PetscInt count, PetscInt start,… in UnpackAndOp() argument
299 …upmMemcpyAsync((char *)data + start * link->unitbytes, buf, count * link->unitbytes, cupmMemcpyDev… in UnpackAndOp()
301 …PetscCall(PetscCUPMLaunchKernel1D(count, 0, link->stream, kernels::d_UnpackAndOp<Type, Op, BS, EQ>… in UnpackAndOp()
308 inline PetscErrorCode SfInterface<T>::FetchAndOp(PetscSFLink link, PetscInt count, PetscInt start, … in FetchAndOp() argument
314 …PetscCall(PetscCUPMLaunchKernel1D(count, 0, link->stream, kernels::d_FetchAndOp<Type, Op, BS, EQ>,… in FetchAndOp()
320 inline PetscErrorCode SfInterface<T>::ScatterAndOp(PetscSFLink link, PetscInt count, PetscInt srcSt… in ScatterAndOp() argument
328 nblocks = PetscMin(nblocks, link->maxResidentThreadsPerGPU / nthreads); in ScatterAndOp()
[all …]
/petsc/src/vec/is/sf/impls/basic/allgather/
H A Dsfallgather.c33 PetscSFLink link; in PetscSFBcastBegin_Allgather() local
40 …l(PetscSFLinkCreate(sf, unit, rootmtype, rootdata, leafmtype, leafdata, op, PETSCSF_BCAST, &link)); in PetscSFBcastBegin_Allgather()
41 PetscCall(PetscSFLinkPackRootData(sf, link, PETSCSF_REMOTE, rootdata)); in PetscSFBcastBegin_Allgather()
42 …PetscCall(PetscSFLinkCopyRootBufferInCaseNotUseGpuAwareMPI(sf, link, PETSC_TRUE /* device2host bef… in PetscSFBcastBegin_Allgather()
45 …PetscCall(PetscSFLinkGetMPIBuffersAndRequests(sf, link, PETSCSF_ROOT2LEAF, &rootbuf, &leafbuf, &re… in PetscSFBcastBegin_Allgather()
46 PetscCall(PetscSFLinkSyncStreamBeforeCallMPI(sf, link)); in PetscSFBcastBegin_Allgather()
53 PetscSFLink link; in PetscSFReduceBegin_Allgather() local
62 …(PetscSFLinkCreate(sf, unit, rootmtype, rootdata, leafmtype, leafdata, op, PETSCSF_REDUCE, &link)); in PetscSFReduceBegin_Allgather()
66 …cCall((*link->Memcpy)(link, rootmtype, rootdata, leafmtype, (const char *)leafdata + (size_t)rstar… in PetscSFReduceBegin_Allgather()
67 …ypeDevice(leafmtype) && PetscMemTypeHost(rootmtype)) PetscCall((*link->SyncStream)(link)); /* Sync… in PetscSFReduceBegin_Allgather()
[all …]
/petsc/src/dm/interface/
H A Ddmget.c374 DMNamedVecLink link; in DMHasNamedGlobalVector() local
381 for (link = dm->namedglobal; link; link = link->next) { in DMHasNamedGlobalVector()
383 PetscCall(PetscStrcmp(name, link->name, &match)); in DMHasNamedGlobalVector()
413 DMNamedVecLink link; in DMGetNamedGlobalVector() local
419 for (link = dm->namedglobal; link; link = link->next) { in DMGetNamedGlobalVector()
422 PetscCall(PetscStrcmp(name, link->name, &match)); in DMGetNamedGlobalVector()
426 …PetscCheck(link->status == DMVEC_STATUS_IN, PetscObjectComm((PetscObject)dm), PETSC_ERR_ARG_WRONGS… in DMGetNamedGlobalVector()
427 PetscCall(VecGetDM(link->X, &vdm)); in DMGetNamedGlobalVector()
429 PetscCall(VecSetDM(link->X, dm)); in DMGetNamedGlobalVector()
435 PetscCall(PetscNew(&link)); in DMGetNamedGlobalVector()
[all …]
/petsc/src/sys/classes/viewer/impls/mathematica/
H A Druntime.c11 static PetscErroCode setupConnection(MLENV *env, MLINK *link, const char *linkhost, LinkMode linkmo… in setupConnection() argument
46 *link = MLOpenInEnv(*env, argc, argv, &lerr); in setupConnection()
60 static PetscErrorCode processPacket(MLINK link, int indent, int *result) in processPacket() argument
63 int tokenType = MLGetNext(link); in processPacket()
74 MLGetArgCount(link, &numArguments); in processPacket()
78 PetscCall(processPacket(link, indent + 4, result)); in processPacket()
83 for (arg = 0; arg < numArguments; arg++) PetscCall(processPacket(link, indent + 4)); in processPacket()
88 MLGetSymbol(link, &symbol); in processPacket()
91 MLDisownSymbol(link, symbol); in processPacket()
95 MLDisownSymbol(link, symbol); in processPacket()
[all …]
H A Dmathematica.c63 MLClose(vmath->link); in PetscViewerDestroy_Mathematica()
130 vmath->link = MLOpenInEnv(mathematicaEnv, argc, argv, &lerr); in PetscViewerMathematicaSetupConnection_Private()
364 static PetscErrorCode PetscViewerMathematicaGetLink(PetscViewer viewer, MLINK *link) in PetscViewerMathematicaGetLink() argument
370 *link = vmath->link; in PetscViewerMathematicaGetLink()
388 MLINK link = vmath->link; /* The link to Mathematica */ in PetscViewerMathematicaSkipPackets() local
392 while ((pkt = MLNextPacket(link)) && (pkt != type)) MLNewPacket(link); in PetscViewerMathematicaSkipPackets()
394 MLClearError(link); in PetscViewerMathematicaSkipPackets()
395 SETERRQ(PETSC_COMM_SELF, PETSC_ERR_LIB, (char *)MLErrorMessage(link)); in PetscViewerMathematicaSkipPackets()
469 MLINK link = vmath->link; /* The link to Mathematica */ in PetscViewerMathematicaPutMatrix() local
478 MLPutFunction(link, "EvaluatePacket", 1); in PetscViewerMathematicaPutMatrix()
[all …]
/petsc/src/vec/is/sf/impls/window/
H A Dsfwindow.c8 …PetscSFDataLink link; /* List of MPI data types, lazily constructed for each data type */ member
73 PetscSFDataLink link; in PetscSFWindowGetDataTypes() local
79 for (link = w->link; link; link = link->next) { in PetscSFWindowGetDataTypes()
82 PetscCall(MPIPetsc_Type_compare(unit, link->unit, &match)); in PetscSFWindowGetDataTypes()
84 *localtypes = link->mine; in PetscSFWindowGetDataTypes()
85 *remotetypes = link->remote; in PetscSFWindowGetDataTypes()
92 PetscCall(PetscNew(&link)); in PetscSFWindowGetDataTypes()
93 PetscCallMPI(MPI_Type_dup(unit, &link->unit)); in PetscSFWindowGetDataTypes()
94 PetscCall(PetscMalloc2(nranks, &link->mine, nranks, &link->remote)); in PetscSFWindowGetDataTypes()
111 PetscCallMPI(MPI_Type_create_indexed_block(rcount, 1, rmine, link->unit, &link->mine[i])); in PetscSFWindowGetDataTypes()
[all …]
/petsc/src/vec/is/sf/impls/basic/nvshmem/
H A Dsfnvshmem.cu214 static PetscErrorCode PetscSFLinkBuildDependenceBegin(PetscSF sf, PetscSFLink link, PetscSFDirectio… in PetscSFLinkBuildDependenceBegin() argument
222 PetscCallCUDA(cudaEventRecord(link->dataReady, link->stream)); in PetscSFLinkBuildDependenceBegin()
223 PetscCallCUDA(cudaStreamWaitEvent(link->remoteCommStream, link->dataReady, 0)); in PetscSFLinkBuildDependenceBegin()
229 static PetscErrorCode PetscSFLinkBuildDependenceEnd(PetscSF sf, PetscSFLink link, PetscSFDirection … in PetscSFLinkBuildDependenceEnd() argument
238 PetscCallCUDA(cudaEventRecord(link->endRemoteComm, link->remoteCommStream)); in PetscSFLinkBuildDependenceEnd()
239 PetscCallCUDA(cudaStreamWaitEvent(link->stream, link->endRemoteComm, 0)); in PetscSFLinkBuildDependenceEnd()
304 …FLinkWaitSignalsOfCompletionOfGettingData_NVSHMEM(PetscSF sf, PetscSFLink link, PetscSFDirection d… in PetscSFLinkWaitSignalsOfCompletionOfGettingData_NVSHMEM() argument
312 sig = link->rootSendSig; /* leaf ranks set my rootSendsig */ in PetscSFLinkWaitSignalsOfCompletionOfGettingData_NVSHMEM()
315 sig = link->leafSendSig; in PetscSFLinkWaitSignalsOfCompletionOfGettingData_NVSHMEM()
320 …NvshmemWaitSignals<<<1, 1, 0, link->remoteCommStream>>>(n, sig, 0, 1); /* wait the signals to be 0… in PetscSFLinkWaitSignalsOfCompletionOfGettingData_NVSHMEM()
[all …]
/petsc/src/sys/objects/
H A Dfcallback.c24 FortranCallbackLink next, link = base->subtypes; in PetscFortranCallbackFinalize() local
25 for (; link; link = next) { in PetscFortranCallbackFinalize()
26 next = link->next; in PetscFortranCallbackFinalize()
27 PetscCall(PetscFree(link->type_name)); in PetscFortranCallbackFinalize()
28 PetscCall(PetscFree(link)); in PetscFortranCallbackFinalize()
56 FortranCallbackLink link; in PetscFortranCallbackRegister() local
77 …for (link = base->subtypes; link; link = link->next) { /* look for either both NULL or matching va… in PetscFortranCallbackRegister()
79 PetscCall(PetscStrcmp(subtype, link->type_name, &match)); in PetscFortranCallbackRegister()
85 PetscCall(PetscNew(&link)); in PetscFortranCallbackRegister()
86 PetscCall(PetscStrallocpy(subtype, &link->type_name)); in PetscFortranCallbackRegister()
[all …]
/petsc/src/vec/is/sf/impls/basic/allgatherv/
H A Dsfallgatherv.c77 PetscSFLink link = dat->avail, next; in PetscSFReset_Allgatherv() local
86 for (; link; link = next) { in PetscSFReset_Allgatherv()
87 next = link->next; in PetscSFReset_Allgatherv()
88 PetscCall(PetscSFLinkDestroy(sf, link)); in PetscSFReset_Allgatherv()
104 PetscSFLink link; in PetscSFBcastBegin_Allgatherv() local
112 …l(PetscSFLinkCreate(sf, unit, rootmtype, rootdata, leafmtype, leafdata, op, PETSCSF_BCAST, &link)); in PetscSFBcastBegin_Allgatherv()
113 PetscCall(PetscSFLinkPackRootData(sf, link, PETSCSF_REMOTE, rootdata)); in PetscSFBcastBegin_Allgatherv()
114 …PetscCall(PetscSFLinkCopyRootBufferInCaseNotUseGpuAwareMPI(sf, link, PETSC_TRUE /* device2host bef… in PetscSFBcastBegin_Allgatherv()
118 …PetscCall(PetscSFLinkGetMPIBuffersAndRequests(sf, link, PETSCSF_ROOT2LEAF, &rootbuf, &leafbuf, &re… in PetscSFBcastBegin_Allgatherv()
120 …bcast_root) PetscCall((*link->Memcpy)(link, link->leafmtype_mpi, leafbuf, link->rootmtype_mpi, roo… in PetscSFBcastBegin_Allgatherv()
[all …]
/petsc/src/vec/is/sf/impls/basic/neighbor/
H A Dsfneighbor.c87 static PetscErrorCode PetscSFLinkStartCommunication_Neighbor(PetscSF sf, PetscSFLink link, PetscSFD… in PetscSFLinkStartCommunication_Neighbor() argument
96 …PetscCall(PetscSFLinkCopyRootBufferInCaseNotUseGpuAwareMPI(sf, link, PETSC_TRUE /* device2host bef… in PetscSFLinkStartCommunication_Neighbor()
98 …PetscCall(PetscSFLinkCopyLeafBufferInCaseNotUseGpuAwareMPI(sf, link, PETSC_TRUE /* device2host */)… in PetscSFLinkStartCommunication_Neighbor()
102 …PetscCall(PetscSFLinkGetMPIBuffersAndRequests(sf, link, direction, &rootbuf, &leafbuf, &req, NULL)… in PetscSFLinkStartCommunication_Neighbor()
103 PetscCall(PetscSFLinkSyncStreamBeforeCallMPI(sf, link)); in PetscSFLinkStartCommunication_Neighbor()
107 …llv(rootbuf, dat->rootcounts, dat->rootdispls, link->unit, leafbuf, dat->leafcounts, dat->leafdisp… in PetscSFLinkStartCommunication_Neighbor()
108 …scLogMPIMessages(dat->rootdegree, dat->rootcounts, link->unit, dat->leafdegree, dat->leafcounts, l… in PetscSFLinkStartCommunication_Neighbor()
110 …llv(leafbuf, dat->leafcounts, dat->leafdispls, link->unit, rootbuf, dat->rootcounts, dat->rootdisp… in PetscSFLinkStartCommunication_Neighbor()
111 …scLogMPIMessages(dat->leafdegree, dat->leafcounts, link->unit, dat->rootdegree, dat->rootcounts, l… in PetscSFLinkStartCommunication_Neighbor()
118 static PetscErrorCode PetscSFLinkInitMPIRequests_Persistent_Neighbor(PetscSF sf, PetscSFLink link, … in PetscSFLinkInitMPIRequests_Persistent_Neighbor() argument
[all …]
/petsc/doc/community/
H A Dpetsc_team.md32 :link: https://gitlab.com/markadams4
36 :link: https://gitlab.com/sbalay
40 :link: https://gitlab.com/jedbrown
44 :link: https://gitlab.com/dalcinl
48 :link: https://gitlab.com/tisaac
52 :link: https://gitlab.com/prj-
56 :link: https://gitlab.com/knepley
60 :link: https://wordpress.cels.anl.gov/curfman/
64 :link: https://gitlab.com/rtmills
68 :link: https://gitlab.com/tmunson
[all …]
/petsc/src/dm/impls/plex/
H A Dplexvtu.c172 PetscViewerVTKObjectLink link; in DMPlexVTKWriteAll_VTU() local
268 for (link = vtk->link; link; link = link->next) { in DMPlexVTKWriteAll_VTU()
269 Vec X = (Vec)link->vec; in DMPlexVTKWriteAll_VTU()
274 … if ((link->ft != PETSC_VTK_CELL_FIELD) && (link->ft != PETSC_VTK_CELL_VECTOR_FIELD)) continue; in DMPlexVTKWriteAll_VTU()
275 …if (((PetscObject)X)->name || link != vtk->link) { /* If the object is already named, use it. If i… in DMPlexVTKWriteAll_VTU()
280 PetscCall(PetscObjectQuery(link->vec, "section", (PetscObject *)&section)); in DMPlexVTKWriteAll_VTU()
285 if (link->field >= 0) { in DMPlexVTKWriteAll_VTU()
286 field = link->field; in DMPlexVTKWriteAll_VTU()
306 if (link->ft == PETSC_VTK_CELL_VECTOR_FIELD) { in DMPlexVTKWriteAll_VTU()
362 for (link = vtk->link; link; link = link->next) { in DMPlexVTKWriteAll_VTU()
[all …]
/petsc/src/ts/impls/symplectic/basicsymplectic/
H A Dbasicsymplectic.c93 BasicSymplecticSchemeLink link; in TSBasicSymplecticRegisterDestroy() local
96 while ((link = BasicSymplecticSchemeList)) { in TSBasicSymplecticRegisterDestroy()
97 BasicSymplecticScheme scheme = &link->sch; in TSBasicSymplecticRegisterDestroy()
98 BasicSymplecticSchemeList = link->next; in TSBasicSymplecticRegisterDestroy()
101 PetscCall(PetscFree(link)); in TSBasicSymplecticRegisterDestroy()
162 BasicSymplecticSchemeLink link; in TSBasicSymplecticRegister() local
171 PetscCall(PetscNew(&link)); in TSBasicSymplecticRegister()
172 scheme = &link->sch; in TSBasicSymplecticRegister()
179 link->next = BasicSymplecticSchemeList; in TSBasicSymplecticRegister()
180 BasicSymplecticSchemeList = link; in TSBasicSymplecticRegister()
[all …]
/petsc/src/sys/classes/viewer/impls/vtk/
H A Dvtkv.c90 PetscViewerVTKObjectLink link, next; in PetscViewerFlush_VTK() local
93 …PetscCheck(!vtk->link || !(!vtk->dm || !vtk->write), PetscObjectComm((PetscObject)viewer), PETSC_E… in PetscViewerFlush_VTK()
95 for (link = vtk->link; link; link = next) { in PetscViewerFlush_VTK()
96 next = link->next; in PetscViewerFlush_VTK()
97 PetscCall(PetscObjectDestroy(&link->vec)); in PetscViewerFlush_VTK()
98 PetscCall(PetscFree(link)); in PetscViewerFlush_VTK()
102 vtk->link = NULL; in PetscViewerFlush_VTK()
170 PetscViewerVTKObjectLink link, tail = vtk->link; in PetscViewerVTKAddField_VTK() local
180 PetscCall(PetscNew(&link)); in PetscViewerVTKAddField_VTK()
181 link->ft = fieldtype; in PetscViewerVTKAddField_VTK()
[all …]
/petsc/src/vec/is/sf/impls/basic/gather/
H A Dsfgather.c7 static PetscErrorCode PetscSFLinkStartCommunication_Gather(PetscSF sf, PetscSFLink link, PetscSFDir… in PetscSFLinkStartCommunication_Gather() argument
13 MPI_Datatype unit = link->unit; in PetscSFLinkStartCommunication_Gather()
17 …PetscCall(PetscSFLinkCopyRootBufferInCaseNotUseGpuAwareMPI(sf, link, PETSC_TRUE /* device2host bef… in PetscSFLinkStartCommunication_Gather()
19 …PetscCall(PetscSFLinkCopyLeafBufferInCaseNotUseGpuAwareMPI(sf, link, PETSC_TRUE /* device2host */)… in PetscSFLinkStartCommunication_Gather()
23 …PetscCall(PetscSFLinkGetMPIBuffersAndRequests(sf, link, direction, &rootbuf, &leafbuf, &req, NULL)… in PetscSFLinkStartCommunication_Gather()
24 PetscCall(PetscSFLinkSyncStreamBeforeCallMPI(sf, link)); in PetscSFLinkStartCommunication_Gather()
34 static PetscErrorCode PetscSFSetCommunicationOps_Gather(PetscSF sf, PetscSFLink link) in PetscSFSetCommunicationOps_Gather() argument
37 link->StartCommunication = PetscSFLinkStartCommunication_Gather; in PetscSFSetCommunicationOps_Gather()
/petsc/src/snes/impls/ms/
H A Dms.c104 SNESMSTableauLink link; in SNESMSRegisterDestroy() local
107 while ((link = SNESMSTableauList)) { in SNESMSRegisterDestroy()
108 SNESMSTableau t = &link->tab; in SNESMSRegisterDestroy()
109 SNESMSTableauList = link->next; in SNESMSRegisterDestroy()
115 PetscCall(PetscFree(link)); in SNESMSRegisterDestroy()
195 SNESMSTableauLink link; in SNESMSRegister() local
211 PetscCall(PetscNew(&link)); in SNESMSRegister()
212 t = &link->tab; in SNESMSRegister()
227 link->next = SNESMSTableauList; in SNESMSRegister()
228 SNESMSTableauList = link; in SNESMSRegister()
[all …]
/petsc/src/vec/is/sf/impls/basic/gatherv/
H A Dsfgatherv.c8 static PetscErrorCode PetscSFLinkStartCommunication_Gatherv(PetscSF sf, PetscSFLink link, PetscSFDi… in PetscSFLinkStartCommunication_Gatherv() argument
15 MPI_Datatype unit = link->unit; in PetscSFLinkStartCommunication_Gatherv()
19 …PetscCall(PetscSFLinkCopyRootBufferInCaseNotUseGpuAwareMPI(sf, link, PETSC_TRUE /* device2host bef… in PetscSFLinkStartCommunication_Gatherv()
21 …PetscCall(PetscSFLinkCopyLeafBufferInCaseNotUseGpuAwareMPI(sf, link, PETSC_TRUE /* device2host */)… in PetscSFLinkStartCommunication_Gatherv()
25 …PetscCall(PetscSFLinkGetMPIBuffersAndRequests(sf, link, direction, &rootbuf, &leafbuf, &req, NULL)… in PetscSFLinkStartCommunication_Gatherv()
26 PetscCall(PetscSFLinkSyncStreamBeforeCallMPI(sf, link)); in PetscSFLinkStartCommunication_Gatherv()
36 static PetscErrorCode PetscSFSetCommunicationOps_Gatherv(PetscSF sf, PetscSFLink link) in PetscSFSetCommunicationOps_Gatherv() argument
39 link->StartCommunication = PetscSFLinkStartCommunication_Gatherv; in PetscSFSetCommunicationOps_Gatherv()
/petsc/config/BuildSystem/docs/
H A DsharedLibraryCheck.fig34 4 0 0 50 -1 0 12 0.0000 4 150 1125 990 4050 Standard link\001
35 4 0 0 50 -1 0 12 0.0000 4 150 1125 5085 4050 Standard link\001
36 4 0 0 50 -1 0 12 0.0000 4 195 1125 5310 1755 Dynamic link\001
37 4 0 0 50 -1 0 12 0.0000 4 195 1125 765 1755 Dynamic link\001
/petsc/src/ksp/ksp/utils/lmvm/
H A Dlmbasis.c149 VecLink link; in LMBasisGetWorkVec() local
156 link = basis->work_vecs_available; in LMBasisGetWorkVec()
157 basis->work_vecs_available = link->next; in LMBasisGetWorkVec()
158 link->next = basis->work_vecs_in_use; in LMBasisGetWorkVec()
159 basis->work_vecs_in_use = link; in LMBasisGetWorkVec()
161 *vec_p = link->vec; in LMBasisGetWorkVec()
162 link->vec = NULL; in LMBasisGetWorkVec()
169 VecLink link = NULL; in LMBasisRestoreWorkVec() local
174 link = basis->work_vecs_in_use; in LMBasisRestoreWorkVec()
175 basis->work_vecs_in_use = link->next; in LMBasisRestoreWorkVec()
[all …]
/petsc/src/dm/impls/da/
H A Dgrvtk.c42 PetscViewerVTKObjectLink link; in DMDAVTKWriteAll_VTS() local
107 for (link = vtk->link; link; link = link->next) { in DMDAVTKWriteAll_VTS()
108 Vec X = (Vec)link->vec; in DMDAVTKWriteAll_VTS()
118 …if (((PetscObject)X)->name || link != vtk->link) PetscCall(PetscObjectGetName((PetscObject)X, &vec… in DMDAVTKWriteAll_VTS()
208 for (link = vtk->link; link; link = link->next) { in DMDAVTKWriteAll_VTS()
209 Vec X = (Vec)link->vec; in DMDAVTKWriteAll_VTS()
267 PetscViewerVTKObjectLink link; in DMDAVTKWriteAll_VTR() local
324 for (link = vtk->link; link; link = link->next) { in DMDAVTKWriteAll_VTR()
325 Vec X = (Vec)link->vec; in DMDAVTKWriteAll_VTR()
334 …if (((PetscObject)X)->name || link != vtk->link) PetscCall(PetscObjectGetName((PetscObject)X, &vec… in DMDAVTKWriteAll_VTR()
[all …]

123