Searched refs:dS (Results 1 – 2 of 2) sorted by relevance
| /petsc/src/mat/tests/ |
| H A D | ex221.c | 316 Vec dA, dS; in main() local
319 PetscCall(MatCreateVecs(S, &dS, NULL)); in main()
321 PetscCall(MatGetDiagonal(S, dS)); in main()
322 PetscCall(VecAXPY(dA, -1.0, dS)); in main()
326 PetscCall(VecDestroy(&dS)); in main()
341 Mat sA, sS, dA, dS, At, St; in main() local
356 PetscCall(MatConvert(sS, MATDENSE, MAT_INITIAL_MATRIX, &dS)); in main()
357 PetscCall(MatAXPY(dA, -1.0, dS, SAME_NONZERO_PATTERN)); in main()
363 PetscCall(MatDestroy(&dS)); in main()
373 PetscCall(MatConvert(sS, MATDENSE, MAT_INITIAL_MATRIX, &dS)); in main()
[all …]
|
| /petsc/src/snes/tutorials/ |
| H A D | ex16.c | 352 …tKirchoffJacobian(PetscReal lambda, PetscReal mu, PetscScalar *F, PetscScalar *dF, PetscScalar *dS) in SaintVenantKirchoffJacobian() argument
364 dS[i + 3 * j] = 2. * mu * dE[i + 3 * j]; in SaintVenantKirchoffJacobian()
365 if (i == j) dS[i + 3 * j] += dtrE * lambda; in SaintVenantKirchoffJacobian()
466 PetscScalar F[9], S[9], dF[9], dS[9], dFS[9], FdS[9], FS[9]; in FormElementJacobian() local
531 SaintVenantKirchoffJacobian(user->lambda, user->mu, F, dF, dS); in FormElementJacobian()
533 TensorTensor(F, dS, FdS); in FormElementJacobian()
|