From 10fc80fb14984d2bf77fd7459e40cfb02e567206 Mon Sep 17 00:00:00 2001 From: neauoire Date: Sun, 3 Nov 2019 21:57:21 -0500 Subject: [PATCH] * --- WORKSHOP.md | 6 +++--- examples/pixels/convolve.lisp | 10 ---------- 2 files changed, 3 insertions(+), 13 deletions(-) delete mode 100644 examples/pixels/convolve.lisp diff --git a/WORKSHOP.md b/WORKSHOP.md index bb0da90..a1ce738 100644 --- a/WORKSHOP.md +++ b/WORKSHOP.md @@ -184,19 +184,19 @@ Effects which use the surrounding pixels, or convolution matrix, are used with t ```lisp (open $path) -(convolve sharpen $rect) +(convolve (sharpen) $rect) ``` Custom convolve kernels can also be created like this: ```lisp (open $path) -(def blur +(def (blur) ( (-1 -1 -1) (-1 5 -1) (-1 -1 -1))) -(convolve blur) +(convolve (blur)) ``` diff --git a/examples/pixels/convolve.lisp b/examples/pixels/convolve.lisp deleted file mode 100644 index 614040f..0000000 --- a/examples/pixels/convolve.lisp +++ /dev/null @@ -1,10 +0,0 @@ -(clear) -; drag an image on the window -(open $path) -; -(convolve - (rect 100 100 400 400) edge) -(convolve - (rect 300 300 400 400) sharpen) -(convolve - (rect 500 500 400 400) blur) \ No newline at end of file