phoneme +   // high tone, use after a vowel
  stress
  Tone (5, 30, envelope/p_512, NULL)
endphoneme

phoneme @
  vwl  starttype #@  endtype #@
  length 130
  IF nextPh(H) THEN
    FMT(vowel/@_low)
  ENDIF
  FMT(vowel/@_bck)
endphoneme
 
phoneme V
  vwl  starttype #@  endtype #@
  length 130
  ChangeIfNotStressed(@)
  IF nextPh(H) THEN
    FMT(vowel/@_low)
  ENDIF
  FMT(vowel/V_3)
endphoneme


phoneme i
  vwl lng starttype #i endtype #i
  length 220
  IfNextVowelAppend(;)
  FMT(vowel/i_fnt)
endphoneme

phoneme I
  vwl starttype #i endtype #i
  length 150
  IfNextVowelAppend(;)
  FMT(vowel/ii_3)
endphoneme

phoneme e
  vwl lng starttype #e endtype #e
  length 220
  FMT(vowel/e_2)
endphoneme

phoneme E
  vwl lng starttype #e endtype #e
  length 200
  FMT(vowel/ee_2)
endphoneme

phoneme a
  vwl lng starttype #a endtype #a
  length 220
  FMT(vowel/aa_9)
endphoneme

phoneme O
  vwl lng starttype #o endtype #o
  length 200
  FMT(vowel/oo_4)
endphoneme

phoneme o:
  vwl lng starttype #o endtype #o
  length 220
  FMT(vowel/o)
endphoneme


phoneme U
  vwl starttype #u endtype #u
  length 150
  FMT(vowel/uu_bck)
endphoneme


phoneme u
  vwl lng starttype #u endtype #u
  length 220
  FMT(vowel/u_bck)
endphoneme


phoneme eI    // for English words
  import_phoneme en/eI
endphoneme


// Consonants

phoneme v   // Try English [v]
  import_phoneme base1/v
endphoneme