| /petsc/src/sys/objects/ |
| H A D | version.c | 95 PetscErrorCode PetscBLASSetNumThreads(PetscInt nt) in PetscBLASSetNumThreads() argument 98 PetscNumBLASThreads = nt; in PetscBLASSetNumThreads() 100 bli_thread_set_num_threads(nt); in PetscBLASSetNumThreads() 103 mkl_set_num_threads((int)nt); in PetscBLASSetNumThreads() 106 openblas_set_num_threads((int)nt); in PetscBLASSetNumThreads() 124 PetscErrorCode PetscBLASGetNumThreads(PetscInt *nt) in PetscBLASGetNumThreads() argument 127 PetscAssertPointer(nt, 1); in PetscBLASGetNumThreads() 128 *nt = PetscNumBLASThreads; in PetscBLASGetNumThreads()
|
| /petsc/src/tao/pde_constrained/tutorials/ |
| H A D | hyperbolic.c | 7 PetscInt nt; /* Number of time steps */ member 110 user.nt = 16; in main() 111 PetscCall(PetscOptionsInt("-nt", "Number of time steps", "", user.nt, &user.nt, NULL)); in main() 121 user.m = user.mx * user.mx * user.nt; /* number of constraints */ in main() 122 user.n = user.mx * user.mx * 3 * user.nt; /* number of variables */ in main() 123 user.ht = user.T / user.nt; /* Time step */ in main() 306 PetscCall(Scatter_yi(user->u, user->ui, user->ui_scatter, user->nt)); in FormJacobianState() 307 …ll(Scatter_uxi_uyi(user->u, user->uxi, user->uxi_scatter, user->uyi, user->uyi_scatter, user->nt)); in FormJacobianState() 308 for (i = 0; i < user->nt; i++) { in FormJacobianState() 339 PetscCall(Scatter_yi(X, user->yi, user->yi_scatter, user->nt)); in StateMatMult() [all …]
|
| H A D | parabolic.c | 7 PetscInt nt; /* Number of time steps; as of now, must be divisible by 8 */ member 112 user.nt = 8; in main() 113 PetscCall(PetscOptionsInt("-nt", "Number of time steps", "", user.nt, &user.nt, NULL)); in main() 128 user.n = user.m * (user.nt + 1); /* number of variables */ in main() 129 user.ht = (PetscReal)1 / user.nt; in main() 134 PetscCall(VecSetSizes(user.u, PETSC_DECIDE, user.n - user.m * user.nt)); in main() 135 PetscCall(VecSetSizes(user.y, PETSC_DECIDE, user.m * user.nt)); in main() 136 PetscCall(VecSetSizes(user.c, PETSC_DECIDE, user.m * user.nt)); in main() 233 PetscCall(Scatter_i(user->y, user->yi, user->yi_scatter, user->nt)); in FormFunction() 262 PetscCall(Scatter_i(user->y, user->yi, user->yi_scatter, user->nt)); in FormGradient() [all …]
|
| /petsc/src/mat/impls/sell/mpi/ |
| H A D | mmsell.c | 203 PetscInt i, n, nt, cstart, cend, no, *garray = ina->garray, *lindices; in MatMPISELLDiagonalScaleLocalSetUp() local 210 nt = 0; in MatMPISELLDiagonalScaleLocalSetUp() 213 nt++; in MatMPISELLDiagonalScaleLocalSetUp() 217 …PetscCheck(nt == n, PETSC_COMM_SELF, PETSC_ERR_PLIB, "Hmm nt %" PetscInt_FMT " n %" PetscInt_FMT, … in MatMPISELLDiagonalScaleLocalSetUp() 226 no = inA->rmap->mapping->n - nt; in MatMPISELLDiagonalScaleLocalSetUp() 228 nt = 0; in MatMPISELLDiagonalScaleLocalSetUp() 231 nt++; in MatMPISELLDiagonalScaleLocalSetUp() 235 …PetscCheck(nt <= no, PETSC_COMM_SELF, PETSC_ERR_PLIB, "Hmm nt %" PetscInt_FMT " no %" PetscInt_FMT… in MatMPISELLDiagonalScaleLocalSetUp() 237 PetscCall(PetscMalloc1(nt, &auglyrmapo)); in MatMPISELLDiagonalScaleLocalSetUp() 242 PetscCall(VecCreateSeq(PETSC_COMM_SELF, nt, &auglyoo)); in MatMPISELLDiagonalScaleLocalSetUp()
|
| H A D | mpisell.c | 369 PetscInt nt; in MatMult_MPISELL() local 372 PetscCall(VecGetLocalSize(xx, &nt)); in MatMult_MPISELL() 373 …ck(nt == A->cmap->n, PETSC_COMM_SELF, PETSC_ERR_ARG_SIZ, "Incompatible partition of A (%" PetscInt… in MatMult_MPISELL()
|
| /petsc/src/mat/impls/baij/mpi/ |
| H A D | mmbaij.c | 203 PetscInt bs = inA->rmap->bs, i, n, nt, j, cstart, cend, no, *garray = ina->garray, *lindices; in MatMPIBAIJDiagonalScaleLocalSetUp() local 210 nt = 0; in MatMPIBAIJDiagonalScaleLocalSetUp() 213 nt++; in MatMPIBAIJDiagonalScaleLocalSetUp() 217 …PetscCheck(nt * bs == n, PETSC_COMM_SELF, PETSC_ERR_PLIB, "Hmm nt*bs %" PetscInt_FMT " n %" PetscI… in MatMPIBAIJDiagonalScaleLocalSetUp() 229 no = inA->rmap->mapping->n - nt; in MatMPIBAIJDiagonalScaleLocalSetUp() 231 nt = 0; in MatMPIBAIJDiagonalScaleLocalSetUp() 234 nt++; in MatMPIBAIJDiagonalScaleLocalSetUp() 238 …PetscCheck(nt <= no, PETSC_COMM_SELF, PETSC_ERR_PLIB, "Hmm nt %" PetscInt_FMT " no %" PetscInt_FMT… in MatMPIBAIJDiagonalScaleLocalSetUp() 240 PetscCall(PetscMalloc1(nt * bs, &uglyrmapo)); in MatMPIBAIJDiagonalScaleLocalSetUp() 247 PetscCall(VecCreateSeq(PETSC_COMM_SELF, nt * bs, &uglyoo)); in MatMPIBAIJDiagonalScaleLocalSetUp()
|
| /petsc/src/mat/impls/aij/mpi/ |
| H A D | mmaij.c | 209 PetscInt i, j, n, nt, cstart, cend, no, *garray = ina->garray, *lindices, bs = inA->rmap->bs; in MatMPIAIJDiagonalScaleLocalSetUp() local 216 nt = 0; in MatMPIAIJDiagonalScaleLocalSetUp() 219 nt++; in MatMPIAIJDiagonalScaleLocalSetUp() 223 …PetscCheck(nt * bs == n, PETSC_COMM_SELF, PETSC_ERR_PLIB, "Hmm nt*bs %" PetscInt_FMT " n %" PetscI… in MatMPIAIJDiagonalScaleLocalSetUp() 239 no = inA->rmap->mapping->n - nt; in MatMPIAIJDiagonalScaleLocalSetUp() 241 nt = 0; in MatMPIAIJDiagonalScaleLocalSetUp() 244 nt++; in MatMPIAIJDiagonalScaleLocalSetUp() 248 …PetscCheck(nt <= no, PETSC_COMM_SELF, PETSC_ERR_PLIB, "Hmm nt %" PetscInt_FMT " no %" PetscInt_FMT… in MatMPIAIJDiagonalScaleLocalSetUp() 250 PetscCall(PetscMalloc1(nt * bs, &auglyrmapo)); in MatMPIAIJDiagonalScaleLocalSetUp() 257 PetscCall(VecCreateSeq(PETSC_COMM_SELF, nt * bs, &auglyoo)); in MatMPIAIJDiagonalScaleLocalSetUp()
|
| /petsc/src/ts/event/tests/ |
| H A D | ex1.c | 225 PetscInt *nt = (PetscInt *)ctx; in TransferSetUp() local 229 nt[0] = 2; in TransferSetUp() 230 nt[1] = 2; in TransferSetUp() 232 *flg = (PetscBool)(nt[0] && n && n % (nt[0]) == 0); in TransferSetUp() 233 if (*flg) nt[0] += nt[1]; in TransferSetUp()
|
| /petsc/src/mat/tests/ |
| H A D | ex66.c | 38 …PetscInt N, n = 64, dim = 1, i, j, nrhs = 11, lda = 0, ldc = 0, ldu = 0, nlr = 7, nt, ntr… in main() local 241 for (nt = 0; nt < ntrials; nt++) { in main() 242 PetscCall(MatMatMult(B, C, nt ? MAT_REUSE_MATRIX : MAT_INITIAL_MATRIX, PETSC_DETERMINE, &D)); in main() 265 for (nt = 0; nt < ntrials; nt++) { in main() 266 …PetscCall(MatTransposeMatMult(B, C, nt ? MAT_REUSE_MATRIX : MAT_INITIAL_MATRIX, PETSC_DETERMINE, &… in main()
|
| /petsc/src/vec/vec/tests/ |
| H A D | ex48.c | 206 #define nt 5 /* number of datatypes */ macro 209 char names[nt][SLEN]; 210 PetscDataType types[nt]; 211 char typeNames[nt][SLEN]; 212 size_t sizes[nt]; 213 void *vals[nt]; 225 void *vals[nt] = {&bool0, &int0, &real0, str0, nestr0}; in CapsuleCreate() 226 …size_t sizes[nt] = {sizeof(bool0), sizeof(int0), sizeof(real0), sizeof(str0), sizeof(str0)… in CapsuleCreate() 227 PetscDataType types[nt] = {PETSC_BOOL, PETSC_INT, PETSC_REAL, PETSC_STRING, PETSC_STRING}; in CapsuleCreate() 228 const char *tNames[nt] = {"bool", "int", "real", "str", "nonExisting"}; in CapsuleCreate() [all …]
|
| H A D | ex37.c | 137 for (int nt = 0; nt < 2; nt++) { in test_view() local 138 NormType norm = nt ? NORM_INFINITY : NORM_2; in test_view()
|
| /petsc/src/ts/utils/dmplexlandau/ |
| H A D | plexland.c | 1076 PetscInt ii, nt, nm, nc, num_species_grid[LANDAU_MAX_GRIDS], non_dim_grid; in ProcessOptions() local 1185 nt = LANDAU_MAX_SPECIES; in ProcessOptions() 1186 …...] in keV (must be set to set number of species)", "plexland.c", ctx->thermal_temps, &nt, &flg)); in ProcessOptions() 1188 …PetscInfo(dummy, "num_species set to number of thermal temps provided (%" PetscInt_FMT ")\n", nt)); in ProcessOptions() 1189 ctx->num_species = nt; in ProcessOptions() 1204 nt = LANDAU_MAX_GRIDS; in ProcessOptions() 1205 …each grid: [ 1, ....] or [S, 0 ....] for single grid", "plexland.c", num_species_grid, &nt, &flg)); in ProcessOptions() 1207 ctx->num_grids = nt; in ProcessOptions() 1208 for (ii = nt = 0; ii < ctx->num_grids; ii++) nt += num_species_grid[ii]; in ProcessOptions() 1209 …nt, ctx->comm, PETSC_ERR_ARG_WRONG, "-dm_landau_num_species_grid: sum %" PetscInt_FMT " != num_spe… in ProcessOptions() [all …]
|
| /petsc/src/dm/tutorials/ |
| H A D | ex21.c | 17 PetscInt tk, nt = 200; in pic_advect() local 28 PetscCall(PetscOptionsGetInt(NULL, NULL, "-nt", &nt, NULL)); in pic_advect() 160 for (tk = 1; tk <= nt; tk++) { in pic_advect()
|
| /petsc/src/mat/impls/sbaij/mpi/ |
| H A D | mmsbaij.c | 11 PetscInt bs = mat->rmap->bs, *stmp, mbs = sbaij->mbs, vec_size, nt; in MatSetUpMultiply_MPISBAIJ() local 154 PetscCall(VecGetLocalSize(sbaij->slvec1, &nt)); in MatSetUpMultiply_MPISBAIJ() 157 …PetscCall(VecCreateSeqWithArray(PETSC_COMM_SELF, 1, nt - bs * mbs, PetscSafePointerPlusOffset(ptr,… in MatSetUpMultiply_MPISBAIJ() 161 …PetscCall(VecCreateSeqWithArray(PETSC_COMM_SELF, 1, nt - bs * mbs, PetscSafePointerPlusOffset(ptr,… in MatSetUpMultiply_MPISBAIJ()
|
| H A D | mpisbaij.c | 2401 PetscInt len = 0, nt, bs = matin->rmap->bs, mbs = oldmat->mbs; in MatDuplicate_MPISBAIJ() local 2472 PetscCall(VecGetLocalSize(a->slvec1, &nt)); in MatDuplicate_MPISBAIJ() 2475 …PetscCall(VecCreateSeqWithArray(PETSC_COMM_SELF, 1, nt - bs * mbs, array + bs * mbs, &a->slvec1b)); in MatDuplicate_MPISBAIJ() 2478 …PetscCall(VecCreateSeqWithArray(PETSC_COMM_SELF, 1, nt - bs * mbs, array + bs * mbs, &a->slvec0b)); in MatDuplicate_MPISBAIJ()
|
| /petsc/src/binding/petsc4py/test/ |
| H A D | test_ksp.py | 52 nt = ksp.norm_type 53 ksp.norm_type = nt 54 self.assertEqual(ksp.norm_type, nt)
|
| /petsc/src/mat/impls/aij/mpi/kokkos/ |
| H A D | mpiaijkok.kokkos.cxx | 49 PetscInt nt; in MatMult_MPIAIJKokkos() local 52 PetscCall(VecGetLocalSize(xx, &nt)); in MatMult_MPIAIJKokkos() 53 …nt == mat->cmap->n, PETSC_COMM_SELF, PETSC_ERR_ARG_SIZ, "Incompatible partition of mat (%" PetscIn… in MatMult_MPIAIJKokkos() 64 PetscInt nt; in MatMultAdd_MPIAIJKokkos() local 67 PetscCall(VecGetLocalSize(xx, &nt)); in MatMultAdd_MPIAIJKokkos() 68 …nt == mat->cmap->n, PETSC_COMM_SELF, PETSC_ERR_ARG_SIZ, "Incompatible partition of mat (%" PetscIn… in MatMultAdd_MPIAIJKokkos() 79 PetscInt nt; in MatMultTranspose_MPIAIJKokkos() local 82 PetscCall(VecGetLocalSize(xx, &nt)); in MatMultTranspose_MPIAIJKokkos() 83 …nt == mat->rmap->n, PETSC_COMM_SELF, PETSC_ERR_ARG_SIZ, "Incompatible partition of mat (%" PetscIn… in MatMultTranspose_MPIAIJKokkos()
|
| /petsc/src/binding/petsc4py/src/petsc4py/PETSc/ |
| H A D | TS.pyx | 1518 cdef PetscInt nt = 0 1520 cdef unused = oarray_r(tspan, &nt, &rtspan) 1521 CHKERR(TSSetEvaluationTimes(self.ts, nt, rtspan)) 1534 cdef PetscInt nt = 0 1535 CHKERR(TSGetEvaluationTimes(self.ts, &nt, &rtspan)) 1536 cdef object tspan = array_r(nt, rtspan) 1549 cdef PetscInt nt = 0 1552 CHKERR(TSGetEvaluationSolutions(self.ts, &nt, &rtspan, &sols)) 1555 sollist = [ref_Vec(sols[i]) for i from 0 <= i < nt] 1556 cdef object tspan = array_r(nt, rtspan) [all …]
|
| /petsc/src/ts/tutorials/ |
| H A D | ex10.c | 652 RDNode n, n0, nx, n0x, nt, ntx; in RDIFunction_FE() local 655 RDEvaluate(interp, deriv, q, xdot, i, &nt, &ntx); in RDIFunction_FE() 666 Em_t = dEm.E * nt.E + dEm.T * nt.T; in RDIFunction_FE() 671 …q] * ((1. - Theta) * D0_R * n0x.E + Theta * D_R * nx.E) + interp[q][j] * weight[q] * (nt.E - rad)); in RDIFunction_FE() 738 RDNode n, nx, nt, ntx, drad, dD_R, dxD_R, dEm; in RDIJacobian_FE() local 740 RDEvaluate(interp, deriv, q, xdot, i, &nt, &ntx); in RDIJacobian_FE()
|
| /petsc/src/ksp/ksp/tutorials/ |
| H A D | ex70.c | 870 PetscInt tk, nt, dump_freq; in SolveTimeDepStokes() local 1177 nt = 10; in SolveTimeDepStokes() 1178 PetscCall(PetscOptionsGetInt(NULL, NULL, "-nt", &nt, NULL)); in SolveTimeDepStokes() 1180 for (tk = 1; tk <= nt; tk++) { in SolveTimeDepStokes()
|
| /petsc/src/ksp/ksp/impls/fetidp/ |
| H A D | fetidp.c | 854 PetscInt np, nt; in KSPFETIDPSetUpOperators() local 856 PetscCall(MatGetSize(matis->A, &nt, NULL)); in KSPFETIDPSetUpOperators() 863 if (nv && nv == nt) { in KSPFETIDPSetUpOperators()
|
| /petsc/src/mat/impls/shell/ |
| H A D | shell.c | 420 PetscInt i, nt, *t; in MatZeroRowsColumns_Shell() local 423 for (i = 0, nt = 0; i < n; i++) in MatZeroRowsColumns_Shell() 424 if (rowscols[i] < mat->cmap->N) t[nt++] = rowscols[i]; in MatZeroRowsColumns_Shell() 425 PetscCall(PetscLayoutMapLocal(mat->cmap, nt, t, &nc, &lcols, NULL)); in MatZeroRowsColumns_Shell()
|
| /petsc/src/benchmarks/results/ |
| H A D | performance_medium | 235 sles_ex10 on a nt named gaea with 1 processor, by Unknown Mon Mar 03 13:01:01 1997
|
| /petsc/src/ksp/pc/impls/bddc/ |
| H A D | bddc.c | 41 PetscInt nt, i; in PCSetFromOptions_BDDC() local 103 nt = 2; in PCSetFromOptions_BDDC() 104 …to be used for adaptive selection of constraints", "none", pcbddc->adaptive_threshold, &nt, NULL)); in PCSetFromOptions_BDDC() 105 if (nt == 1) pcbddc->adaptive_threshold[1] = pcbddc->adaptive_threshold[0]; in PCSetFromOptions_BDDC()
|
| /petsc/doc/changes/ |
| H A D | 2024.md | 10 - Changed PETSC_ARCH on Microsoft Windows platforms from nt to win32, and from
|