Lines Matching refs:CPowF
27 static PetscScalar CPowF(PetscScalar c, PetscInt p) in CPowF() function
146 for (j = 0; j < s; j++) scheme->alpha[i] -= b[i * s + j] * CPowF(c[j], p); in TSGLLESchemeCreate()
157 for (j = 0; j < s; j++) scheme->beta[i] -= b[i * s + j] * CPowF(c[j], p + 1); in TSGLLESchemeCreate()
167 scheme->stage_error[i] = CPowF(c[i], p + 1); in TSGLLESchemeCreate()
168 for (j = 0; j < s; j++) scheme->stage_error[i] -= a[i * s + j] * CPowF(c[j], p); in TSGLLESchemeCreate()
176 for (j = 0; j < s; j++) scheme->alpha[0] -= b[0 * s + j] * CPowF(c[j], p); in TSGLLESchemeCreate()
194 for (j = 0; j < s; j++) scheme->beta[0] -= b[0 * s + j] * CPowF(c[j], p + 1); in TSGLLESchemeCreate()
216 H[0 + j * 3] = CPowF(c[j], p); in TSGLLESchemeCreate()
217 H[1 + j * 3] = CPowF(c[j], p + 1); in TSGLLESchemeCreate()
220 H[0 + j * 3] += CPowF(c[j], k - 1) * scheme->alpha[k]; in TSGLLESchemeCreate()
221 H[1 + j * 3] += CPowF(c[j], k - 1) * scheme->beta[k]; in TSGLLESchemeCreate()
222 H[2 + j * 3] -= CPowF(c[j], k - 1) * scheme->gamma[k]; in TSGLLESchemeCreate()
261 scheme->psi[0 * r + j] -= CPowF(c[k], j - 1) * scheme->phi[0 * s + k]; in TSGLLESchemeCreate()
262 scheme->psi[1 * r + j] -= CPowF(c[k], j - 1) * scheme->phi[1 * s + k]; in TSGLLESchemeCreate()
263 scheme->psi[2 * r + j] -= CPowF(c[k], j - 1) * scheme->phi[2 * s + k]; in TSGLLESchemeCreate()