diff options
author | Jed Barber <jjbarber@y7mail.com> | 2012-08-09 05:15:01 +1000 |
---|---|---|
committer | Jed Barber <jjbarber@y7mail.com> | 2012-08-09 05:15:01 +1000 |
commit | 12b3e97d0ee4b7d1fa6560b91d14ef7be110bdff (patch) | |
tree | cc3936ee04ef9c9f9b22733117228182632e1da1 /Delete.hs | |
parent | 455df475317d4cf59e854fdb329d4f8a470474f3 (diff) |
Compilation now automated
Diffstat (limited to 'Delete.hs')
-rw-r--r-- | Delete.hs | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -10,7 +10,7 @@ import qualified Data.Graph.Inductive.Graph as Graph main = do args <- getArgs - list <- getLines $ head args + list <- getLines (head args) let graph = doGraphGen (map (stripReturn) list) initList = filter (\x -> Graph.indeg graph x == 0) (Graph.nodes graph) thmList = (map (\(_,y) -> y)) . |