module B where g :: Int -> Int g x = x * 2