From becafd4b5332dcd393858375d12fea7edfae60f0 Mon Sep 17 00:00:00 2001
From: mtadel <mtadel@f7af4fe6-9843-0410-8265-dc069ae4e863>
Date: Fri, 17 Nov 2006 12:08:09 +0000
Subject: [PATCH] Adapt to new QuadSet implementation.

---
 EVE/macros/reve_quad_test.C | 19 +++++++++++++++----
 1 file changed, 15 insertions(+), 4 deletions(-)

diff --git a/EVE/macros/reve_quad_test.C b/EVE/macros/reve_quad_test.C
index 151247048ea..414c5d4f54a 100644
--- a/EVE/macros/reve_quad_test.C
+++ b/EVE/macros/reve_quad_test.C
@@ -2,8 +2,19 @@
 
 void reve_quad_test()
 {
-  Alieve::ITSModule* qs = new Alieve::ITSModule("QuadSet Test");
-  qs->Test(200);
-  gReve->AddRenderElement(qs);
-  gReve->DrawRenderElement(qs);
+  TRandom r(0);
+
+  gStyle->SetPalette(1, 0);
+
+  Reve::QuadSet* q = new Reve::QuadSet("Pepe");
+  q->Reset(Reve::QuadSet::QT_AxisAligned, kFALSE, 32);
+  for (Int_t i=0; i<128; ++i) {
+    q->AddQuad(r.Uniform(-10, 10), r.Uniform(-10, 10), r.Uniform(-10, 10),
+	       r.Uniform(-1, 1), r.Uniform(-1, 1));
+    q->QuadValue(r.Uniform(0, 130));
+  }
+  q->RefitPlex();
+
+  gReve->AddRenderElement(q);
+  gReve->Redraw3D();
 }
-- 
2.31.1