Searched refs:gauss_A_inv (Results 1 – 1 of 1) 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()
141 PetscCall(PetscArraycpy(gauss_A_inv, A_inv, nstages * nstages)); in TSIRKCreate_Gauss()
149 gauss_A_inv_rowsum[i] += gauss_A_inv[i + nstages * j]; in TSIRKCreate_Gauss()
153 …PetscCall(TSIRKTableauCreate(ts, nstages, gauss_A_real, gauss_b, gauss_c, NULL, gauss_A_inv, gauss… in TSIRKCreate_Gauss()
155 PetscCall(PetscFree4(gauss_A, gauss_A_inv, gauss_A_inv_rowsum, I_s)); in TSIRKCreate_Gauss()
|