From 48eaadf3e6b052c54df1cf8b303e36dace0305a4 Mon Sep 17 00:00:00 2001 From: Brian Hicks Date: Fri, 21 Feb 2020 09:19:46 -0600 Subject: [PATCH] rename to avoid another confusing collision --- src/Wave.elm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/src/Wave.elm b/src/Wave.elm index 6db6396..9219cc3 100644 --- a/src/Wave.elm +++ b/src/Wave.elm @@ -178,7 +178,7 @@ propagateInDirection : -> Direction -> ( Wave comparable, List { row : Int, column : Int } ) -> ( Wave comparable, List { row : Int, column : Int } ) -propagateInDirection source cell direction ( Wave wave, todo ) = +propagateInDirection source sourceCell direction ( Wave wave, todo ) = let target = Direction.move source direction @@ -195,7 +195,7 @@ propagateInDirection source cell direction ( Wave wave, todo ) = Just (Open remaining) -> let possibleInDirection = - case cell of + case sourceCell of Collapsed value -> Dict.get ( value, direction ) wave.rules |> Maybe.withDefault Set.empty