Searched refs:Abase (Results 1 – 1 of 1) sorted by relevance
| /petsc/src/ts/impls/multirate/ |
| H A D | mprk.c | 69 static PetscErrorCode TSMPRKGenerateTableau2(PetscInt ratio, PetscInt s, const PetscReal Abase[], c… in TSMPRKGenerateTableau2() argument 78 A1[(k * s + i) * ratio * s + k * s + j] = Abase[i * s + j]; in TSMPRKGenerateTableau2() 79 A2[(k * s + i) * ratio * s + k * s + j] = Abase[i * s + j] / ratio; in TSMPRKGenerateTableau2() 93 static PetscErrorCode TSMPRKGenerateTableau3(PetscInt ratio, PetscInt s, const PetscReal Abase[], c… in TSMPRKGenerateTableau3() argument 102 … A1[((k * ratio + l) * s + i) * ratio * ratio * s + (k * ratio + l) * s + j] = Abase[i * s + j]; in TSMPRKGenerateTableau3() 103 …A2[((k * ratio + l) * s + i) * ratio * ratio * s + (k * ratio + l) * s + j] = Abase[i * s + j] / r… in TSMPRKGenerateTableau3() 104 …A3[((k * ratio + l) * s + i) * ratio * ratio * s + (k * ratio + l) * s + j] = Abase[i * s + j] / r… in TSMPRKGenerateTableau3() 234 const PetscReal Abase[2][2] = in TSMPRKRegisterAll() local 242 PetscCall(TSMPRKGenerateTableau2(2, 2, &Abase[0][0], bbase, &Asb[0][0], bsb, &Af[0][0], bf)); in TSMPRKRegisterAll() 246 const PetscReal Abase[2][2] = in TSMPRKRegisterAll() local [all …]
|