main :: IO ()
main = do
    (parser,printer) <- initParserPrinter "lojban.xml"
    mainloop parser printer

--camxesPath = "/home/roman/OpenCog/Lojban/ilmentufa"
main :: IO ()
main = do
    (parser,printer) <- initParserPrinter "lojban.xml"
    mainloop parser printer

--camxesPath = "/home/roman/OpenCog/Lojban/ilmentufa"
main = do
    (parser,printer) <- initParserPrinter "lojban.xml"
    mainloop parser printer

--camxesPath = "/home/roman/OpenCog/Lojban/ilmentufa"