Scarlet Serenade - Haskell