Searched refs:zGL (Results 1 – 1 of 1) sorted by relevance
57 PetscReal *zGL; member466 PetscCall(PetscCalloc1(p + 1, &glldata->zGL)); in GLLStuffs()468 glldata->zGL[0] = -1.0; in GLLStuffs()469 glldata->zGL[p] = 1.0; in GLLStuffs()471 if (p == 2) glldata->zGL[1] = 0.0; in GLLStuffs()480 … PetscCallBLAS("LAPACKsteqr", LAPACKsteqr_("N", &pm1, &glldata->zGL[1], M, &x, &pm1, M, &lierr)); in GLLStuffs()494 x = glldata->zGL[i]; in GLLStuffs()511 x = glldata->zGL[j]; in GLLStuffs()522 glldata->A[j][j] = 2.0 / (3.0 * (1.0 - glldata->zGL[j] * glldata->zGL[j]) * Lpj * Lpj); in GLLStuffs()524 x = glldata->zGL[r]; in GLLStuffs()[all …]