%
%
%

echo on
figure, pdegplot('geome8'), axis('equal'), grid on;
pause
[p,e,t]=initmesh('geome8','hmax',.3,'init','on');
pause
figure, pdemesh(p,e,t), axis('equal'), grid on
pause
db03_geome8
pause
jigglemesh(p,e,t,'opt','off','iter',10);
pause
hold on, pdemesh(p,e,t)
pause
[p1,e1,t1]=refinemesh('geome8',p,e,t);
pause
figure, pdemesh(p1,e1,t1), axis('equal')
echo off
