doubleAndIncrement :: Int -> Int

doubleAndIncrement = (+1) . (*2)

-- Test cases
main = do 
    print (doubleAndIncrement 3) -- 7
    print (doubleAndIncrement 5) -- 11