Total circles area: Difference between revisions
m
→{{header|Uiua}}: updated comments
(→{{header|Uiua}}: improved algorithm) |
m (→{{header|Uiua}}: updated comments) |
||
Line 3,811:
# For each r generate a 2r.2r grid and set cells that are within circle.
InCircle ← <ⁿ2⟜(⊞(/+≡ⁿ2⊟).+⇡⊃(×2|¯))
#
Filler ← ⍜(↻|⬚0+)⊙: ⊃(+¯|×0.1InCircle) ⊃(⊢|↘1) ↻¯1
# Fold over all circles, accumulating into a blank grid.
|