| /petsc/share/petsc/matlab/ |
| H A D | laplacian.m | 181 BB = zeros(1, 2*dim); variable 185 BB(i) = 3; 186 BB(i + dim) = 3; 192 BB(i) = 1; 194 BB(i) = 2; 199 BB(i + dim) = 1; 201 BB(i + dim) = 2; 229 if (BB(1) == 1) && (BB(1+dim) == 1) 232 elseif (BB(1) == 2) && (BB(1+dim) == 2) 235 elseif ((BB(1) == 1) && (BB(1+dim) == 2)) || ((BB(1) == 2)... [all …]
|
| /petsc/src/snes/tutorials/ |
| H A D | ex75.c | 59 PetscScalar a, b, r, _aa, _bb, AA, BB, Rm; in SolKxSolution() local 119 BB = _bb; in SolKxSolution() 133 t32 = 0.8e1 * t15 * BB * kn * Rp; in SolKxSolution() 146 t78 = t65 * t76 * BB; in SolKxSolution() 159 t117 = t110 * t115 * BB; in SolKxSolution() 163 …BB * kn * Rm * Rp) * t49 - 0.2e1 * B * (0.3e1 * t20 - t18 * Rp - 0.2e1 * t19 - Rp * t13 - t22 - 0.… in SolKxSolution() 185 t53 = t3 * BB; in SolKxSolution() 224 t152 = t2 * t10 * BB; in SolKxSolution() 226 …BB) * t23 + ((-0.2e1 * t25 * (t7 - t8 + 0.5e1 * t3 - t9) * AA + 0.8e1 * B * BB * t32 * Rp) * t38 +… in SolKxSolution() 240 t30 = 0.8e1 * t14 * BB * kn * Rp; in SolKxSolution() [all …]
|
| H A D | ex69.c | 203 PetscReal a, b, r, _aa, _bb, AA, BB, Rm; in SolKxSolution() local 271 BB = _bb; in SolKxSolution() 288 t32 = 0.8e1 * t13 * BB * kn * Rp; in SolKxSolution() 301 t78 = t65 * t76 * BB; in SolKxSolution() 314 t117 = t110 * t115 * BB; in SolKxSolution() 318 …BB * kn * Rm * Rp) * t49 - 0.2e1 * B * (0.3e1 * t20 - Rp * t22 - t18 * Rp - 0.2e1 * t19 - t16 - 0.… in SolKxSolution() 340 t53 = t3 * BB; in SolKxSolution() 377 t152 = t2 * t10 * BB; in SolKxSolution() 379 …BB) * t23 + ((-0.2e1 * t25 * (t7 + 0.5e1 * t3 - t8 - t9) * AA + 0.8e1 * B * BB * t32 * Rp) * t38 +… in SolKxSolution() 393 t30 = 0.8e1 * t16 * BB * kn * Rp; in SolKxSolution() [all …]
|
| /petsc/src/ts/tests/ |
| H A D | ex12.c | 425 PetscErrorCode RHSJacobian(TS ts, PetscReal t, Vec global_in, Mat AA, Mat BB, PetscCtx ctx) in RHSJacobian() argument 455 PetscCall(MatGetOwnershipRange(BB, &mstarts, &mends)); in RHSJacobian() 476 PetscCall(MatSetValues(BB, 1, &mstart, 1, &mstart, v, INSERT_VALUES)); in RHSJacobian() 482 PetscCall(MatSetValues(BB, 1, &mend, 1, &mend, v, INSERT_VALUES)); in RHSJacobian() 498 PetscCall(MatSetValues(BB, 1, &i, 3, idx, v, INSERT_VALUES)); in RHSJacobian() 515 PetscCall(MatAssemblyBegin(BB, MAT_FINAL_ASSEMBLY)); in RHSJacobian() 516 PetscCall(MatAssemblyEnd(BB, MAT_FINAL_ASSEMBLY)); in RHSJacobian() 517 if (BB != AA) { in RHSJacobian() 526 PetscCall(MatSetOption(BB, MAT_NEW_NONZERO_LOCATION_ERR, PETSC_TRUE)); in RHSJacobian()
|
| H A D | ex2.c | 173 PetscErrorCode RHSJacobian(TS ts, PetscReal t, Vec x, Mat A, Mat BB, PetscCtx ctx) in RHSJacobian() argument 187 PetscCall(MatSetValues(BB, 1, idx, 3, idx, v, INSERT_VALUES)); in RHSJacobian() 192 PetscCall(MatSetValues(BB, 1, idx + 1, 3, idx, v, INSERT_VALUES)); in RHSJacobian() 197 PetscCall(MatSetValues(BB, 1, idx + 2, 3, idx, v, INSERT_VALUES)); in RHSJacobian() 199 PetscCall(MatAssemblyBegin(BB, MAT_FINAL_ASSEMBLY)); in RHSJacobian() 200 PetscCall(MatAssemblyEnd(BB, MAT_FINAL_ASSEMBLY)); in RHSJacobian() 202 if (A != BB) { in RHSJacobian()
|
| H A D | ex24.c | 16 PetscErrorCode RHSJacobian(TS ts, PetscReal t, Vec U, Mat A, Mat BB, PetscCtx ctx) in RHSJacobian() argument
|
| H A D | ex4.c | 271 PetscErrorCode RHSJacobian(TS ts, PetscReal t, Vec x, Mat A, Mat BB, void *ptr) in RHSJacobian() argument
|
| /petsc/src/ts/tutorials/ |
| H A D | ex2.c | 520 PetscErrorCode RHSJacobian(TS ts, PetscReal t, Vec global_in, Mat AA, Mat BB, PetscCtx ctx) in RHSJacobian() argument 550 PetscCall(MatGetOwnershipRange(BB, &mstarts, &mends)); in RHSJacobian() 571 PetscCall(MatSetValues(BB, 1, &mstart, 1, &mstart, v, INSERT_VALUES)); in RHSJacobian() 577 PetscCall(MatSetValues(BB, 1, &mend, 1, &mend, v, INSERT_VALUES)); in RHSJacobian() 593 PetscCall(MatSetValues(BB, 1, &i, 3, idx, v, INSERT_VALUES)); in RHSJacobian() 610 PetscCall(MatAssemblyBegin(BB, MAT_FINAL_ASSEMBLY)); in RHSJacobian() 611 PetscCall(MatAssemblyEnd(BB, MAT_FINAL_ASSEMBLY)); in RHSJacobian() 612 if (BB != AA) { in RHSJacobian() 621 PetscCall(MatSetOption(BB, MAT_NEW_NONZERO_LOCATION_ERR, PETSC_TRUE)); in RHSJacobian()
|
| H A D | ex5.c | 416 PetscErrorCode RHSMatrixHeat(TS ts, PetscReal t, Vec X, Mat AA, Mat BB, PetscCtx ctx) in RHSMatrixHeat() argument
|
| H A D | ex6.c | 425 PetscErrorCode RHSMatrixHeat(TS ts, PetscReal t, Vec X, Mat AA, Mat BB, PetscCtx ctx) in RHSMatrixHeat() argument
|
| H A D | ex50.c | 413 PetscErrorCode RHSMatrixLaplaciangllDM(TS ts, PetscReal t, Vec X, Mat A, Mat BB, PetscCtx ctx) in RHSMatrixLaplaciangllDM() argument 485 PetscErrorCode RHSMatrixAdvectiongllDM(TS ts, PetscReal t, Vec X, Mat A, Mat BB, PetscCtx ctx) in RHSMatrixAdvectiongllDM() argument
|
| H A D | ex4.c | 482 PetscErrorCode RHSMatrixHeat(TS ts, PetscReal t, Vec X, Mat AA, Mat BB, PetscCtx ctx) in RHSMatrixHeat() argument
|
| H A D | ex3.c | 462 PetscErrorCode RHSMatrixHeat(TS ts, PetscReal t, Vec X, Mat AA, Mat BB, PetscCtx ctx) in RHSMatrixHeat() argument
|
| /petsc/src/ts/tutorials/advection-diffusion-reaction/ |
| H A D | reaction_diffusion.c | 92 PetscErrorCode RHSJacobian(TS ts, PetscReal t, Vec U, Mat A, Mat BB, PetscCtx ctx) in RHSJacobian() argument 185 …if (appctx->aijpc) PetscCall(MatSetValuesStencil(BB, 1, &rowstencil, 6, stencil, entries, INSERT_V… in RHSJacobian() 201 …if (appctx->aijpc) PetscCall(MatSetValuesStencil(BB, 1, &rowstencil, 6, stencil, entries, INSERT_V… in RHSJacobian() 216 PetscCall(MatAssemblyBegin(BB, MAT_FINAL_ASSEMBLY)); in RHSJacobian() 217 PetscCall(MatAssemblyEnd(BB, MAT_FINAL_ASSEMBLY)); in RHSJacobian() 218 PetscCall(MatSetOption(BB, MAT_NEW_NONZERO_LOCATION_ERR, PETSC_TRUE)); in RHSJacobian() 302 PetscErrorCode IJacobian(TS ts, PetscReal t, Vec U, Vec Udot, PetscReal a, Mat A, Mat BB, PetscCtx … in IJacobian() argument 395 …if (appctx->aijpc) PetscCall(MatSetValuesStencil(BB, 1, &rowstencil, 6, stencil, entries, INSERT_V… in IJacobian() 411 …if (appctx->aijpc) PetscCall(MatSetValuesStencil(BB, 1, &rowstencil, 6, stencil, entries, INSERT_V… in IJacobian() 426 PetscCall(MatAssemblyBegin(BB, MAT_FINAL_ASSEMBLY)); in IJacobian() [all …]
|
| H A D | ex3.c | 256 PetscErrorCode RHSMatrixHeat(TS ts, PetscReal t, Vec U, Mat AA, Mat BB, PetscCtx ctx) in RHSMatrixHeat() argument
|
| H A D | ex5adj_mf.c | 388 PetscErrorCode RHSJacobianShell(TS ts, PetscReal t, Vec U, Mat A, Mat BB, PetscCtx ctx) in RHSJacobianShell() argument 398 PetscErrorCode IJacobianShell(TS ts, PetscReal t, Vec U, Vec Udot, PetscReal a, Mat A, Mat BB, Pets… in IJacobianShell() argument
|
| /petsc/src/ksp/ksp/tests/ |
| H A D | ex31.c | 61 Mat BB; in main() local 104 PetscCall(MatCreateSubMatrix(A, is, is, MAT_INITIAL_MATRIX, &BB)); in main() 107 PetscCall(MatView(BB, PETSC_VIEWER_DRAW_WORLD)); in main() 113 A = BB; in main()
|
| H A D | ex30.c | 202 Mat BB; in main() local 219 PetscCall(MatCreateSubMatrix(A, is, is, MAT_INITIAL_MATRIX, &BB)); in main() 224 A = BB; in main()
|
| /petsc/src/ts/impls/pseudo/ |
| H A D | posindep.c | 243 static PetscErrorCode SNESTSFormJacobian_Pseudo(SNES snes, Vec X, Mat AA, Mat BB, TS ts) in SNESTSFormJacobian_Pseudo() argument 250 …PetscCall(TSComputeIJacobian(ts, ts->ptime + ts->time_step, X, Xdot, 1. / ts->time_step, AA, BB, P… in SNESTSFormJacobian_Pseudo()
|
| /petsc/src/tao/unconstrained/tutorials/ |
| H A D | burgers_spectral.c | 425 PetscErrorCode RHSMatrixLaplaciangllDM(TS ts, PetscReal t, Vec X, Mat A, Mat BB, PetscCtx ctx) in RHSMatrixLaplaciangllDM() argument 487 PetscErrorCode RHSMatrixAdvectiongllDM(TS ts, PetscReal t, Vec X, Mat A, Mat BB, PetscCtx ctx) in RHSMatrixAdvectiongllDM() argument
|
| H A D | spectraladjointassimilation.c | 450 PetscErrorCode RHSLaplacian(TS ts, PetscReal t, Vec X, Mat A, Mat BB, PetscCtx ctx) in RHSLaplacian() argument 501 PetscErrorCode RHSAdvection(TS ts, PetscReal t, Vec X, Mat A, Mat BB, PetscCtx ctx) in RHSAdvection() argument
|
| /petsc/src/ksp/ksp/impls/fetidp/ |
| H A D | fetidp.c | 839 IS BB, lP_I, lP_B; in KSPFETIDPSetUpOperators() local 841 PetscCall(ISComplement(II, 0, n, &BB)); in KSPFETIDPSetUpOperators() 843 PetscCall(ISEmbed(lP, BB, PETSC_TRUE, &lP_B)); in KSPFETIDPSetUpOperators() 846 PetscCall(ISDestroy(&BB)); in KSPFETIDPSetUpOperators()
|
| /petsc/src/ts/utils/dmplexlandau/kokkos/ |
| H A D | landau.kokkos.cxx | 139 PetscReal *BB, *DD; in LandauKokkosStaticDataSet() local 150 BB = Tf[0]->T[0]; in LandauKokkosStaticDataSet() 178 … Kokkos::LayoutLeft, Kokkos::HostSpace, Kokkos::MemoryTraits<Kokkos::Unmanaged>> h_BB(BB, Nq * Nb); in LandauKokkosStaticDataSet()
|
| /petsc/src/mat/impls/aij/mpi/ |
| H A D | mpiov.c | 3160 Mat AA = A[i], BB = B[ii]; in MatCreateSubMatricesMPI_MPIXAIJ() local 3162 if (AA || BB) { in MatCreateSubMatricesMPI_MPIXAIJ() 3163 … PetscCall(setseqmats((*submat)[i], isrow_p[i], iscol_p[i], ciscol_p[ii], pattern, AA, BB)); in MatCreateSubMatricesMPI_MPIXAIJ()
|
| /petsc/src/ts/utils/dmplexlandau/ |
| H A D | plexland.c | 223 const PetscReal *const BB = Tf[0]->T[0], *const DD = Tf[0]->T[1]; in LandauFormJacobian_Internal() local 279 const PetscReal *Bq = &BB[qi * Nb]; in LandauFormJacobian_Internal() 444 const PetscReal *BJq = &BB[qj * Nb], *DIq = &DD[qj * Nb * dim]; in LandauFormJacobian_Internal()
|