diff --git a/source/AlgorithmView.elm b/source/AlgorithmView.elm index 5da19c0..18a2038 100644 --- a/source/AlgorithmView.elm +++ b/source/AlgorithmView.elm @@ -221,7 +221,7 @@ view index model = exampleAlgorithm : D.Algorithm exampleAlgorithm = - case List.head (List.drop 4 D.algorithms) of + case List.head D.algorithms of Nothing -> Debug.crash "No example algorithm def"