diff options
| author | Marshall Lochbaum <mwlochbaum@gmail.com> | 2021-04-13 16:26:31 -0400 |
|---|---|---|
| committer | Marshall Lochbaum <mwlochbaum@gmail.com> | 2021-04-13 16:26:31 -0400 |
| commit | 80b12a13158e85392f8e0893619da756cfa68301 (patch) | |
| tree | dedc0a78258561fcd16f55084eff1016f720282b /src | |
| parent | 82d6df9ff37f4e09b7d98b5a27eba56bdbef55e9 (diff) | |
Fix drawing of plot axes when aspect ratio is uneven
Diffstat (limited to 'src')
| -rw-r--r-- | src/p.bqn | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -28,7 +28,7 @@ Plot ← { line ← {'M'⌾⊑ ∾⥊ "L "∾¨⎉1𝕩}¨ (/≠¨⊏xy) ⊔ FmtNum ⍉> dim×Scale pts ((-pad)∾dim+2×pad) SVG gr Enc ∾⥊¨ ⟨ <"rect" Elt rc∾(Pos-pad÷2)∾"width"‿"height"≍˘FmtNum dim+pad - pa⊸Path¨ ((0⊸≤∧≤⟜1)/·<∘∾˘("M "⊸∾˘"VH")∾¨·FmtNum dim×·∾⟜1˘(=⌜˜↕2)⊸×) Scale 0 + pa⊸Path¨ ((0⊸≤∧≤⟜1)/·<∘∾˘("M "⊸∾˘"VH")∾¨·FmtNum dim(×∾˘⌽∘⊣)(=⌜˜↕2)⊸×) Scale 0 pg⊸Path¨ line ⟩ } |
