]> gitweb.factorcode.org Git - factor.git/commitdiff
periodic-table: spacing
authorJohn Benediktsson <mrjbq7@gmail.com>
Sat, 2 Sep 2023 22:58:30 +0000 (15:58 -0700)
committerJohn Benediktsson <mrjbq7@gmail.com>
Sat, 2 Sep 2023 22:58:30 +0000 (15:58 -0700)
extra/periodic-table/periodic-table.factor

index feb03da46d46a32004cb3cd07ab965e2937e863a..ecdb3e5cd9325d9dd15719e8f4babbba70536f66 100644 (file)
@@ -159,6 +159,7 @@ CONSTANT: periodic-table {
     f
     {   f   f   f  58  59  60  61  62  63  64  65  66  67  68  69  70  71   f }
     {   f   f   f  90  91  92  93  94  95  96  97  98  99 100 101 102 103   f }
+    f
 }
 
 :: <element-label> ( atomic-number symbol name -- gadget )
@@ -194,7 +195,7 @@ CONSTANT: periodic-table {
     periodic-table [
         horizontal <track> { 3 3 } >>gap swap
         [ [ <element> f track-add ] each ]
-        [ "" <label> { 20 20 } >>pref-dim f track-add ] if*
+        [ "" <label> { 10 10 } >>pref-dim f track-add ] if*
         f track-add
     ] each <legend> f track-add ;