From 47b27a0cc399ec1abe440d64d192f19c00c7e5d2 Mon Sep 17 00:00:00 2001
From: Christophe Geuzaine <cgeuzaine@ulg.ac.be>
Date: Sun, 8 Jan 2006 00:52:33 +0000
Subject: [PATCH] there are still annoying bigs with ellipses. pfff.
---
benchmarks/bugs/nested_tramsforms.geo | 43 +++++++++++++++++++++++----
1 file changed, 37 insertions(+), 6 deletions(-)
diff --git a/benchmarks/bugs/nested_tramsforms.geo b/benchmarks/bugs/nested_tramsforms.geo
index c79b291465..ea4677c43f 100644
--- a/benchmarks/bugs/nested_tramsforms.geo
+++ b/benchmarks/bugs/nested_tramsforms.geo
@@ -6,23 +6,54 @@ Point(100) = { a, 0, 0, lc };
Point(101) = { 0, b, 0, lc };
Point(102) = {-a, 0, 0, lc };
Point(103) = { 0,-b, 0, lc };
+
Ellipse(100) = { 100, 1, 100, 101 };
Ellipse(101) = { 101, 1, 102, 102 };
Ellipse(102) = { 102, 1, 102, 103 };
Ellipse(103) = { 103, 1, 100, 100 };
+/*
+Line(100) = { 100, 101 };
+Line(101) = { 101, 102 };
+Line(102) = { 102, 103 };
+Line(103) = { 103, 100 };
+*/
Line Loop(4) = { 100, 101, 102, 103 };
Plane Surface(4) = { 4 };
-
-
to_rad = 3.141592654/180;
+// this is OK
+/*
+Geometry.AutoCoherence = 0;
Translate { -0.01, 0.01, 0 }
{
+ Rotate { {0, 0, 1}, {0, 0, 0}, 120*to_rad }
+ {
+ Duplicata { Surface {4}; }
+ }
+}
+Coherence;
+*/
- Rotate { {0, 0, 1}, {0, 0, 0}, 120*to_rad }
- {
- Duplicata { Surface {4}; }
- }
+// this does not work
+/*
+Translate { -0.01, 0.01, 0 }
+{
+ Rotate { {0, 0, 1}, {0, 0, 0}, 120*to_rad }
+ {
+ Duplicata { Surface {4}; }
+ }
+}
+*/
+// this works with lines, but not with ellipses!!!!
+
+Rotate { {0, 0, 1}, {0, 0, 0}, 120*to_rad }
+{
+ Duplicata { Surface {4}; }
+}
+
+Translate { -0.01, 0.01, 0 }
+{
+ Surface{104};
}
--
GitLab