From ed50aedc08afd67b8d9606460d2d5209239ac88c Mon Sep 17 00:00:00 2001 From: Akshay Nair Date: Sun, 29 Oct 2023 20:20:25 +0530 Subject: chore: moving stuff around --- sketches/week-1/mandelbrot.bqn | 23 ----------------------- 1 file changed, 23 deletions(-) delete mode 100644 sketches/week-1/mandelbrot.bqn (limited to 'sketches/week-1/mandelbrot.bqn') diff --git a/sketches/week-1/mandelbrot.bqn b/sketches/week-1/mandelbrot.bqn deleted file mode 100644 index e844df8..0000000 --- a/sketches/week-1/mandelbrot.bqn +++ /dev/null @@ -1,23 +0,0 @@ -CMul ← { ⟨a, b⟩𝕊⟨c, d⟩: ⟨a×c - b×d, a×d + b×c⟩ } -CMag ← +´×˜ -MandelbrotFn ← +⟜(CMul˜) - -MBValue ← {⟨w, h⟩ 𝕊 ⟨x, y⟩: - p ← 6 × ⟨(x - w÷2)÷w, (y - h÷2)÷h⟩ - iters ← 0 - old ← 0‿0 - CMag p⊸MandelbrotFn •_while_ { - isFinite ← 70 > CMag (𝕩 - old) - old↩𝕩 - iters+↩1 - isFinite ∧ iters < 10 - } 0‿0 -} - -MBGrid ← {dimens 𝕊 grid: {⟨0.7, 0.4, 1⟩ × (dimens MBValue 𝕩) | 255}¨grid} - -{𝕊⟨w, h⟩: - grid ← (>{↕h}¨↕w) ∾¨ h⥊˘↕w - p ← ⟨1, 1⟩ - ⟨w, h⟩ MBGrid grid -} -- cgit v1.3.1