I have a time dependant PDE system:
syms pres
syms u1(x,y,t) u2(x,y,t)
pdeeq = [-laplacian(u1,[x y])+u2; D*laplacian(u2,[x y])+ mass*diff(u1,t,t)-pres];
symcoeffs = pdeCoefficients(pdeeq,[u1,u2],'Symbolic',true);
I then isolate the edges on the perimeter of the plate and I try to enforce Dirichlet boundary conditions to variable u1 in these edges:
I have tried like this:
for j = 1:numel(perimeter)
i=i+1;
edge = perimeter(j);
applyBoundaryCondition(modelTwoDomain,"dirichlet","edge",edge,"h",[1 0;0 0],"r",[1 0]);
end
and like this:
for j = 1:numel(perimeter)
i=i+1;
edge = perimeter(j);
applyBoundaryCondition(model,"dirichlet","Edge",edge,"u",1,"EquationIndex",1);
end
Then I solve the system for a time vector. If it is a Dirichlet, the solution in the edges of the perimeter should be 1 regardless the time instance? When I go to check
uintrp = interpolateSolution(res,0,0.02,1,2);
uintrp=1.4942e-07
What am I doing wrong? I am missing something?
I would really appreciate any light as I have been stuck here in this point months now.
Thanks very much