removed example trees
This commit is contained in:
parent
0097800eba
commit
bfe08e1461
@ -42,57 +42,4 @@
|
||||
(tree-to-dot-helper (cdr tree) 1 0)
|
||||
"}")))
|
||||
|
||||
(define 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))
|
||||
; (display (tree-to-dot vowel-tree))
|
||||
|
Reference in New Issue
Block a user