Searched refs:abk1 (Results 1 – 1 of 1) sorted by relevance
788 PetscReal abk1; in PetscDTJacobiEval_Internal() local795 abk1 = a + b + k + 1.; in PetscDTJacobiEval_Internal()814 for (m = 0; m < k; m++) p[l] *= (abk1 + m) * 0.5; in PetscDTJacobiEval_Internal()819 for (m = 0; m < k; m++) p[l] *= (abk1 + 1 + m) * 0.5; in PetscDTJacobiEval_Internal()831 for (m = 0; m < k; m++) p[l] *= (abk1 + j + m) * 0.5; in PetscDTJacobiEval_Internal()