From 1bee9e6c2cf1d694f2f8b6aeeaec1914e3d98d6f Mon Sep 17 00:00:00 2001
From: Christophe Geuzaine <cgeuzaine@ulg.ac.be>
Date: Wed, 3 Oct 2001 07:00:51 +0000
Subject: [PATCH] extrude a surface mesh coming from an extruded line mesh...

---
 benchmarks/extrude/Forma_3DCube.geo | 42 +++++++++++++++++++++++++++++
 1 file changed, 42 insertions(+)
 create mode 100644 benchmarks/extrude/Forma_3DCube.geo

diff --git a/benchmarks/extrude/Forma_3DCube.geo b/benchmarks/extrude/Forma_3DCube.geo
new file mode 100644
index 0000000000..2564ca138f
--- /dev/null
+++ b/benchmarks/extrude/Forma_3DCube.geo
@@ -0,0 +1,42 @@
+Rext = 0.2 ;
+Ep   = 0.02 ;
+Rint = Rext - Ep;
+RC   = 0.6     ;
+LG   = 3.0    ;
+
+h = 0.008;
+
+Point(1) = {Rext, 0, 0, h};
+Point(2) = {Rint, 0, 0, h};
+
+
+Line(1) = {1,2};
+
+Extrude Line {1,{0,1,0}, {0,0,0}, -Pi/2}
+             {Layers{10,5,1}; Recombine; };
+
+Extrude Line {2,{0,1,0}, {0,0,0}, -Pi/2}
+             {Layers{10,9,1}; Recombine; };
+
+
+Coherence;
+
+Extrude Surface {5,{0,LG,0}}
+                {Layers{50,2,1}; Recombine;  };
+
+
+Extrude Surface {9,{0,LG,0}}
+                {Layers{50,2,1}; Recombine;  };
+
+
+
+Extrude Surface {31,{0,0,1}, {RC,LG,0}, -(Pi/2)}
+                {Recombine ; Layers {30,52000,1}; };
+Extrude Surface {53,{0,0,1}, {RC,LG,0}, -(Pi/2)}
+                {Recombine ; Layers {30,530000,1}; };
+
+Extrude Surface {75,{LG,0,0}}
+                {Recombine; Layers{50,540000,1}; };
+Extrude Surface {97,{LG,0,0}}
+                {Recombine; Layers{50,550000,1}; };
+
-- 
GitLab