From 08c3345d45014aca05384967a6c69cf702d9600d Mon Sep 17 00:00:00 2001
From: Christophe Geuzaine <cgeuzaine@ulg.ac.be>
Date: Wed, 21 Feb 2007 15:56:20 +0000
Subject: [PATCH] remove extra volume

---
 demos/component8_in_a_box.geo | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/demos/component8_in_a_box.geo b/demos/component8_in_a_box.geo
index 01cb1cb6de..608ec80592 100644
--- a/demos/component8_in_a_box.geo
+++ b/demos/component8_in_a_box.geo
@@ -22,9 +22,10 @@ Line(10003) = {10002, 10001};
 Line(10004) = {10001, 10004};
 Line Loop(10005) = {10002, 10003, 10004, 10001};
 Plane Surface(10006) = {10005};
-Extrude {0, 0, (zmax - zmin) + 2 * l} {
+tmp[] = Extrude {0, 0, (zmax - zmin) + 2 * l} {
   Surface{10006};
-}
+};
+Delete { Volume{tmp[1]}; }
 
 Surface Loop(10029) = {10027,10006,10015,10019,10023,10028};
 Surface Loop(10030) = {1,2,3,4,21,15,16,17,18,19,20,5,6,7,8,9,10,11,12,13,14};
-- 
GitLab