正方形を四角形要素で分割

l = 2 ;

Point(1) = {0, 0, 0, l};
Point(2) = {1, 0, 0, l} ;
Point(3) = {1, 1, 0, l} ;
Point(4) = {0, 1, 0, l} ;

Line(11) = {1,2} ;
Line(12) = {2,3} ;
Line(13) = {3,4} ;
Line(14) = {4,1} ;

Line Loop(5) = {11,12,13,14} ;

Plane Surface(6) = {-5} ;
Transfinite Line{11,12,13,14}=10;
Transfinite Surface{6}={1,2,3,4};
Recombine Surface {6};

// Consequently, two punctual elements will be saved in the output
// files, both with the region number 1. The mechanism is identical
// for line or surface elements:

// Physical Line(10) = {1,2,4} ;

MySurface = 100;
Physical Surface(MySurface) = {6} ;