| /petsc/src/dm/dt/tests/output/ |
| H A D | ex1_1.out | 2 degree 1 at 0: B= 0 D= 1 D2= 0 3 degree 2 at 0: B= -0.5 D= 0 D2= 3 4 degree 3 at 0: B= 0 D= -1.5 D2= 0 5 degree 4 at 0: B= 0.375 D= 0 D2= -7.5 6 degree 5 at 0: B= 0 D= 1.875 D2= 0 7 degree 1 at 0.2: B= 0.2 D= 1 D2= 0 8 degree 2 at 0.2: B= -0.44 D= 0.6 D2= 3 9 degree 3 at 0.2: B= -0.28 D= -1.2 D2= 3 10 degree 4 at 0.2: B= 0.232 D= -1.36 D2= -5.4 11 degree 5 at 0.2: B= 0.3075 D= 0.888 D2= -9.24 [all …]
|
| /petsc/src/tao/matrix/ |
| H A D | adamat.c | 8 Vec D2; member 26 if (ctx->D2) { in MatMult_ADA() 27 PetscCall(VecPointwiseMult(ctx->W2, ctx->D2, a)); in MatMult_ADA() 48 if (!ctx->D2) { in MatDiagonalSet_ADA() 49 PetscCall(VecDuplicate(D, &ctx->D2)); in MatDiagonalSet_ADA() 50 PetscCall(VecSet(ctx->D2, zero)); in MatDiagonalSet_ADA() 52 PetscCall(VecAXPY(ctx->D2, one, D)); in MatDiagonalSet_ADA() 67 PetscCall(VecDestroy(&ctx->D2)); in MatDestroy_ADA() 84 PetscCall(VecShift(ctx->D2, a)); in MatShift_ADA() 101 PetscCall(VecDuplicate(ctx->D2, &D2b)); in MatDuplicate_ADA() [all …]
|
| /petsc/src/ts/tests/ |
| H A D | ex24.c | 13 PetscReal D1, D2, gamma, kappa; member 110 entries[0] = appctx->D2 * sy; in RHSJacobian() 112 entries[1] = appctx->D2 * sy; in RHSJacobian() 114 entries[2] = appctx->D2 * sx; in RHSJacobian() 116 entries[3] = appctx->D2 * sx; in RHSJacobian() 118 entries[4] = -2.0 * appctx->D2 * (sx + sy) + 2.0 * uc * vc - appctx->gamma - appctx->kappa; in RHSJacobian() 196 appctx.D2 = 4.0e-5; in main()
|
| /petsc/src/ts/tutorials/advection-diffusion-reaction/ |
| H A D | reaction_diffusion.c | 78 f[j][i].v = appctx->D2 * (vxx + vyy) + uc * vc * vc - (appctx->gamma + appctx->kappa) * vc; in RHSFunction() 187 entries[0] = appctx->D2 * sy; in RHSJacobian() 189 entries[1] = appctx->D2 * sy; in RHSJacobian() 191 entries[2] = appctx->D2 * sx; in RHSJacobian() 193 entries[3] = appctx->D2 * sx; in RHSJacobian() 195 entries[4] = -2.0 * appctx->D2 * (sx + sy) + 2.0 * uc * vc - appctx->gamma - appctx->kappa; in RHSJacobian() 287 …f[j][i].v = udot[j][i].v - (appctx->D2 * (vxx + vyy) + uc * vc * vc - (appctx->gamma + appctx->kap… in IFunction() 397 entries[0] = -appctx->D2 * sy; in IJacobian() 399 entries[1] = -appctx->D2 * sy; in IJacobian() 401 entries[2] = -appctx->D2 * sx; in IJacobian() [all …]
|
| H A D | reaction_diffusion.h | 12 PetscReal D1, D2, gamma, kappa; member
|
| H A D | ex5adj_mf.c | 107 …y[j][i].v = appctx->D2 * (vxx + vyy) - 2.0 * uc * vc * ucb + (2.0 * uc * vc - appctx->gamma - appc… in MyRHSMatMultTranspose() 166 …y[j][i].v = appctx->D2 * (vxx + vyy) - 2.0 * uc * vc * ucb + (2.0 * uc * vc - appctx->gamma - appc… in MyIMatMultTranspose() 227 …y[j][i].v = appctx->D2 * (vxx + vyy) + vc * vc * ucb + (2.0 * uc * vc - appctx->gamma - appctx->ka… in MyIMatMult() 260 appctx.D2 = 4.0e-5; in main()
|
| H A D | ex5.c | 99 appctx.D2 = 4.0e-5; in main()
|
| H A D | ex5adj.c | 59 appctx.D2 = 4.0e-5; in main()
|
| H A D | ex5opt_ic.c | 223 appctx.D2 = 4.0e-5; in main()
|
| /petsc/src/ksp/ksp/impls/bcgs/qmrcgs/ |
| H A D | qmrcgs.c | 19 Vec X, B, R, P, PH, V, D2, X2, S, SH, T, D, S2, RP, AX, Z; in KSPSolve_QMRCGS() local 32 D2 = ksp->work[4]; in KSPSolve_QMRCGS() 118 PetscCall(VecWAXPY(D2, cf, D, PH)); /* d2 <- ph + cf d */ in KSPSolve_QMRCGS() 119 PetscCall(VecWAXPY(X2, eta2, D2, X)); /* x2 <- x + eta2 d2 */ in KSPSolve_QMRCGS() 180 PetscCall(VecWAXPY(D, cf1, D2, SH)); /* d <- sh + cf1 d2 */ in KSPSolve_QMRCGS()
|
| /petsc/src/dm/dt/tests/ |
| H A D | ex1.c | 10 PetscReal *B, *D, *D2; in CheckPoints() local 14 PetscCall(PetscMalloc3(npoints * ndegrees, &B, npoints * ndegrees, &D, npoints * ndegrees, &D2)); in CheckPoints() 15 PetscCall(PetscDTLegendreEval(npoints, points, ndegrees, degrees, B, D, D2)); in CheckPoints() 22 d2 = D2[i * ndegrees + j]; in CheckPoints() 29 PetscCall(PetscFree3(B, D, D2)); in CheckPoints()
|
| /petsc/src/ts/tutorials/autodiff/ |
| H A D | adr_ex5adj.cxx | 55 PetscReal D1, D2, gamma, kappa; member 99 appctx.D2 = 4.0e-5; in main() 389 …f[j][i].v = udot[j][i].v - appctx->D2 * (vxx + vyy) - uc * vc * vc + (appctx->gamma + appctx->kapp… in IFunctionLocalPassive() 485 …f_a[j][i].v = udot[j][i].v - appctx->D2 * (vxx + vyy) - uc * vc * vc + (appctx->gamma + appctx->ka… in IFunctionActive() 581 f[j][i].v = appctx->D2 * (vxx + vyy) + uc * vc * vc - (appctx->gamma + appctx->kappa) * vc; in RHSFunctionPassive() 699 f_a[j][i].v = appctx->D2 * (vxx + vyy) + uc * vc * vc - (appctx->gamma + appctx->kappa) * vc; in RHSFunctionActive() 881 entries[0] = -appctx->D2 * sy; in IJacobianByHand() 883 entries[1] = -appctx->D2 * sy; in IJacobianByHand() 885 entries[2] = -appctx->D2 * sx; in IJacobianByHand() 887 entries[3] = -appctx->D2 * sx; in IJacobianByHand() [all …]
|
| H A D | adr_ex5adj_mf.cxx | 31 PetscReal D1, D2, gamma, kappa; member 61 appctx.D2 = 4.0e-5; in main() 277 …f[j][i].v = udot[j][i].v - appctx->D2 * (vxx + vyy) - uc * vc * vc + (appctx->gamma + appctx->kapp… in IFunctionLocalPassive() 373 …f_a[j][i].v = udot[j][i].v - appctx->D2 * (vxx + vyy) - uc * vc * vc + (appctx->gamma + appctx->ka… in IFunctionActive()
|
| /petsc/lib/petsc/bin/maint/abi-compliance-checker/modules/Internals/ |
| H A D | SysFiles.pm | 2330 my ($D1, $D2) = @_; 2331 if($D1 eq $D2) { 2336 my $U2 = index($D2, "/usr/"); 2346 if(index($D2, $D1."/")==0) { 2362 my @Dirs2 = ($D2); 2363 while(getDepth($D2)>=4 2364 and $D2=~s/[\/\\]+[^\/\\]*?\Z//) { 2365 push(@Dirs2, $D2);
|
| /petsc/src/mat/tests/ |
| H A D | ex70.c | 727 Mat C, D, D2, AtA; in main() local 731 PetscCall(MatDuplicate(B, MAT_DO_NOT_COPY_VALUES, &D2)); in main() 735 PetscCall(MatSetRandom(D2, NULL)); in main() 765 PetscCall(MatDestroy(&D2)); in main()
|
| /petsc/src/dm/dt/interface/ |
| H A D | dt.c | 916 …cInt ndegree, const PetscInt *degrees, PeOp PetscReal B[], PeOp PetscReal D[], PeOp PetscReal D2[]) in PetscDTJacobiEval() argument 924 …if (D2) PetscCall(PetscDTJacobiEval_Internal(npoints, alpha, beta, 2, points, ndegree, degrees, D2… in PetscDTJacobiEval() 948 …cInt ndegree, const PetscInt *degrees, PeOp PetscReal B[], PeOp PetscReal D[], PeOp PetscReal D2[]) in PetscDTLegendreEval() argument 951 PetscCall(PetscDTJacobiEval(npoints, 0., 0., points, ndegree, degrees, B, D, D2)); in PetscDTLegendreEval()
|
| /petsc/lib/petsc/bin/maint/ |
| H A D | toclapack.sh | 2366 /* $ ( D1.EQ.A ).AND.( D2.EQ.A ) )LOOP */ 4357 /* $ ( D1.EQ.A ).AND.( D2.EQ.A ) )LOOP */
|