From 4fecd72bf1acbcd7d544a135206509e246f2b532 Mon Sep 17 00:00:00 2001
From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Sun, 3 Mar 2019 15:41:43 +0000
Subject: [PATCH] experiment with cards in circles

---
 generate-board | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/generate-board b/generate-board
index cb04748..6def5c3 100755
--- a/generate-board
+++ b/generate-board
@@ -583,7 +583,7 @@ sub sea_track(){
     o("  $prepline\n");
     o("  gsave ",
       psvec($pos[$i] + mkvec(-0.0 * $token_sz, $dy/2))," translate\n");
-    if (#0 &&
+    if (1 ||
 	$i >= 1 &&
 	$track->[$i] == $track->[$i-1] &&
 	($i == 1 ||
@@ -591,6 +591,8 @@ sub sea_track(){
       my $t_sz = 24;
       my $shrink = ($hs_sz * 0.75 / $deck_h);
       o("    gsave % T M $i\n");
+      o("      -44 -6.5 translate\n");
+      o("      0.8 .8 scale \n");
       o("      ",0.6 * $dx, " ", -0.28 * $dy," translate\n");
       o("      gsave");
       o("        $shrink dup scale -90 rotate\n");
-- 
2.30.2