invert cube and text in Wieringermeer

diff --git a/generate-board b/generate-board
index 6cc633432b8cd161322d27794c8b741736b0525a..2d5b371f498e24411b048fbea00ad36371e87fcf 100755 (executable)
--- a/generate-board
+++ b/generate-board
@@ -457,9 +457,15 @@ sub label_faces() {
       print STDERR " water $w in $rr->{Name}\n";
       my $down = water_cubes_sz(2) - water_cubes_sz(1) + $cube_gap;
       $pos -= mkvec(0, -0.5 * $down);
+      my $cube_y = -($sz * @$words);
+      if ($rr->{Name} eq 'Wieringermeer') {
+       $pos -= mkvec(0,+$sz);
+       $cube_y = 0;
+       $down = 0;
+      }
       o("  gsave\n");
       o("    ", psvec($pos), " translate\n");
-      o("    0 ", -($sz * @$words), " translate\n");
+      o("    0 ", $cube_y, " translate\n");
       o("    ", -0.5 * water_cubes_sz($w)," ", -$down, " translate\n");
       water_cubes($w);
       o("  grestore\n");