Searched refs:I_quad (Results 1 – 2 of 2) sorted by relevance
28 PetscReal I_quad = 0.0; in testQuadrature() local31 …for (PetscInt q = 0; q < num_points; q++) I_quad += weights[q] * eval[i * num_points + q] * eval[j… in testQuadrature()32 err = PetscAbsReal(I_exact - I_quad); in testQuadrature()
61 PetscReal I_quad = 0.; in CheckQuadrature() local88 for (k = 0; k < npoints; k++) I_quad += w[k] * (Pi[k] * Pj[k]); in CheckQuadrature()89 err = PetscAbsReal(I_exact - I_quad); in CheckQuadrature()