--
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
}
--