Searched refs:A_inv (Results 1 – 3 of 3) sorted by relevance
| /petsc/src/mat/tests/ |
| H A D | ex184.c | 8 Mat A, A_inv; in main() local
58 PetscCall(MatCreate(PETSC_COMM_WORLD, &A_inv)); in main()
59 PetscCall(MatSetFromOptions(A_inv)); in main()
60 PetscCall(MatInvertBlockDiagonalMat(A, A_inv)); in main()
67 PetscCall(MatMultAdd(A_inv, Y, X, X)); in main()
71 PetscCall(MatView(A_inv, PETSC_VIEWER_STDOUT_WORLD)); in main()
75 PetscCall(MatDestroy(&A_inv)); in main()
|
| /petsc/src/ts/impls/implicit/irk/ |
| H A D | irk.c | 21 PetscScalar *A_inv, *A_inv_rowsum, *I_s; member
67 …Real *b, const PetscReal *c, const PetscReal *binterp, const PetscScalar *A_inv, const PetscScalar… in TSIRKTableauCreate() argument
74 …PetscCall(PetscMalloc3(PetscSqr(nstages), &tab->A, PetscSqr(nstages), &tab->A_inv, PetscSqr(nstage… in TSIRKTableauCreate()
81 if (A_inv) PetscCall(PetscArraycpy(tab->A_inv, A_inv, PetscSqr(nstages))); in TSIRKTableauCreate()
133 const PetscScalar *A_inv; in TSIRKCreate_Gauss() local
140 PetscCall(MatInvertBlockDiagonal(A_baij, &A_inv)); in TSIRKCreate_Gauss()
141 PetscCall(PetscArraycpy(gauss_A_inv, A_inv, nstages * nstages)); in TSIRKCreate_Gauss()
310 PetscScalar *A_inv = tab->A_inv, *A_inv_rowsum = tab->A_inv_rowsum; in TSStep_IRK() local
336 …for (j = 0; j < nstages; j++) PetscCall(VecAXPY(irk->YdotI[i], A_inv[i + j * nstages] / ts->time_s… in TSStep_IRK()
405 PetscCall(PetscFree3(tab->A, tab->A_inv, tab->I_s)); in TSIRKTableauReset()
[all …]
|
| /petsc/src/ksp/ksp/tutorials/ |
| H A D | ex74.c | 142 const PetscScalar *A_inv; in main() local
148 PetscCall(MatInvertBlockDiagonal(A_baij, &A_inv)); in main()
149 PetscCall(PetscArraycpy(A, A_inv, nstages * nstages)); in main()
|