main :: IO ()
main = print (sum (map (\x -> 2 * x + 1) [1..10]))