From: Neil Smith Date: Mon, 12 Dec 2022 11:48:04 +0000 (+0200) Subject: Minor tidy X-Git-Url: https://git.njae.me.uk/?p=advent-of-code-22.git;a=commitdiff_plain;h=0183d687f5495ecd2ae818e0bae1ff5c4146069f Minor tidy --- diff --git a/advent09/Main.hs b/advent09/Main.hs index 1314035..0ad2bb5 100644 --- a/advent09/Main.hs +++ b/advent09/Main.hs @@ -53,7 +53,7 @@ manhattan p1 p2 = max dx dy where V2 dx dy = abs $ p1 ^-^ p2 touching :: Position -> Position -> Bool -touching p1 p2 = (manhattan p1 p2) <= 1 +touching p1 p2 = (manhattan p1 p2) <= 1 towards :: Position -> Position -> Position towards p1 p2 = signum $ p2 ^-^ p1