--

module Main where


import SOE
import Shape
import Region
import Fal
import Draw
import Animation


prob1:: IO()
prob1 = undefined

prob2:: IO()
prob2 = undefined

prob3:: IO()
prob3 = undefined

prob4:: IO()
prob4 = undefined

main =
  do { putStrLn "Enter an integer to choose a demo."
     ; n <- readLn
     ; [prob1, prob2, prob3, prob4 ] !! n
     }


--