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

module SumOfMultiples exposing (..)


sumOfMultiples : List Int -> Int -> Int
sumOfMultiples multiples limit =
  List.sum (List.filter (inMultiples multiples) [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 =`
			`List.sum (List.filter (inMultiples multiples) [1..(limit - 1)])`

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 =`
			`List.any (\factor -> candidate % factor == 0) multiples`