Total circles area: Difference between revisions
Content added Content deleted
(Added Uiua solution) |
|||
| Line 3,810: | Line 3,810: | ||
Dim ← 500 |
Dim ← 500 |
||
Scale ← /↥♭≡(+⊃(⊢|↘1)↻¯1) Ncs |
Scale ← /↥♭≡(+⊃(⊢|↘1)↻¯1) Ncs |
||
Scs ← |
Scs ← ⁅×Dim÷: Ncs Scale |
||
# For each r generate a 2r.2r grid and set cells that are within circle. |
# For each r generate a 2r.2r grid and set cells that are within circle. |
||
InCircle ← <ⁿ2⟜(⊞(/+≡ⁿ2⊟).+⇡⊃(×2|¯)) |
InCircle ← <ⁿ2⟜(⊞(/+≡ⁿ2⊟).+⇡⊃(×2|¯)) |
||
| Line 3,829: | Line 3,829: | ||
stdout: |
stdout: |
||
Runtime (s): 3.7929999999978463 |
Runtime (s): 3.7929999999978463 |
||
*Very* approximate area: 21. |
*Very* approximate area: 21.58786775455266 |
||
</pre> |
</pre> |
||
[[File:UiuaOverlappingCircles.png|300px|thumbnail|center|Overlapping translucent circles]] |
[[File:UiuaOverlappingCircles.png|300px|thumbnail|center|Overlapping translucent circles]] |
||
<p></p> |
<p></p> |
||
=={{header|VBA}}== |
=={{header|VBA}}== |
||
Analytical solution adapted from Haskell/Python. |
Analytical solution adapted from Haskell/Python. |
||