| /petsc/src/sys/classes/viewer/impls/socket/mex-scripts/ |
| H A D | bread.c | 88 else if (type == PETSC_SCALAR) n *= sizeof(PetscScalar); in PetscBinaryRead()
105 else if (type == PETSC_SCALAR) SYByteSwapScalar((PetscScalar *)ptmp, ntmp); in PetscBinaryRead()
133 else if (type == PETSC_SCALAR) n *= sizeof(PetscScalar); in PetscBinaryWrite()
141 else if (type == PETSC_SCALAR) SYByteSwapScalar((PetscScalar *)ptmp, ntmp); in PetscBinaryWrite()
161 else if (type == PETSC_SCALAR) SYByteSwapScalar((PetscScalar *)ptmp, ntmp); in PetscBinaryWrite()
|
| /petsc/include/petsc/finclude/ |
| H A D | petscsysbase.h | 77 #define PETSC_SCALAR PETSC_COMPLEX macro
80 #define PETSC_SCALAR PETSC_FLOAT
82 #define PETSC_SCALAR PETSC___FLOAT128
84 #define PETSC_SCALAR PETSC_DOUBLE
|
| /petsc/src/vec/vec/tutorials/ |
| H A D | ex6.c | 43 PetscCall(PetscBinaryWrite(fd, array, m, PETSC_SCALAR)); in main()
68 PetscCall(PetscBinaryRead(fd, avec, sz, NULL, PETSC_SCALAR)); in main()
|
| H A D | ex6f.F90 | 47 PetscCallA(PetscBinaryWrite(fd, array, m, PETSC_SCALAR, ierr))
78 PetscCallA(PetscBinaryRead(fd, avec, sz, PETSC_NULL_INTEGER, PETSC_SCALAR, ierr))
|
| /petsc/src/sys/tests/ |
| H A D | ex22.c | 32 PetscCall(PetscByteSwap(sscalar, PETSC_SCALAR, 2)); in main()
39 PetscCall(PetscByteSwap(sscalar, PETSC_SCALAR, 2)); in main()
|
| H A D | ex49.c | 23 …PetscCheck(dtype == PETSC_SCALAR, PETSC_COMM_WORLD, PETSC_ERR_ARG_WRONG, "Found wrong datatype for… in main()
|
| /petsc/src/sys/classes/viewer/impls/binary/ftn-custom/ |
| H A D | zbinvf90.c | 31 *ierr = PetscViewerBinaryWrite(v, a, *len, PETSC_SCALAR); in petscviewerbinarywritescalar_()
54 *ierr = PetscViewerBinaryRead(v, a, *len, count, PETSC_SCALAR); in petscviewerbinaryreadscalar_()
|
| /petsc/src/dm/field/tutorials/ |
| H A D | ex1.c | 48 PetscCall(DMFieldEvaluate(field, points, PETSC_SCALAR, B, D, H)); in TestEvaluate()
91 PetscCall(DMFieldEvaluateFE(field, cellIS, quad, PETSC_SCALAR, B, D, H)); in TestEvaluateFE()
134 PetscCall(DMFieldEvaluateFV(field, cellIS, PETSC_SCALAR, B, D, H)); in TestEvaluateFV()
180 if (type == PETSC_SCALAR) { in TestShellEvaluate()
187 if (type == PETSC_SCALAR) { in TestShellEvaluate()
194 if (type == PETSC_SCALAR) { in TestShellEvaluate()
|
| /petsc/src/dm/field/impls/ds/ |
| H A D | dmfieldds.c | 188 if (type == PETSC_SCALAR) { in DMFieldEvaluateFE_DS()
199 if (type == PETSC_SCALAR) { in DMFieldEvaluateFE_DS()
210 if (type == PETSC_SCALAR) { in DMFieldEvaluateFE_DS()
270 …if (datatype == PETSC_SCALAR) PetscCall(PetscMalloc3((B ? (size_t)nc * gatherSize : 0), &cellBs, (… in DMFieldEvaluate_DS()
304 if (datatype == PETSC_SCALAR) { in DMFieldEvaluate_DS()
315 if (datatype == PETSC_SCALAR) { in DMFieldEvaluate_DS()
346 if (datatype == PETSC_SCALAR) { in DMFieldEvaluate_DS()
404 if (datatype == PETSC_SCALAR) { in DMFieldEvaluate_DS()
415 …PetscCall(PetscSFScatterBegin(cellSF, Btype, (datatype == PETSC_SCALAR) ? (void *)cellBs : (void *… in DMFieldEvaluate_DS()
416 …PetscCall(PetscSFScatterEnd(cellSF, Btype, (datatype == PETSC_SCALAR) ? (void *)cellBs : (void *)c… in DMFieldEvaluate_DS()
[all …]
|
| /petsc/src/vec/vec/tests/ |
| H A D | ex20f.F90 | 36 PetscCallA(PetscBinaryWrite(fd, array, n, PETSC_SCALAR, ierr))
|
| /petsc/src/sys/error/ |
| H A D | checkptr.c | 100 case PETSC_SCALAR: { /* C++ is seriously dysfunctional with volatile std::complex. */ in PetscCheckPointer()
|
| /petsc/include/ |
| H A D | petscsystypes.h | 747 #define PETSC_SCALAR PETSC_COMPLEX macro
749 #define PETSC_SCALAR PETSC_REAL macro
|
| /petsc/src/ts/tutorials/advection-diffusion-reaction/ |
| H A D | ex1.c | 80 PetscCall(PetscViewerBinaryWrite(v, &ctx->k, 1, PETSC_SCALAR)); in IFunctionView()
88 PetscCall(PetscViewerBinaryRead(v, &(*ctx)->k, 1, NULL, PETSC_SCALAR)); in IFunctionLoad()
|
| /petsc/src/sys/classes/viewer/impls/hdf5/ftn-custom/ |
| H A D | zhdf5f.c | 44 *ierr = PetscViewerHDF5WriteAttribute(*viewer, c1, c2, PETSC_SCALAR, value); in petscviewerhdf5writeattributescalar_()
|
| /petsc/src/dm/field/impls/da/ |
| H A D | dmfieldda.c | 117 if (datatype == PETSC_SCALAR) { in MultilinearEvaluate()
128 if (datatype == PETSC_SCALAR) { in MultilinearEvaluate()
152 if (datatype == PETSC_SCALAR) { in MultilinearEvaluate()
165 if (datatype == PETSC_SCALAR) { in MultilinearEvaluate()
266 if (datatype == PETSC_SCALAR) { in DMFieldEvaluateFE_DA()
|
| /petsc/src/ts/tutorials/autodiff/ |
| H A D | adr_ex1.cxx | 25 PetscCall(PetscViewerBinaryWrite(v, &ctx->k, 1, PETSC_SCALAR)); in IFunctionView()
33 PetscCall(PetscViewerBinaryRead(v, &(*ctx)->k, 1, NULL, PETSC_SCALAR)); in IFunctionLoad()
|
| /petsc/src/vec/vec/utils/ |
| H A D | vsection.c | 42 PetscCall(PetscSectionArrayView_ASCII_Internal(s->field[f], array, PETSC_SCALAR, viewer)); in PetscSectionVecView()
48 PetscCall(PetscSectionArrayView_ASCII_Internal(s, array, PETSC_SCALAR, viewer)); in PetscSectionVecView()
|
| H A D | vecio.c | 35 PetscCall(PetscViewerBinaryWriteAll(viewer, xarray, n, s, N, PETSC_SCALAR)); in VecView_Binary()
113 PetscCall(PetscViewerBinaryReadAll(viewer, array, n, s, N, PETSC_SCALAR)); in VecLoad_Binary()
|
| /petsc/src/sys/fileio/ |
| H A D | sysio.c | 233 else if (pdtype == PETSC_SCALAR) PetscCall(PetscByteSwapScalar((PetscScalar *)data, count)); in PetscByteSwap()
440 if ((type == PETSC_SCALAR || type == PETSC_REAL || type == PETSC_COMPLEX) && writedouble) { in PetscBinaryWrite()
451 else if (wtype == PETSC_SCALAR) m *= sizeof(PetscScalar); in PetscBinaryWrite()
483 …if ((type == PETSC_SCALAR || type == PETSC_REAL || type == PETSC_COMPLEX) && writedouble) PetscCal… in PetscBinaryWrite()
|
| /petsc/src/sys/classes/bag/ |
| H A D | bag.c | 463 item->dtype = PETSC_SCALAR; in PetscBagRegisterScalar()
598 } else if (nitem->dtype == PETSC_SCALAR) { in PetscBagSetFromOptions()
677 } else if (nitem->dtype == PETSC_SCALAR) { in PetscBagView()
844 } else if (dtype == (PetscInt)PETSC_SCALAR) { in PetscBagLoad()
845 PetscCall(PetscViewerBinaryRead(view, ((char *)bag) + nitem->offset, 1, NULL, PETSC_SCALAR)); in PetscBagLoad()
|
| /petsc/src/dm/impls/da/tests/ |
| H A D | ex1.c | 62 PetscCall(DMSwarmRegisterPetscDatatypeField(sw, "u", 1, PETSC_SCALAR)); in main()
|
| /petsc/src/dm/field/impls/shell/ |
| H A D | dmfieldshell.c | 53 if (type == PETSC_SCALAR) { in DMFieldShellEvaluateFEDefault()
90 if (type == PETSC_SCALAR) { in DMFieldShellEvaluateFEDefault()
|
| /petsc/src/dm/impls/swarm/tests/ |
| H A D | ex8.c | 61 PetscCall(DMSwarmRegisterPetscDatatypeField(*sw, "w_q", 1, PETSC_SCALAR)); in CreateSwarm()
|
| /petsc/src/sys/objects/ |
| H A D | ptype.c | 200 *ptype = PETSC_SCALAR; in PetscDataTypeFromString()
|
| /petsc/src/dm/impls/swarm/tutorials/ |
| H A D | ex1f90.F90 | 44 PetscCallA(DMSwarmRegisterPetscDatatypeField(sw, 'w_q', Nc, PETSC_SCALAR, ierr))
|