Main.hs

module Main where
import System.Environment

main :: IO ()
main = do
    args <- getArgs
    let num1 = read $ args !! 0
    let num2 = read $ args !! 1
    res <- num1 + num2
    print res
    
main = do
  args <- getArgs
  print $ sum $ map read args
  
main = getArgs >>= print . sum . map read