fayazkhan

import Data.Char
import Data.List
import Text.Read

main = do
  putStrLn "Number"
  number <- getLine
  putStrLn "Number of digits to multiply"
  digits <- getLine
  putStrLn $ pureMain digits number

fayazkhan

{- Performs the Ceasar cipher encryption.

   Compile this file by running:
     ghc ceasar.hs

   You'll need to have ghc package installed.
-}
import Data.Char

main = do