latin: interleave playing cards
[sheet.git] / writing-latn.inc.pl
index e40123609021abd10d8978b290cce44d697aac4a..b2d436f72798ba86ac04d973902022220ad998ff 100644 (file)
@@ -90,10 +90,9 @@ my $U = 0;  # optional unicode alternatives
        11 12 13 14 21 22 23 20 > 31 -13 32 33
        30 41 42 -13 43 40 10 51 52 53 50 -31 -40
 })],
-'Half deck' => [
-       # A 2-10 J Q K
-       (map { chr( 0x1F0A0 + $_ ) } 1 .. 11, 13, 14),  # spades
-       (map { "<i>$_</i>" } map { chr( 0x1F0B0 + $_ ) } 1 .. 11, 13, 14),  # hearts
+'Cards' => [
+       map { chr(0x1F0A0 + $_), sprintf('<i>%s</i>', chr(0x1F0B0 + $_)) }  # spades, hearts
+       1 .. 11, 13, 14  # A 2-10 J Q K
 ],
 'Maritime flags' => [
        # International Code of Signals, SVG fills