elm/exercises/sum-of-multiples/SumOfMultiples.example.elm

module SumOfMultiples exposing (..)


sumOfMultiples : List Int -> Int -> Int
sumOfMultiples multiples limit =
    List.sum (List.filter (inMultiples multiples) (List.range 1 (limit - 1)))


inMultiples : List Int -> Int -> Bool
inMultiples multiples candidate =
    List.any (\factor -> candidate % factor == 0) multiples
Update elm-package.json and .elm files to support Elm 0.17 2016-05-13 02:26:52 +00:00			`module SumOfMultiples exposing (..)`
Add test and example for Sum of Multiples 2015-10-13 18:23:46 +00:00
Run elm-format over cherry picked exercises 2016-03-17 01:38:51 +00:00
Add test and example for Sum of Multiples 2015-10-13 18:23:46 +00:00			`sumOfMultiples : List Int -> Int -> Int`
Run elm-format over cherry picked exercises 2016-03-17 01:38:51 +00:00			`sumOfMultiples multiples limit =`
Update elm files to 0.18 2016-12-17 22:15:34 +00:00			`List.sum (List.filter (inMultiples multiples) (List.range 1 (limit - 1)))`
Run elm-format over cherry picked exercises 2016-03-17 01:38:51 +00:00
Add test and example for Sum of Multiples 2015-10-13 18:23:46 +00:00
Run elm-format over cherry picked exercises 2016-03-17 01:38:51 +00:00			`inMultiples : List Int -> Int -> Bool`
			`inMultiples multiples candidate =`
Run pre Elm 0.17 exercises through elm-format version 0.3.0-alpha 2016-06-19 21:46:13 +00:00			`List.any (\factor -> candidate % factor == 0) multiples`