H10_scalar_product_matrix.m

Go to the documentation of this file.

function K_one = H10_scalar_product_matrix(p,t,c,a,f)
%this routine computes the stiffness matrix for a constant c=1.
%K_one = int_omega (grad phi_j) . grad phi_i dx

c_ones=ones(1,length(c));

[K_one,dummy1,dummy2]=assema(p,t,c_ones,a,f);