double : _Int -> _Int ; double n = n + n; id : 'a -> 'a ; id x = x ; main : _Int ; main = id double 5;