;;;==========================================================================
;;;        *phonemes* contains the sub-symbolic description of phonemes
;;;==========================================================================
;;;This data is derived from chart on pages 176-177 of
;;;_The Sound Pattern of English_, Noam Chomsky, 1968.
;;;The first 2-3 letter code is the phoneme label, and the rest
;;;of the vector represents the speech features that characterize
;;;that phoneme.  They are, in order:  vocalic, consonantal, high, back,low,
;;;anterior, coronal, round, tense, voice, continuant, nasal, strident.
;;;As Chomsky notes, anterior and coronal replace labial, dental, paleto-alveolar, and velar
;;;The Xs represent unspecified values.  For the moment, they remain unspecified,
;;;but may be determinable given phonologic rules and specific words.


;                    symbol  feature-vector                IPA symbol......MRC.......Example
(defvar *phonemes*    '((ee  (+ - + - - - - - + x x x x))  ;lower-case i...i.........steam
                        (i   (+ - + - - - - - - x x x x))  ;block i........I.........pits
                        (a_  (+ - - - - - - - + x x x x))  ;e..............eI........late
                        (e   (+ - - - - - - - - x x x x))  ;epsilon........e.........mess
                        (ae  (+ - - - + - - - + x x x x))  ;ae.............&.........fat
                        (u   (+ - + + - - - - - x x x x))  ;ibar........... .........just
                        (@   (+ - - + - - - - - x x x x))  ;inverse e...... .........burn, eatEn, Above
                        (uu  (+ - - + + - - - - x x x x))  ;inverse v......V.........rUbber,abOve
                        (ah  (+ - - + + - - - + x x x x))  ;a..............A.........hAlf
                        (u_  (+ - + + - - - + + x x x x))  ;u..............u.........crUise
                        (oo  (+ - + + - - - + - x x x x))  ;block U........U.........cOOk
                        (o_  (+ - - + - - - + + x x x x))  ;o..............O.........cOAt
                        (aw  (+ - - + + - - + - x x x x))  ;backwards c....0 (zero)..bAWl
                        (y   (- - + - - - - - - x x x x))  ;j..............j.........Yell
                        (w   (- - + + - - - + - x x x x))  ;w..............w.........Wool
                        (r   (+ + - - - - + x x + + - -))  ;r..............r.........Rat
                        (l   (+ + - - - + + x x + + - -))  ;l..............l.........Loin
                        (h   (- - - - + - - x x - + - -))  ;h..............h.........Hot
                        (p   (- + - - - + - x x - - - -))  ;p..............p.........Pot
                        (b   (- + - - - + - x x + - - -))  ;b..............b.........But
                        (t   (- + - - - + + x x - - - -))  ;t..............t.........Top
                        (d   (- + - - - + + x x + - - -))  ;d..............d.........Dog
                        (ch  (- + + - - - + x x - - - +))  ;tSigma.........tS........CHurCH
                        (j   (- + + - - - + x x + - - +))  ;d3.............dZ........Jowls
                        (k   (- + + + - - - - x - - - -))  ;k..............k.........Cramp
                        (g   (- + + + - - - - x + - - -))  ;g..............g.........Goon
                        (f   (- + - - - + - x x - + - +))  ;f..............f.........Feeler
                        (v   (- + - - - + - x x + + - +))  ;v..............v.........Vain
                        (th  (- + - - - + + x x - + - -))  ;theta..........T.........THought
                        (thz (- + - - - + + x x + + - -))  ;delta..........D.........THis
                        (s   (- + - - - + + x x - + - +))  ;s..............s.........Sign
                        (z   (- + - - - + + x x + + - +))  ;z..............z.........Zircon
                        (sh  (- + + - - - + x x - + - +))  ;sigma..........S.........SHeet
                        (zh  (- + + - - - + x x + + - +))  ;3..............Z.........viSIon
                        (m   (- + - - - + - x x + - + -))  ;m..............m.........MiMe
                        (n   (- + - - - + + x x + - + -))  ;n..............n.........Numb
                        (ng  (- + + + - - - x x + - + -))  ;eta............9.........youNG
                        (X   (1 1 1 1 1 1 1 1 1 1 1 1 1))  ;default placeholder
                        (XX  (0 0 0 0 0 0 0 0 0 0 0 0 0))  ;default nil phoneme
                        ;total:  37 phonemes +2 placeholder
                        ))

*Word transcription:  Hierarchical nesting
*Word consists of (Syllable Syllable Syllable ...)
*Syllable consists of (Stress Onset Vowel Coda)
*Phoneme clusters consist of (phoneme phoneme ...)
*Stress recieves value of 2, unstressed recieve value of 1 (not used in similarity measurement)
*s, r, l sh, etc. may be doubled at the end of one syllable and the beginning of the next, 
 depending on personal judgments


Some examples:

cult           ((2 (k) (@) (l t)))
dare           ((2 (d) (a_) (r)))
fate           ((2 (f) (a_) (t)))
guess          ((2 (g) (e)  (s)))
hint           ((2 (h) (i)  (n t)))
mood           ((2 (m) (u_) (d)))
oath           ((2 (X) (o_) (th)))
plea           ((2 (p l) (ee) (X)))
rush           ((2 (r)   (u)  (sh)))
truce          ((2 (t r) (u_) (s)))
verb           ((2 (v)   (@)  (r b)))
zeal           ((2 (z)  (ee) (l)))))


advantage	   ((1 (X)  (@) (d))    (2 (v) (ae)   (n))  (1 (t)  (i)   (j)))
behavior           ((1 (b)  (ee) (X))  (2 (h) (a_)   (v))  (1 (v y)  (@)   (r)))
circumstance       ((2 (s)  (@)  (r))  (1 (k) (@)    (m))  (1 (s t) (ae) (n s)))
defiance           ((1 (d)  (ee) (X))  (2 (f) (aw ee)(X))  (1 (X)  (@)    (n s)))
fantasy            ((2 (f)  (ae) (n))  (1 (t) (@)    (s))  (1 (s)  (ee)   (X)))
interim            ((2 (X)  (i)  (n))  (1 (t) (@)    (r))  (1 (r)  (@)    (m)))
misery             ((2 (m)  (i)  (X))  (1 (z) (@)    (r))  (1 (r)  (ee)   (X)))
narrowness         ((2 (n)  (ah) (r))  (1 (r) (o_)   (n))  (1 (n)  (e)    (s)))
occasion           ((1 (X)  (@) (X))   (2 (k) (a_)   (X))  (1 (zh) (@)    (n)))
protocol           ((2 (P R)(O_) (X))  (1 (T) (@)    (X))  (1 (K)  (Aw)   (L)))
ridicule           ((2 (R)  (I)  (X))  (1 (D) (@)    (X))  (1 (K Y)  (U_)   (L)))
upheaval           ((1 (X)  (@) (p))   (2 (h) (ee)   (v))  (1 (v)  (@)    (l))))

