diff options
author | Jed Barber <jjbarber@y7mail.com> | 2012-07-12 09:09:31 +1000 |
---|---|---|
committer | Jed Barber <jjbarber@y7mail.com> | 2012-07-12 09:09:31 +1000 |
commit | 42a265e80a9ed551fd519a88ed1d063435385b9f (patch) | |
tree | dcaf8ea9cdc827ff127fe147acf3e56b7c255751 /ProofGraphMain.hs | |
parent | 75854b6f0e73c55fa2dafc0d6b50fb23a96edfaf (diff) |
Graph generating functions accessible as a module
Diffstat (limited to 'ProofGraphMain.hs')
-rw-r--r-- | ProofGraphMain.hs | 11 |
1 files changed, 11 insertions, 0 deletions
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" |