Como escrever uma função que recebe dois números inteiros e retorna a sua soma - Desafio de Programação Resolvido em Haskell

import System.IO
import Text.Printf

-- declaração da função somar
somar :: Int->Int->Int

-- definição da função somar
-- recebe dois inteiros e retorna a
-- soma como um inteiro
somar a b = a + b

-- função principal do programa
main = do
  -- vamos desabilitar o buffer de quebra de linha 
  hSetBuffering stdout NoBuffering
  
  -- vamos pedir para o usuário informar dois números
  -- inteiros
  putStr "Informe o primeiro número: "
  n1 <- readLn::IO Int
  putStr "Informe o segundo número: "