Isoraqathedh

data

Apr 18th, 2014
137
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Lisp 1.18 KB | None | 0 0
  1. (setf (gethash :vowel *phonemes*)             (make-phoneme-list '("ɑ"  ("a"  "a" "a")  160)
  2.                                  '("ɛ"  ("e"  "e" "e")   90)
  3.                                  '("i"  ("i"  "i" "i")  160)
  4.                                  '("ɔ"  ("o"  "o" "o")  150)
  5.                                  '("ʊ"  ("u"  "u" "u")  140)
  6.                                  '("ɑː" ("ae" "ā" "-a")  50)
  7.                                  '("ɛː" ("ee" "ē" "-e")  70)
  8.                                  '("iː" ("ii" "ī" "-i")  50)
  9.                                  '("ɔː" ("ou" "ō" "-o") 100)
  10.                                  '("ʊː" ("vu" "ō" "-u")  30))
  11.       (gethash :vowel-for-w *phonemes*)       (make-phoneme-list '("ɑ"  ("a"  "a" "a")  160)
  12.                                  '("ɛ"  ("e"  "e" "e")   90)
  13.                                  '("i"  ("i"  "i" "i")  160)
  14.                                  '("ɔ"  ("o"  "o" "o")  150)
  15.                                  '("ɑː" ("ae" "ā" "-a") 120)
  16.                                  '("ɛː" ("ee" "ē" "-e")  95)
  17.                                  '("iː" ("ii" "ī" "-i") 125)
  18.                                  '("ɔː" ("ou" "ō" "-o") 100))
  19.       (gethash :vowel-for-y *phonemes*)       (make-phoneme-list '("ɑ"  ("a"  "a" "a")  160)
  20.                                  '("ɛ"  ("e"  "e" "e")   90)
  21.                                  '("ɔ"  ("o"  "o" "o")  210)
  22.                                  '("ʊ"  ("u"  "u" "u")  140)
  23.                                  '("ɑː" ("ae" "ā" "-a") 150)
  24.                                  '("ɛː" ("ee" "ē" "-e") 150)
  25.                                  '("ɔː" ("ou" "ō" "-o") 150)
  26.                                  '("ʊː" ("vu" "ō" "-u") 110)))
Advertisement
Add Comment
Please, Sign In to add comment