| /petsc/src/sys/objects/ |
| H A D | ptype.c | 24 PetscErrorCode PetscDataTypeToMPIDataType(PetscDataType ptype, MPI_Datatype *mtype) in PetscDataTypeToMPIDataType() argument
27 if (ptype == PETSC_INT) *mtype = MPIU_INT; in PetscDataTypeToMPIDataType()
28 else if (ptype == PETSC_DOUBLE) *mtype = MPI_DOUBLE; in PetscDataTypeToMPIDataType()
31 else if (ptype == PETSC_COMPLEX) *mtype = MPI_C_COMPLEX; in PetscDataTypeToMPIDataType()
33 else if (ptype == PETSC_COMPLEX) *mtype = MPIU___COMPLEX128; in PetscDataTypeToMPIDataType()
35 else if (ptype == PETSC_COMPLEX) *mtype = MPI_C_DOUBLE_COMPLEX; in PetscDataTypeToMPIDataType()
38 else if (ptype == PETSC_LONG) *mtype = MPI_LONG; in PetscDataTypeToMPIDataType()
39 else if (ptype == PETSC_SHORT) *mtype = MPI_SHORT; in PetscDataTypeToMPIDataType()
40 else if (ptype == PETSC_ENUM) *mtype = MPI_INT; in PetscDataTypeToMPIDataType()
41 else if (ptype == PETSC_BOOL) *mtype = MPI_INT; in PetscDataTypeToMPIDataType()
[all …]
|
| /petsc/src/mat/utils/ |
| H A D | isltog.c | 3 …apping(ISLocalToGlobalMapping lgmap, Mat A, PetscBool cols, PetscBool trans, MatType ptype, Mat *P) in MatCreateFromISLocalToGlobalMapping() argument
17 if (!ptype) PetscCall(MatGetType(A, &ptype)); in MatCreateFromISLocalToGlobalMapping()
18 PetscCall(PetscStrcmpAny(ptype, &matfree, MATSHELL, MATSCATTER, "")); in MatCreateFromISLocalToGlobalMapping()
43 PetscCall(PetscStrcmp(ptype, MATSHELL, &matshell)); in MatCreateFromISLocalToGlobalMapping()
46 PetscCall(MatConvert(*P, ptype, MAT_INITIAL_MATRIX, &tP)); in MatCreateFromISLocalToGlobalMapping()
59 PetscCall(MatSetType(*P, ptype)); in MatCreateFromISLocalToGlobalMapping()
|
| /petsc/src/sys/classes/viewer/impls/hdf5/ |
| H A D | hdf5v.c | 1111 PetscErrorCode PetscDataTypeToHDF5DataType(PetscDataType ptype, hid_t *htype) in PetscDataTypeToHDF5DataType() argument
1114 …if (ptype == PETSC_INT) *htype = PetscDefined(USE_64BIT_INDICES) ? H5T_NATIVE_LLONG : H5T_NATIVE_I… in PetscDataTypeToHDF5DataType()
1115 else if (ptype == PETSC_DOUBLE) *htype = H5T_NATIVE_DOUBLE; in PetscDataTypeToHDF5DataType()
1116 else if (ptype == PETSC_LONG) *htype = H5T_NATIVE_LONG; in PetscDataTypeToHDF5DataType()
1117 else if (ptype == PETSC_SHORT) *htype = H5T_NATIVE_SHORT; in PetscDataTypeToHDF5DataType()
1118 else if (ptype == PETSC_ENUM) *htype = H5T_NATIVE_INT; in PetscDataTypeToHDF5DataType()
1119 else if (ptype == PETSC_BOOL) *htype = H5T_NATIVE_HBOOL; in PetscDataTypeToHDF5DataType()
1120 else if (ptype == PETSC_FLOAT) *htype = H5T_NATIVE_FLOAT; in PetscDataTypeToHDF5DataType()
1121 else if (ptype == PETSC_CHAR) *htype = H5T_NATIVE_CHAR; in PetscDataTypeToHDF5DataType()
1122 else if (ptype == PETSC_BIT_LOGICAL) *htype = H5T_NATIVE_UCHAR; in PetscDataTypeToHDF5DataType()
[all …]
|
| /petsc/src/dm/partitioner/impls/parmetis/ |
| H A D | partparmetis.c | 20 PetscInt ptype; member
44 PetscCall(PetscViewerASCIIPrintf(viewer, "ParMetis type: %s\n", ptypes[p->ptype])); in PetscPartitionerView_ParMetis_ASCII()
70 …titioner_parmetis_type", "Partitioning method", "", ptypes, 2, ptypes[p->ptype], &p->ptype, NULL)); in PetscPartitionerSetFromOptions_ParMetis()
92 PetscInt metis_ptype = pm->ptype; /* kway or recursive bisection */ in PetscPartitionerPartition_ParMetis()
268 p->ptype = 0; in PetscPartitionerCreate_ParMetis()
|
| /petsc/src/mat/impls/transpose/ |
| H A D | transm.c | 390 MatProductType ptype; in MatProductSetFromOptions_Transpose() local
431 ptype = D->product->type; /* same product type by default */ in MatProductSetFromOptions_Transpose()
448 ptype = MATPRODUCT_UNSPECIFIED; in MatProductSetFromOptions_Transpose()
454 ptype = MATPRODUCT_AtB; in MatProductSetFromOptions_Transpose()
456 ptype = MATPRODUCT_ABt; in MatProductSetFromOptions_Transpose()
461 ptype = MATPRODUCT_ABt; in MatProductSetFromOptions_Transpose()
463 ptype = MATPRODUCT_AB; in MatProductSetFromOptions_Transpose()
470 ptype = MATPRODUCT_AtB; in MatProductSetFromOptions_Transpose()
474 ptype = MATPRODUCT_AB; in MatProductSetFromOptions_Transpose()
481 ptype = MATPRODUCT_RARt; in MatProductSetFromOptions_Transpose()
[all …]
|
| H A D | htransm.c | 100 MatProductType ptype; in MatProductSetFromOptions_HT() local
142 ptype = D->product->type; /* same product type by default */ in MatProductSetFromOptions_HT()
161 ptype = MATPRODUCT_UNSPECIFIED; in MatProductSetFromOptions_HT()
167 ptype = MATPRODUCT_AtB; in MatProductSetFromOptions_HT()
169 ptype = MATPRODUCT_ABt; in MatProductSetFromOptions_HT()
174 ptype = MATPRODUCT_ABt; in MatProductSetFromOptions_HT()
176 ptype = MATPRODUCT_AB; in MatProductSetFromOptions_HT()
183 ptype = MATPRODUCT_AtB; in MatProductSetFromOptions_HT()
187 ptype = MATPRODUCT_AB; in MatProductSetFromOptions_HT()
194 ptype = MATPRODUCT_RARt; in MatProductSetFromOptions_HT()
[all …]
|
| /petsc/doc/ |
| H A D | conf.py | 199 ptype = 'html'
200 else: ptype = 'pdf'
202 print(" Running Sphinx on PETSc " + ptype)
|
| /petsc/src/dm/impls/plex/tests/ |
| H A D | ex99.c | 23 DMPolytopeType ptype; in CreateFE() local
38 PetscCall(DMPlexGetCellType(K, 0, &ptype)); in CreateFE()
39 switch (ptype) { in CreateFE()
|
| /petsc/src/ts/tutorials/ |
| H A D | ex31.c | 1171 PetscErrorCode SolveODE(char *ptype, PetscReal dt, PetscReal tfinal, PetscInt maxiter, PetscReal *e… in SolveODE() argument
1184 PetscCall(GetSize((const char *)&ptype[0], &N)); in SolveODE()
1192 PetscCall(Initialize(Y, &ptype[0])); in SolveODE()
1211 PetscCall(TSSetRHSFunction(ts, NULL, RHSFunction, &ptype[0])); in SolveODE()
1216 PetscCall(TSSetRHSJacobian(ts, Jac, Jac, RHSJacobian, &ptype[0])); in SolveODE()
1220 PetscCall(TSSetIFunction(ts, NULL, IFunction, &ptype[0])); in SolveODE()
1225 PetscCall(TSSetIJacobian(ts, Jac, Jac, IJacobian, &ptype[0])); in SolveODE()
1243 PetscCall(ExactSolution(Yex, &ptype[0], final_time, exact_flag)); in SolveODE()
1260 char ptype[256] = "hull1972a1"; /* Problem specification */ in main() local
1274 PetscCall(GetSize(&ptype[0], &N)); in main()
[all …]
|
| /petsc/src/snes/tutorials/ |
| H A D | ex28.c | 33 PetscInt ptype; member
79 switch (user->ptype) { in FormFunction_All()
211 switch (user->ptype) { in FormJacobian_All()
358 user->ptype = 0; in main()
361 …0: solve for u only, 1: solve for k only, 2: solve for both", 0, user->ptype, &user->ptype, NULL)); in main()
369 switch (user->ptype) { in main()
|
| H A D | ex4.c | 45 ProblemType ptype = PROBLEM_ENNEPER; in main() local
55 …"-problem_type", "Problem type", NULL, ProblemTypes, (PetscEnum)ptype, (PetscEnum *)&ptype, NULL)); in main()
58 switch (ptype) { in main()
|
| /petsc/src/mat/impls/shell/ |
| H A D | shell.h | 20 MatProductType ptype; member
|
| H A D | shellcnv.c | 134 MatProductType ptype; member
158 C->product->type = mmcfdata->ptype; in MatProductNumericPhase_CF()
180 mmcfdata->ptype = C->product->type; in MatProductSymbolicPhase_CF()
|
| H A D | shell.c | 696 flg = (PetscBool)(flg && (matmat->ptype == product->type)); in MatProductSymbolic_Shell_X()
768 flg = (PetscBool)(flg && (matmat->ptype == product->type)); in MatProductSetFromOptions_Shell_X()
778 static PetscErrorCode MatShellSetMatProductOperation_Private(Mat A, MatProductType ptype, PetscErro… in MatShellSetMatProductOperation_Private() argument
798 flg = (PetscBool)(flg && (entry->ptype == ptype)); in MatShellSetMatProductOperation_Private()
811 matmat->ptype = ptype; in MatShellSetMatProductOperation_Private()
816 … type %s with result %s\n", matmat->composedname, MatProductTypes[matmat->ptype], matmat->resultna… in MatShellSetMatProductOperation_Private()
868 PetscErrorCode MatShellSetMatProductOperation(Mat A, MatProductType ptype, PetscErrorCode (*symboli… in MatShellSetMatProductOperation() argument
872 PetscValidLogicalCollectiveEnum(A, ptype, 2); in MatShellSetMatProductOperation()
873 …PetscCheck(ptype != MATPRODUCT_ABC, PetscObjectComm((PetscObject)A), PETSC_ERR_SUP, "Not for produ… in MatShellSetMatProductOperation()
877 …e (*)(Mat, Mat, Mat, void *), PetscCtxDestroyFn *, MatType, MatType), (A, ptype, symbolic, numeric… in MatShellSetMatProductOperation()
[all …]
|
| /petsc/src/ksp/pc/impls/mg/ |
| H A D | gdsw.c | 225 MatType ptype; in PCMGGDSWCreateCoarseSpace_Private() local
281 ptype = MATAIJ; in PCMGGDSWCreateCoarseSpace_Private()
290 if (found) ptype = MATAIJCUSPARSE; in PCMGGDSWCreateCoarseSpace_Private()
295 PetscCall(MatSetType(*cspace, ptype)); in PCMGGDSWCreateCoarseSpace_Private()
|
| /petsc/src/mat/impls/aij/mpi/kokkos/ |
| H A D | mpiaijkok.kokkos.cxx | 1276 MatProductType ptype; in MatProductNumeric_MPIAIJKokkos() local
1283 ptype = product->type; in MatProductNumeric_MPIAIJKokkos()
1295 if (ptype == MATPRODUCT_AB) { in MatProductNumeric_MPIAIJKokkos()
1297 } else if (ptype == MATPRODUCT_AtB) { in MatProductNumeric_MPIAIJKokkos()
1299 } else if (ptype == MATPRODUCT_PtAP) { // BtAB, computed by Z = AB; C= BtZ in MatProductNumeric_MPIAIJKokkos()
1312 MatProductType ptype; in MatProductSymbolic_MPIAIJKokkos() local
1325 ptype = product->type; in MatProductSymbolic_MPIAIJKokkos()
1329 switch (ptype) { in MatProductSymbolic_MPIAIJKokkos()
1349 SETERRQ(comm, PETSC_ERR_PLIB, "Not for product type %s", MatProductTypes[ptype]); in MatProductSymbolic_MPIAIJKokkos()
1360 if (ptype == MATPRODUCT_AB) { in MatProductSymbolic_MPIAIJKokkos()
[all …]
|
| /petsc/src/binding/petsc4py/test/ |
| H A D | test_ts.py | 72 ptype = PETSc.TS.ProblemType.NONLINEAR
73 self.ts.setProblemType(ptype)
|
| /petsc/src/mat/impls/aij/seq/seqhipsparse/ |
| H A D | aijhipsparse.hip.cxx | 2416 MatProductType ptype; in MatProductNumeric_SeqAIJHIPSPARSE_SeqAIJHIPSPARSE() local
2455 ptype = product->type; in MatProductNumeric_SeqAIJHIPSPARSE_SeqAIJHIPSPARSE()
2456 if (A->symmetric == PETSC_BOOL3_TRUE && ptype == MATPRODUCT_AtB) { in MatProductNumeric_SeqAIJHIPSPARSE_SeqAIJHIPSPARSE()
2457 ptype = MATPRODUCT_AB; in MatProductNumeric_SeqAIJHIPSPARSE_SeqAIJHIPSPARSE()
2460 if (B->symmetric == PETSC_BOOL3_TRUE && ptype == MATPRODUCT_ABt) { in MatProductNumeric_SeqAIJHIPSPARSE_SeqAIJHIPSPARSE()
2461 ptype = MATPRODUCT_AB; in MatProductNumeric_SeqAIJHIPSPARSE_SeqAIJHIPSPARSE()
2464 switch (ptype) { in MatProductNumeric_SeqAIJHIPSPARSE_SeqAIJHIPSPARSE()
2481 …etscObject)C), PETSC_ERR_GPU, "Missing A mult struct for product type %s", MatProductTypes[ptype]); in MatProductNumeric_SeqAIJHIPSPARSE_SeqAIJHIPSPARSE()
2482 …etscObject)C), PETSC_ERR_GPU, "Missing B mult struct for product type %s", MatProductTypes[ptype]); in MatProductNumeric_SeqAIJHIPSPARSE_SeqAIJHIPSPARSE()
2483 …etscObject)C), PETSC_ERR_GPU, "Missing C mult struct for product type %s", MatProductTypes[ptype]); in MatProductNumeric_SeqAIJHIPSPARSE_SeqAIJHIPSPARSE()
[all …]
|
| /petsc/src/mat/impls/aij/seq/seqcusparse/ |
| H A D | aijcusparse.cu | 2913 MatProductType ptype; in MatProductNumeric_SeqAIJCUSPARSE_SeqAIJCUSPARSE() local
2954 ptype = product->type; in MatProductNumeric_SeqAIJCUSPARSE_SeqAIJCUSPARSE()
2955 if (A->symmetric == PETSC_BOOL3_TRUE && ptype == MATPRODUCT_AtB) { in MatProductNumeric_SeqAIJCUSPARSE_SeqAIJCUSPARSE()
2956 ptype = MATPRODUCT_AB; in MatProductNumeric_SeqAIJCUSPARSE_SeqAIJCUSPARSE()
2959 if (B->symmetric == PETSC_BOOL3_TRUE && ptype == MATPRODUCT_ABt) { in MatProductNumeric_SeqAIJCUSPARSE_SeqAIJCUSPARSE()
2960 ptype = MATPRODUCT_AB; in MatProductNumeric_SeqAIJCUSPARSE_SeqAIJCUSPARSE()
2963 switch (ptype) { in MatProductNumeric_SeqAIJCUSPARSE_SeqAIJCUSPARSE()
2980 …etscObject)C), PETSC_ERR_GPU, "Missing A mult struct for product type %s", MatProductTypes[ptype]); in MatProductNumeric_SeqAIJCUSPARSE_SeqAIJCUSPARSE()
2981 …etscObject)C), PETSC_ERR_GPU, "Missing B mult struct for product type %s", MatProductTypes[ptype]); in MatProductNumeric_SeqAIJCUSPARSE_SeqAIJCUSPARSE()
2982 …etscObject)C), PETSC_ERR_GPU, "Missing C mult struct for product type %s", MatProductTypes[ptype]); in MatProductNumeric_SeqAIJCUSPARSE_SeqAIJCUSPARSE()
[all …]
|
| /petsc/src/binding/petsc4py/conf/ |
| H A D | stubgen.py | 116 ptype = sig.rsplit('->', 1)[-1].strip()
|
| /petsc/src/ksp/pc/impls/fieldsplit/ |
| H A D | fieldsplit.c | 2881 PetscErrorCode PCFieldSplitSetSchurPre(PC pc, PCFieldSplitSchurPreType ptype, Mat pre) in PCFieldSplitSetSchurPre() argument
2885 …PetscTryMethod(pc, "PCFieldSplitSetSchurPre_C", (PC, PCFieldSplitSchurPreType, Mat), (pc, ptype, p… in PCFieldSplitSetSchurPre()
2889 PetscErrorCode PCFieldSplitSchurPrecondition(PC pc, PCFieldSplitSchurPreType ptype, Mat pre) in PCFieldSplitSchurPrecondition() argument
2891 return PCFieldSplitSetSchurPre(pc, ptype, pre); in PCFieldSplitSchurPrecondition()
2911 PetscErrorCode PCFieldSplitGetSchurPre(PC pc, PCFieldSplitSchurPreType *ptype, Mat *pre) in PCFieldSplitGetSchurPre() argument
2915 …Method(pc, "PCFieldSplitGetSchurPre_C", (PC, PCFieldSplitSchurPreType *, Mat *), (pc, ptype, pre)); in PCFieldSplitGetSchurPre()
2985 static PetscErrorCode PCFieldSplitSetSchurPre_FieldSplit(PC pc, PCFieldSplitSchurPreType ptype, Mat… in PCFieldSplitSetSchurPre_FieldSplit() argument
2990 jac->schurpre = ptype; in PCFieldSplitSetSchurPre_FieldSplit()
2991 if (ptype == PC_FIELDSPLIT_SCHUR_PRE_USER && pre) { in PCFieldSplitSetSchurPre_FieldSplit()
2999 static PetscErrorCode PCFieldSplitGetSchurPre_FieldSplit(PC pc, PCFieldSplitSchurPreType *ptype, Ma… in PCFieldSplitGetSchurPre_FieldSplit() argument
[all …]
|
| /petsc/src/mat/impls/aij/seq/kokkos/ |
| H A D | aijkok.kokkos.cxx | 889 MatProductType ptype; in MatProductSymbolic_SeqAIJKokkos_SeqAIJKokkos() local
910 ptype = product->type; in MatProductSymbolic_SeqAIJKokkos_SeqAIJKokkos()
912 if (A->symmetric == PETSC_BOOL3_TRUE && ptype == MATPRODUCT_AtB) { in MatProductSymbolic_SeqAIJKokkos_SeqAIJKokkos()
913 ptype = MATPRODUCT_AB; in MatProductSymbolic_SeqAIJKokkos_SeqAIJKokkos()
916 if (B->symmetric == PETSC_BOOL3_TRUE && ptype == MATPRODUCT_ABt) { in MatProductSymbolic_SeqAIJKokkos_SeqAIJKokkos()
917 ptype = MATPRODUCT_AB; in MatProductSymbolic_SeqAIJKokkos_SeqAIJKokkos()
921 switch (ptype) { in MatProductSymbolic_SeqAIJKokkos_SeqAIJKokkos()
|
| /petsc/include/petsc/private/ |
| H A D | petscimpl.h | 439 #define PetscAssertPointer_Internal(ptr, arg, ptype, ptrtype) \ argument
442 …PetscCheck(PetscCheckPointer(ptr, ptype), PETSC_COMM_SELF, PETSC_ERR_ARG_BADPTR, "Invalid Pointer …
|
| /petsc/src/dm/dt/dualspace/impls/sum/ |
| H A D | dualspacesum.c | 816 DMPolytopeType ptype; in PetscDualSpaceSetUp_Sum() local
821 PetscCall(DMPlexGetCellType(K, p, &ptype)); in PetscDualSpaceSetUp_Sum()
828 if (qtype == ptype) break; in PetscDualSpaceSetUp_Sum()
|
| /petsc/src/dm/impls/plex/ |
| H A D | plexglvis.c | 315 DMPolytopeType ptype; in GLVisCreateFE() local
330 PetscCall(DMPlexGetCellType(K, 0, &ptype)); in GLVisCreateFE()
331 switch (ptype) { in GLVisCreateFE()
|