Computing grad(u) over each triangle

Hi there!

I am trying to find the components of grad(w) in each triangle where w is a P1 element. Here is my code

for (int i=0;i<nbtriangles;i++){ 
	// For each triangle T_i in the mesh, we have w(x)=a_ix+b_iy+c_i
	// and thus grad w = (a_i,b_i). 	
	real xp1= Th[i][0].x;
	real xp2= Th[i][1].x;
	real xp3= Th[i][2].x;
	real yp1= Th[i][0].y;
	real yp2= Th[i][1].y;
	real yp3= Th[i][2].y;
	real wp1=w(xp1, yp1); // Interpolation  
	real wp2=w(xp2, yp2); // is happening  
	real wp3=w(xp3, yp3); // here. 
	M = [[xp1,yp1,1],[xp2,yp2,1],[xp3,yp3,1]];					
	real[int] bb = [wp1,wp2,wp3];
	real[int] xx = [0,0,0];	
	set(M,solver=sparsesolver);
	xx=M^-1 * bb; 
}

Is there a faster way to do this? Interpolation is making the code slow!

Also, if I remove the line set(M,solver=sparsesolver) then I get the error"

sizestack + 1024 =16896 ( 15872 )

– Square mesh : nb vertices =1089 , nb triangles = 2048 , nb boundary edges 128
– Solve :
min -0.137402 max 0.137394
– Solve :
min -0.0755225 max 0.0755066

Hello,
Did you try using “dx(w)” and “dy(w)” ?
I did not check if it needs to be “transferred” from function type to vector type…
HTH
Denis

I tried “dx(w)” and it outputs a number not a vector.

On another note, with regards to the code in the question, is there a way to get w(x,y) if (x,y) is a mesh point, without doing interpolation?

dx(w) gives the partial derivative w.r.t. x and dy(w) gives the partial derivative w.r.t. y.

Yes, if u is a FE function then u[] is a real[int] which gives the values at the degrees of freedom. So something like u[][Th[i][0]] should give you the value of u at the point Th[i][0]. But you should check the FreeFem manual to be sure how this works.

But w is a P1 element, not the constant function. Therefore dx(w) should be a function of x and y and not just a number. More specifically, grad(w) should be a different constant on each triangle in the mesh Th.
So what is dx(w) actually outputting?

dx(w) is not a function, but a Finite element function.

In order to get a different constant on every triangle in the mesh use a P0 finite element to capture it. In fact, if you try to store dx(w) as a P1 function you get inaccurate results (as shown in the code below). If you store it as a P0 function then I guess you’ll recover what you want.


int NN = 20;
mesh Th=square(NN,NN,[-1+2x,-1+2y]);

fespace Vh(Th,P1);
fespace Vh0(Th,P0);

Vh u = sqrt(x^2+y^2);

Vh gx = dx(u);
plot(gx,fill=1,wait=1,cmm=“grad P1”);

Vh0 gx0 = dx(u);
plot(gx0,fill=1,wait=1,cmm=“grad P0”);