25#include "neumann-laplace-assembly.h"
29 form m (Qh, Qh,
"mass");
32 form a = integrate (dot(grad(
p),grad(q)));
33 form_diag dm (Qh,
"mass");
35 csr<Float> c = neumann_laplace_assembly (a.uu, mh.u);
38 vec<Float>
solve (
const vec<Float>& Mp)
const {
39 vec<Float> q1 =
fact_m.solve(Mp);
40 vec<Float> Mp_e (Mp.size()+1);
41 for (
size_t i = 0; i < Mp.size(); i++) Mp_e.at(i) = Mp.at(i);
42 Mp_e.at(Mp.size()) = 0;
43 vec<Float> q2_e =
fact_c.solve(Mp_e);
44 vec<Float> q2 (Mp.size());
45 for (
size_t i = 0; i < q2.size(); i++) q2.at(i) = q2_e.at(i);
46 vec<Float> q = q1 +
lambda*q2;
see the Float page for the full documentation
see the field page for the full documentation
see the space page for the full documentation
see the test page for the full documentation
see the test page for the full documentation
vec< Float > solve(const vec< Float > &Mp) const
cahouet_chabart(const space &Qh, Float lambda_1)