unicode: mathematic (set) comparison operators
authorMischa POSLAWSKY <perl@shiar.org>
Sat, 25 Dec 2010 01:23:30 +0000 (02:23 +0100)
committerMischa POSLAWSKY <perl@shiar.org>
Tue, 11 Jan 2011 22:41:38 +0000 (23:41 +0100)
Shiar_Sheet/FormatChar.pm
unicode.inc.pl
unicode.plp

index 78f2a19..759ca85 100644 (file)
@@ -81,6 +81,7 @@ sub cell {
                        push @class, 'ex'; # discouraged
                }
 
+               $input =~ s/^\\//;  # escaped char
                ($cell, $title, my $class, $mnem) = $self->glyphs_html($input);
 
                if ($self->{style} = 'di') {
index 1492a4f..a960f35 100644 (file)
@@ -34,6 +34,12 @@ keys => {
        player   => [qw{. ► ⏩ ⏭ ◼ ⚫ . ◄ ⏪ ⏮ ⏏ -❚❚ }],
 },
 
+math => {
+       equal    => [qw{. ∼ ≈ ≅ ≡ ∃ . ≁ ≉ ≇ ≢ ∄ }],
+       size     => [qw{. ≪ < ≤ \= ≥ \> ≫ . - ≮ ≰ ≠ ≱ ≯ - }],
+       set      => [qw{. ∈ ⊂ ⊆ ∀ ⊇ ⊃ ∋ ∪ . ∉ ⊄ ⊈ ∅ ⊉ ⊅ ∌ ∩ }],
+},
+
 arrows => {
        single   => [qw{. ↖ ↑ ↗ ↔ . ← - → ↕ . ↙ ↓ ↘ - }],
        double   => [qw{. ⇖ ⇑ ⇗ ⇔ . ⇐ - ⇒ ⇕ . ⇙ ⇓ ⇘ - }],
index 2e9678b..3e0c948 100644 (file)
@@ -79,6 +79,9 @@ $glyphs->print(map {
                        ?uncommon
                punctuation/version
                punctuation/marks
+               math/size
+                       equal
+                       set
        Symbols
                symbols/currency
                        cards