Skip to content

Commit

Permalink
periodic-table: spacing
Browse files Browse the repository at this point in the history
  • Loading branch information
mrjbq7 committed Sep 2, 2023
1 parent a56471c commit 4a0de22
Showing 1 changed file with 2 additions and 1 deletion.
3 changes: 2 additions & 1 deletion extra/periodic-table/periodic-table.factor
Original file line number Diff line number Diff line change
Expand Up @@ -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 )
Expand Down Expand Up @@ -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 ;

Expand Down

0 comments on commit 4a0de22

Please sign in to comment.