aboutsummaryrefslogtreecommitdiff
path: root/sandbox/triangles.pl
diff options
context:
space:
mode:
Diffstat (limited to 'sandbox/triangles.pl')
-rw-r--r--sandbox/triangles.pl3
1 files changed, 3 insertions, 0 deletions
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);