removed example trees
This commit is contained in:
parent
0097800eba
commit
bfe08e1461
@ -42,57 +42,4 @@
|
|||||||
(tree-to-dot-helper (cdr tree) 1 0)
|
(tree-to-dot-helper (cdr tree) 1 0)
|
||||||
"}")))
|
"}")))
|
||||||
|
|
||||||
(define vowel-tree
|
; (display (tree-to-dot vowel-tree))
|
||||||
'("[vowel]"
|
|
||||||
("[back]"
|
|
||||||
("[tense]"
|
|
||||||
("[high]")
|
|
||||||
("{high}"))
|
|
||||||
("{tense}"
|
|
||||||
("[high]")
|
|
||||||
("{high}")))
|
|
||||||
("{back}"
|
|
||||||
("[tense]"
|
|
||||||
("[high]")
|
|
||||||
("{high}"))
|
|
||||||
("{tense}"
|
|
||||||
("[high]")
|
|
||||||
("{high}")))))
|
|
||||||
|
|
||||||
(define cons-tree
|
|
||||||
'("[cons]"
|
|
||||||
("[son]"
|
|
||||||
("[dor]"
|
|
||||||
("[high]")
|
|
||||||
("{high}"))
|
|
||||||
("{dor}"
|
|
||||||
("[cor]")
|
|
||||||
("{cor}")))
|
|
||||||
("{son}"
|
|
||||||
("[dor]"
|
|
||||||
("[voice]"
|
|
||||||
("[high]")
|
|
||||||
("{high}"))
|
|
||||||
("{voice}"
|
|
||||||
("[high]")
|
|
||||||
("{high}")))
|
|
||||||
("{dor}"
|
|
||||||
("[voice]"
|
|
||||||
("[cor]")
|
|
||||||
("{cor}"))
|
|
||||||
("{voice}"
|
|
||||||
("[cor]")
|
|
||||||
("{cor}"))))))
|
|
||||||
|
|
||||||
(define verbs
|
|
||||||
'("[verbs]"
|
|
||||||
("[réel]"
|
|
||||||
("[passé]")
|
|
||||||
("{passé}"))
|
|
||||||
("{réel}"
|
|
||||||
("[optatif]")
|
|
||||||
("{optatif}"
|
|
||||||
("[passé]")
|
|
||||||
("{passé}")))))
|
|
||||||
|
|
||||||
(display (tree-to-dot vowel-tree))
|
|
||||||
|
Reference in New Issue
Block a user