((mm-quest (A b) B))
((mm-quest (A c) C))
((mm-quest (B d) D))
((mm-quest (B e) E))
((mm-quest (C f) F))
((mm-quest (C g) G))
((mm-quest (D d) D))
((mm-quest (E e) E))
((mm-quest (F f) F))
((mm-quest (G g) G))

((mm-text A "This is node a, choose b or c"))
((mm-text B "This is node b, choose d or e"))
((mm-text C "This is node c, choose f or g"))
((mm-text D "This is the bottom at node d"))
((mm-text E "This is the bottom at node e"))
((mm-text F "This is the bottom at node f"))
((mm-text G "This is the bottom at node g"))

[-  (MINMAX ?start)  Starts at node ?start and asks questions in
         (mm-text ?node ?text), get response and moves to node.
         Nodes in form of (mm-quest (?present-node ?response) ?next-node)]

((MINMAX ?X)
(mm-text ?X ?Y)
(WRITE ?Y)
(READ ?Z)
(mm-quest (?X ?Z) ?x)
(MINMAX ?x))