near/heyarne.aphorisms
1
0
Fork 0
Code Issues Pull requests Projects Releases Wiki Activity

Fix bug in grid alignment of fourty-one

Browse source
This commit is contained in:
arne 2026-02-21 09:15:57 +01:00
commit 5937c7d14f
1 changed files with 2 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

4
src/aphorisms/fourty_one.clj
View file

@ -30,8 +30,8 @@
(defn as-grid [rect cell-size] (defn as-grid [rect cell-size]
(let [n-x (int (/ (g/width rect) cell-size)) (let [n-x (int (/ (g/width rect) cell-size))
n-y (int (/ (g/height rect) cell-size)) n-y (int (/ (g/height rect) cell-size))
t (v/vec2 (* (mod (g/width rect) n-x) 0.5) t (v/vec2 (* (mod (g/width rect) (* cell-size n-x)) 0.5)
(* (mod (g/height rect) n-x) 0.5))] (* (mod (g/height rect) (* cell-size n-x)) 0.5))]
(for [x (range n-x) (for [x (range n-x)
y (range n-y)] y (range n-y)]
(-> (r/rect (* x cell-size) (* y cell-size) cell-size) (-> (r/rect (* x cell-size) (* y cell-size) cell-size)