#!/usr/bin/env runhaskell
#!/usr/bin/runhugs
import System.Time
-- pi = 4 * atan2 1 1
main = do
  t <-getClockTime
  putStrLn $ show t
  putStrLn $ show pi