Remove more commented-out code

exists-forall · Mar 9, 2016 · 9c21766 · 9c21766
1 parent 9210ec1
commit 9c21766
Showing 1 changed file with 0 additions and 7 deletions.
diff --git a/src/ControlUtils.elm b/src/ControlUtils.elm
@@ -15,10 +15,3 @@ whileJust f init =
   case f init of
     Just (result, new) -> result :: whileJust f new
     Nothing -> []
-
---findIndex : (Int -> Maybe Bool) -> Int -> Maybe Int
---findIndex condition i =
---  case condition of
---    Just True -> Just i
---    Just False -> findIndex condition (i + 1)
---    Nothing -> Nothing