doubleAndIncrement :: Int -> Int
doubleAndIncrement = (+1) . (*2)
-- Test cases
main = do
print (doubleAndIncrement 3) -- 7
print (doubleAndIncrement 5) -- 11