mohws-0.2: public_html/Pi.hs

module Pi where

cgiMain :: [(String,String)] -> [(String,String)] -> IO ([(String,String)], String)
cgiMain _ _ =
   return ([("Content-Type", "text/plain")], show (pi::Double))