From acae90214892628ced469c4fed5bf2e1d2bd8aef Mon Sep 17 00:00:00 2001
From: lecoanet
Date: Fri, 15 Feb 2002 09:29:01 +0000
Subject: *** empty log message ***

---
 sandbox/testzinc.pl  | 3 ++-
 sandbox/triangles.pl | 3 +++
 2 files changed, 5 insertions(+), 1 deletion(-)

(limited to 'sandbox')

diff --git a/sandbox/testzinc.pl b/sandbox/testzinc.pl
index 20f12f1..941d11b 100644
--- a/sandbox/testzinc.pl
+++ b/sandbox/testzinc.pl
@@ -129,8 +129,9 @@ sub create_tracks {
 			     -position => [$track->{'x'}, $track->{'y'}],
 			     -speedvector => [$track->{'vx'}, $track->{'vy'}],
 			     -speedvectorsensitive => 1,
-			     -speedvectorwidth => 5,
+			     -speedvectorwidth => 2,
 			     -speedvectormark => 1,
+			     -speedvectorticks => 1,
 			     -labeldistance => 30,
 			     -markersize => 20,
 			     -historycolor => 'gray30',
diff --git a/sandbox/triangles.pl b/sandbox/triangles.pl
index 84555b6..23dc1f0 100644
--- a/sandbox/triangles.pl
+++ b/sandbox/triangles.pl
@@ -54,6 +54,9 @@ $zinc->contour($cv2, 'union', $tri2);
 $tri3 = $zinc->add('triangles', $view, [150, 150, 50, 50, 150, 50, 300, 50],
 		   -colors => ['grey50', 'blue', 'red', 'yellow'],
 		   -fan => 1);
+$tri4 = $zinc->clone($tri3, -colors => ['grey', 'red']);
+$zinc->translate($tri4, 100, 300);
+
 $zinc->contour($cv3, 'union', $tri3);
 $zinc->translate($tri3, 0, 300);
 $zinc->translate($cv3, 0, 300);
-- 
cgit v1.1