elm/exercises/raindrops/Raindrops.example

module Raindrops (..) where

import String


raindrops : Int -> String
raindrops number =
  let
    drops =
      [ if number % 3 == 0 then
          "Pling"
        else
          ""
      , if number % 5 == 0 then
          "Plang"
        else
          ""
      , if number % 7 == 0 then
          "Plong"
        else
          ""
      ]

    result =
      String.join "" drops
  in
    if result == "" then
      toString number
    else
      result