31 lines
680 B
Matlab
31 lines
680 B
Matlab
function meshplot(node,element)
|
|
|
|
X = node(:,1)';
|
|
Y = node(:,2)';
|
|
nnt=size(node,1);
|
|
[nelt, nnel]=size(element);
|
|
liste=find(element(:,nnel)~=0);
|
|
CONEC=element(liste,:)';
|
|
|
|
% Usage de patch qui requiert des arguments en vecteur-lignes !
|
|
patch(X(CONEC),Y(CONEC),ones(1,nnel));
|
|
|
|
% Affichage des numeros
|
|
if nnt<80
|
|
for in=1:nnt
|
|
xx=X(in);
|
|
yy=Y(in);
|
|
text(xx,yy,num2str(in))
|
|
end
|
|
end
|
|
if nelt<80
|
|
for ie=1:nelt
|
|
nnel=3;
|
|
if(element(ie,3)==0)
|
|
nnel=2;
|
|
end
|
|
xx=sum(X(element(ie,[1:nnel])))./nnel;
|
|
yy=sum(Y(element(ie,[1:nnel])))./nnel;
|
|
text(xx,yy,num2str(ie));
|
|
end
|
|
end
|