Mesh.Format=30;

Mesh.RecombinationAlgorithm=1;
Mesh.CharacteristicLengthMin=.005;
Mesh.CharacteristicLengthMax=.07;
Mesh.Algorithm=1;
Merge "tris.mesh";
CreateTopology;

For i In {1:5}
	Compound Surface(1000+i)={2000+i};
	Recombine Surface{1000+i} = 0;
	Physical Surface(3000+i)={1000+i};
EndFor

For i In {7:9}
	Compound Surface(1000+i)={2000+i};
	Recombine Surface{1000+i} = 0;
	Physical Surface(3000+i)={1000+i};
EndFor

For i In {11:23}
	Compound Surface(1000+i)={2000+i};
	Recombine Surface{1000+i} = 0;
	Physical Surface(3000+i)={1000+i};
EndFor

For i In {26:35}
	Compound Surface(1000+i)={2000+i};
	Recombine Surface{1000+i} = 0;
	Physical Surface(3000+i)={1000+i};
EndFor
For i In {37:37}
	Compound Surface(1000+i)={2000+i};
	Recombine Surface{1000+i} = 0;
	Physical Surface(3000+i)={1000+i};
EndFor