Searched refs:Lnm1 (Results 1 – 1 of 1) sorted by relevance
460 PetscReal Lnm1, Lnm1p; in qAndLEvaluation() local463 Lnm1 = 1.0; in qAndLEvaluation()469 Lnm2 = Lnm1; in qAndLEvaluation()470 Lnm1 = *Ln; in qAndLEvaluation()473 *Ln = (2. * k - 1.) / (1.0 * k) * x * Lnm1 - (k - 1.) / (1.0 * k) * Lnm2; in qAndLEvaluation()474 Lnp = Lnm2p + (2.0 * k - 1) * Lnm1; in qAndLEvaluation()477 Lnp1 = (2. * k - 1.) / (1.0 * k) * x * (*Ln) - (k - 1.) / (1.0 * k) * Lnm1; in qAndLEvaluation()479 *q = Lnp1 - Lnm1; in qAndLEvaluation()