l=1.;

ml=l/20;

Point(newp)= {-l,-l,0, ml};
Point(newp)= {+l,-l,0, ml};
Point(newp)= {-l,+l,0, ml};
Point(newp)= {+l,+l,0, ml};

Line(1) = {1,2};
Line(2) = {2,4};
Line(3) = {4,3};
Line(4) = {3,1};

Line Loop(5) = {1,2,3,4};
Plane Surface(6) = {5};
Physical Line(7) = {1};
Physical Line(8) = {2};
Physical Surface(9) = {6};
