Lines Matching refs:A_inv
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()
462 const PetscScalar *A_inv = tab->A_inv, *A_inv_rowsum = tab->A_inv_rowsum; in SNESTSFormFunction_IRK() local
476 for (j = 0; j < nstages; j++) PetscCall(VecAXPY(Ydot, A_inv[j * nstages + i] / h, Y[j])); in SNESTSFormFunction_IRK()
517 for (j = 0; j < nstages; j++) S[i + nstages * j] = tab->A_inv[i + nstages * j] / ts->time_step; in SNESTSFormJacobian_IRK()
602 PetscCall(MatCreateKAIJ(J, nstages, nstages, tab->A_inv, tab->I_s, &irk->TJ)); in TSSetUp_IRK()