Sha256: 00b98dbb622c66c4cfa8b13130be20401f72245261d86151253185c432d9719a
Contents?: true
Size: 379 Bytes
Versions: 364
Compression:
Stored size: 379 Bytes
Contents
module Raindrops
( raindrops
) where
import Prelude
raindrops :: Int -> String
raindrops n =
let
fn = toNoise n
noises =
fn 3 "Pling" <>
fn 5 "Plang" <>
fn 7 "Plong"
in
case noises of
"" -> show n
other -> other
toNoise :: Int -> Int -> String -> String
toNoise n factor noise
| mod n factor == 0 = noise
| otherwise = ""
Version data entries
364 entries across 364 versions & 1 rubygems