Hi,

I get a 3d-mesh-error , and I
cant find the reason why?

Best regards
Franz


--
Mit freundlichen Grüßen

Dipl.-Ing. Franz Theodor Langer (Geschäftsführer)
-----------------------------------------------------------------
E_Planung GmbH
Planung + Berechnung für Wissenschaft und Technik im Ingenieurbau

Schlüsselbergstraße 30, 81673 München, Tel. 089/454933-0 Fax -14
Geschäftsnummer: HRB 90116, Gerichtsstand: München

lc=0.1;
nr=16;

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

Point(5) = {0,0,0,lc};
Point(6) = {0,3,0,lc};

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

Line Loop(5) = {4, 1, 2, 3};
Plane Surface(6) = {5};
Transfinite Surface {6} = {1, 2, 3, 4};
Recombine Surface {6};

Extrude {{0, 1, 0}, {0, 0, 0}, 2*Pi/3} {
  Surface{6}; Layers{nr};
Recombine;
}
Extrude {{0, 1, 0}, {0, 0, 0}, 2*Pi/3} {
  Surface{28}; Layers{nr};
Recombine;
}
Extrude {{0, 1, 0}, {0, 0, 0}, 2*Pi/3} {
  Surface{50}; Layers{nr};
Recombine;
}


Line Loop(72) = {13, 35, 57};
Plane Surface(73) = {72};
Recombine Surface(73);
Line Loop(74) = {58, 14, 36};
Plane Surface(75) = {74};
Recombine Surface(75);


Recombine Surface(15);
Recombine Surface(37);
Recombine Surface(59);

Surface Loop(76) = {73, 75, 15, 37, 59};

Volume(77) = {76};


_______________________________________________
gmsh mailing list
[email protected]
http://www.geuz.org/mailman/listinfo/gmsh

Reply via email to