3 #include "library/laplace_3d.hpp"
7 void mexFunction(
int nlhs, mxArray *lhs[],
int nrhs, mxArray
const *rhs[])
9 dMatrix surf_nodes(rhs[0]), surf_elem(rhs[1]);
13 dMatrix field_nodes(rhs[2]), field_elem(rhs[3]);
17 size_t n = surf_sp.get_num_dofs();
18 dMatrix L_surf(n, n, lhs[0]), M_surf(n, n, lhs[1]);
19 size_t m = field_sp.get_num_dofs();
20 dMatrix L_field(m, n, lhs[2]), M_field(m, n, lhs[3]);
25 L_surf <<
dirac(surf_sp) * L[surf_sp];
26 M_surf <<
dirac(surf_sp) * M[surf_sp];
27 L_field <<
dirac(field_sp) * L[surf_sp];
28 M_field <<
dirac(field_sp) * M[surf_sp];