From ea3f1f7736c57747e743a5106b917d2853c62f57 Mon Sep 17 00:00:00 2001 From: Jed Barber Date: Thu, 13 Sep 2012 02:14:04 +1000 Subject: Cleaner directory structure, addition of make clean, grouping of library modules into a single package --- Library/TermNet.hs | 27 +++++++++++++++++++++++++++ 1 file changed, 27 insertions(+) create mode 100644 Library/TermNet.hs (limited to 'Library/TermNet.hs') diff --git a/Library/TermNet.hs b/Library/TermNet.hs new file mode 100644 index 0000000..4d0b107 --- /dev/null +++ b/Library/TermNet.hs @@ -0,0 +1,27 @@ +module Library.TermNet( + TermNet, + empty, + addThm + ) where + + + +import Library.ProofGraph +import Library.Object +import Library.Theorem + + + +data TermNet = Empty | Leaf Object Node | Branch String [TermNet] + + + +empty :: TermNet +empty = Empty + + + +addThm :: TermNet -> PGraph -> Node -> (TermNet, [(Theorem, Node)]) +addThm net graph node = + + -- cgit