Searched refs:gauss_A (Results 1 – 2 of 2) sorted by relevance
| /petsc/src/ts/impls/implicit/irk/ |
| H A D | irk.c | 92 PetscScalar *gauss_A, *gauss_A_inv, *gauss_A_inv_rowsum, *I_s; in TSIRKCreate_Gauss() local
100 …PetscCall(PetscMalloc4(PetscSqr(nstages), &gauss_A, PetscSqr(nstages), &gauss_A_inv, nstages, &gau… in TSIRKCreate_Gauss()
115 PetscCall(MatCreateSeqDense(PETSC_COMM_SELF, nstages, nstages, gauss_A, &Amat)); in TSIRKCreate_Gauss()
120 …for (j = 0; j < nstages; j++) gauss_A_real[i * nstages + j] = PetscRealPart(gauss_A[i * nstages + … in TSIRKCreate_Gauss()
137 PetscCall(MatSetValuesBlocked(A_baij, 1, idxm, 1, idxn, gauss_A, INSERT_VALUES)); in TSIRKCreate_Gauss()
155 PetscCall(PetscFree4(gauss_A, gauss_A_inv, gauss_A_inv_rowsum, I_s)); in TSIRKCreate_Gauss()
|
| /petsc/src/ksp/ksp/tutorials/ |
| H A D | ex74.c | 280 static PetscErrorCode RKCreate_Gauss(PetscInt nstages, PetscScalar **gauss_A, PetscScalar **gauss_b… in RKCreate_Gauss() argument
312 *gauss_A = A; in RKCreate_Gauss()
|