Problem:
Score : 100 points

Problem Statement

In some other world, today is December D-th.

Write a program that prints Christmas if D = 25, Christmas Eve if D = 24, Christmas Eve Eve if D = 23 and Christmas Eve Eve Eve if D = 22.

Constraints

22 \leq D \leq 25

D is an integer.

Input

Input is given from Standard Input in the following format:

D

Output

Print the specified string (case-sensitive).

Sample Input 1

25

Sample Output 1

Christmas

Sample Input 2

22

Sample Output 2

Christmas Eve Eve Eve

Be sure to print spaces between the words.

Solution in Haskell (GHC 7.10.3) (judge verdict: Wrong Answer)

repeat' :: Int -> [a] -> [a]
repeat' 0 _ = []
repeat' n l = l ++ repeat' (n-1) l 

main :: IO() 
main = do
    n <- readLn :: IO Int
    print $ "Christmas" ++ (repeat' (25 - n) " Eve")