/* --------------------------------------------------------------------------
    File Core.geo								Le 25/11/2009
	Ce fichier est la description géométrique utilisée par Gmsh pour 
	produire le fichier "Core.msh"
   --------------------------------------------------------------------------*/

Include "Core.don";

s1 = 0.0002;
s2 = 0.0008;
s3 = 0.0016;
s4 = 0.0032;

Point(1) = {0, 0, 0, s2};
Point(2) = {dxCore, 0, 0, s1};			
Point(3) = {xInd, 0, 0, s2};
Point(4) = {xInd+dxInd, 0, 0, s3};
Point(5) = {Lmod, 0, 0, s4};

Point(6) = {0, dyCore, 0, s2};
Point(7) = {dxCore, dyCore, 0, s1};
Point(8) = {xInd, dyInd, 0, s2};
Point(9) = {xInd+dxInd, dyInd, 0, s3};

Point(10) = {0, dyCore+entf, 0, s2};
Point(11) = {dxCore, dyCore+entf, 0, s2};
Point(12) = {Lmod, dyCore+entf, 0, s4};


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

Line(5) = {6, 7};
Line(6) = {8, 9};
Line(7) = {10, 11};
Line(8) = {11, 12};

Line(9) = {1, 6};
Line(10) = {6, 10};
Line(11) = {2, 7};
Line(12) = {7, 11};

Line(13) = {3, 8};
Line(14) = {4, 9};
Line(15) = {5, 12};

Line Loop(16) = {1,11,-5,-9};			Plane Surface(17) = {16};
Line Loop(18) = {5,12,-7,-10};		Plane Surface(19) = {18};
Line Loop(20) = {3,14,-6,-13};		Plane Surface(21) = {20};
Line Loop(22) = {2,13,6,-14,4,15,-8,-12,-11};	Plane Surface(23) = {22};

Physical Line(50) = {9,10};		// Line_Left

Physical Surface(101) = {17};		// Core
Physical Surface(102) = {19};		// Entrefer
Physical Surface(103) = {21};		// Ind
Physical Surface(104) = {23};		// AirExt









