From 42a265e80a9ed551fd519a88ed1d063435385b9f Mon Sep 17 00:00:00 2001 From: Jed Barber Date: Thu, 12 Jul 2012 09:09:31 +1000 Subject: Graph generating functions accessible as a module --- ProofGraphMain.hs | 11 +++++++++++ 1 file changed, 11 insertions(+) create mode 100644 ProofGraphMain.hs (limited to 'ProofGraphMain.hs') diff --git a/ProofGraphMain.hs b/ProofGraphMain.hs new file mode 100644 index 0000000..91767ad --- /dev/null +++ b/ProofGraphMain.hs @@ -0,0 +1,11 @@ +import System( getArgs ) +import Text.Printf +import Parse +import ProofGraph + + +main = do + args <- getArgs + list <- getLines $ head args + let result = doGraphGen (map (stripReturn) list) + printf $ (show result) ++ "\n" -- cgit