From 049f2b910a9e470dda1e95f07e5d2910ca075348 Mon Sep 17 00:00:00 2001
From: Christophe Geuzaine <cgeuzaine@ulg.ac.be>
Date: Sat, 14 Jan 2006 23:17:54 +0000
Subject: [PATCH] new extrude syntax

---
 benchmarks/extrude/Cube-01-ExtrMesh.geo |  8 +++-----
 benchmarks/extrude/torus_hexa.geo       | 25 +++++++++----------------
 benchmarks/extrude/vianew-rec.geo       | 22 +++++++++++-----------
 benchmarks/extrude/vianew.geo           | 20 +++++++++-----------
 demos/pripyrtet.geo                     |  5 +++--
 5 files changed, 35 insertions(+), 45 deletions(-)

diff --git a/benchmarks/extrude/Cube-01-ExtrMesh.geo b/benchmarks/extrude/Cube-01-ExtrMesh.geo
index 646c55eefa..edcfec9dc5 100644
--- a/benchmarks/extrude/Cube-01-ExtrMesh.geo
+++ b/benchmarks/extrude/Cube-01-ExtrMesh.geo
@@ -10,12 +10,10 @@ Line(3) = {2,1};
 Line(4) = {1,4};                                          
 Line Loop(5) = {2,3,4,1};                                          
 Plane Surface(6) = {5};                                          
-Extrude Surface {6, {0,0.0,1}}                               
-{                               
+Extrude {0,0.0,1}{                               
+  Surface{6};
   Layers {{10,5,10},{100,200,300},{.1,.9,1.}};                                  
   //Recombine;
-} ;
+}
 
 Physical Volume(99) = {100,200,300};
-
-     
diff --git a/benchmarks/extrude/torus_hexa.geo b/benchmarks/extrude/torus_hexa.geo
index cd6f2f9288..23390d456d 100644
--- a/benchmarks/extrude/torus_hexa.geo
+++ b/benchmarks/extrude/torus_hexa.geo
@@ -44,21 +44,14 @@ Transfinite Surface {22} = {11,12,13,10};
 
 Recombine Surface {14:22:2};
 
-Extrude Surface {14, {0,0,1}, {0,0,0}, 2*Pi/3}{Recombine;Layers{10,73,1};};
-Extrude Surface {16, {0,0,1}, {0,0,0}, 2*Pi/3}{Recombine;Layers{10,73,1};};
-Extrude Surface {18, {0,0,1}, {0,0,0}, 2*Pi/3}{Recombine;Layers{10,73,1};};
-Extrude Surface {20, {0,0,1}, {0,0,0}, 2*Pi/3}{Recombine;Layers{10,73,1};};
-Extrude Surface {22, {0,0,1}, {0,0,0}, 2*Pi/3}{Recombine;Layers{10,73,1};};
+s[] = Extrude {{0,0,1}, {0,0,0}, 2*Pi/3}{
+  Surface{14:22:2}; Recombine; Layers{10,73,1};
+};
 
-Extrude Surface {44, {0,0,1}, {0,0,0}, 2*Pi/3}{Recombine;Layers{10,73,1};};
-Extrude Surface {66, {0,0,1}, {0,0,0}, 2*Pi/3}{Recombine;Layers{10,73,1};};
-Extrude Surface {88, {0,0,1}, {0,0,0}, 2*Pi/3}{Recombine;Layers{10,73,1};};
-Extrude Surface {110, {0,0,1}, {0,0,0}, 2*Pi/3}{Recombine;Layers{10,73,1};};
-Extrude Surface {132, {0,0,1}, {0,0,0}, 2*Pi/3}{Recombine;Layers{10,73,1};};
-
-Extrude Surface {154, {0,0,1}, {0,0,0}, 2*Pi/3}{Recombine;Layers{10,73,1};};
-Extrude Surface {176, {0,0,1}, {0,0,0}, 2*Pi/3}{Recombine;Layers{10,73,1};};
-Extrude Surface {198, {0,0,1}, {0,0,0}, 2*Pi/3}{Recombine;Layers{10,73,1};};
-Extrude Surface {220, {0,0,1}, {0,0,0}, 2*Pi/3}{Recombine;Layers{10,73,1};};
-Extrude Surface {242, {0,0,1}, {0,0,0}, 2*Pi/3}{Recombine;Layers{10,73,1};};
+s[] = Extrude {{0,0,1}, {0,0,0}, 2*Pi/3}{
+  Surface{s[{0:8:2}]}; Recombine; Layers{10,73,1};
+};
 
+Extrude {{0,0,1}, {0,0,0}, 2*Pi/3}{
+  Surface{s[{0:8:2}]}; Recombine; Layers{10,73,1};
+}
diff --git a/benchmarks/extrude/vianew-rec.geo b/benchmarks/extrude/vianew-rec.geo
index 104862e66e..60a47e13ce 100644
--- a/benchmarks/extrude/vianew-rec.geo
+++ b/benchmarks/extrude/vianew-rec.geo
@@ -95,20 +95,20 @@ NLdn = 8;
 NLup = 3;
 
 // extrude down first:
-Extrude Surface {42, {0,0,-A*L}}{ Layers { {NLdn}, {9001}, {1} } ; Recombine; };
+Extrude {0,0,-A*L} {
+  Surface{42};
+  Layers { {NLdn}, {9001}, {1} } ; 
+  Recombine;
+}
+
 // extrude up second:
-Extrude Surface {26, {0,0,L}}{ Layers { {NLup}, {9000}, {1} } ; Recombine;};
-Extrude Surface {28, {0,0,L}}{ Layers { {NLup}, {9000}, {1} } ; Recombine;};
-Extrude Surface {30, {0,0,L}}{ Layers { {NLup}, {9000}, {1} } ; Recombine;};
-Extrude Surface {32, {0,0,L}}{ Layers { {NLup}, {9000}, {1} } ; Recombine;};
-Extrude Surface {34, {0,0,L}}{ Layers { {NLup}, {9000}, {1} } ; Recombine;};
-Extrude Surface {36, {0,0,L}}{ Layers { {NLup}, {9000}, {1} } ; Recombine;};
-Extrude Surface {38, {0,0,L}}{ Layers { {NLup}, {9000}, {1} } ; Recombine;};
-Extrude Surface {40, {0,0,L}}{ Layers { {NLup}, {9000}, {1} } ; Recombine;};
-Extrude Surface {42, {0,0,L}}{ Layers { {NLup}, {9000}, {1} } ; Recombine;};
+Extrude {0,0,L} {
+  Surface { 26:42:2 };
+  Layers { {NLup}, {9000}, {1} }; 
+  Recombine;
+}
 
 // wafer surface including surfaces that are extruded downwards:
 Physical Surface(1001) = {26,28,30,32,34,36,38,40, 51,55,59,63,64};
 Physical Surface(1009) = {73,95,117,121,139,161,165,183,205,209,227,85, 86,108,130,152,174,196,218,240,262};
 Physical Volume(2001)  = {9000,9001};
-
diff --git a/benchmarks/extrude/vianew.geo b/benchmarks/extrude/vianew.geo
index 58fc446fcc..7d9763228c 100644
--- a/benchmarks/extrude/vianew.geo
+++ b/benchmarks/extrude/vianew.geo
@@ -93,20 +93,18 @@ NLdn = 8;
 NLup = 3;
 
 // extrude down first:
-Extrude Surface {42, {0,0,-A*L}}{ Layers { {NLdn}, {9001}, {1} } ; };
+Extrude {0,0,-A*L} {
+  Surface{42};
+  Layers { {NLdn}, {9001}, {1} } ; 
+}
+
 // extrude up second:
-Extrude Surface {26, {0,0,L}}{ Layers { {NLup}, {9000}, {1} } ; };
-Extrude Surface {28, {0,0,L}}{ Layers { {NLup}, {9000}, {1} } ; };
-Extrude Surface {30, {0,0,L}}{ Layers { {NLup}, {9000}, {1} } ; };
-Extrude Surface {32, {0,0,L}}{ Layers { {NLup}, {9000}, {1} } ; };
-Extrude Surface {34, {0,0,L}}{ Layers { {NLup}, {9000}, {1} } ; };
-Extrude Surface {36, {0,0,L}}{ Layers { {NLup}, {9000}, {1} } ; };
-Extrude Surface {38, {0,0,L}}{ Layers { {NLup}, {9000}, {1} } ; };
-Extrude Surface {40, {0,0,L}}{ Layers { {NLup}, {9000}, {1} } ; };
-Extrude Surface {42, {0,0,L}}{ Layers { {NLup}, {9000}, {1} } ; };
+Extrude {0,0,L} {
+  Surface { 26:42:2 };
+  Layers { {NLup}, {9000}, {1} }; 
+}
 
 // wafer surface including surfaces that are extruded downwards:
 Physical Surface(1001) = {26,28,30,32,34,36,38,40, 51,55,59,63,64};
 Physical Surface(1009) = {73,95,117,121,139,161,165,183,205,209,227,85, 86,108,130,152,174,196,218,240,262};
 Physical Volume(2001)  = {9000,9001};
-
diff --git a/demos/pripyrtet.geo b/demos/pripyrtet.geo
index 22ad79a305..323fece6d1 100644
--- a/demos/pripyrtet.geo
+++ b/demos/pripyrtet.geo
@@ -11,5 +11,6 @@ Line(3) = {2,1};
 Line(4) = {1,4};
 Line Loop(5) = {2,3,4,1};
 Plane Surface(6) = {5};
-Extrude Surface {6, {0,1,0}, {0,0,0}, -Pi/4}{Layers{3,1};Recombine;};
-
+Extrude {{0,1,0}, {0,0,0}, -Pi/4}{
+  Surface{6}; Layers{3,1}; Recombine;
+}
-- 
GitLab