//=========================================================
// Dutch
//=========================================================


// Vowels
//=======


phoneme @   //  Schwa
  vowel starttype #@ endtype #@
  unstressed
  length 125
  FMT(vowel/@_4)
endphoneme

phoneme i
  vowel starttype #i endtype #i
  length 160
  IF prevPh(w) THEN
    VowelStart(w/wi2)
  ENDIF
  FMT(vowel/i_2)
endphoneme

phoneme I
  vowel starttype #i endtype #i
  length 130
  FMT(vowel/ii)
endphoneme

phoneme y
  vowel starttype #u endtype #u
  length 180
  FMT(vowel/y)
endphoneme

phoneme 8
  vowel starttype #u endtype #u
  length 140
  FMT(vowel/y#)
endphoneme

phoneme u
  vowel starttype #u endtype #u
  length 150
  FMT(vowel/u_bck)
endphoneme

phoneme E
  vowel starttype #e endtype #e
  length 140
  FMT(vowel/e_mid2)
endphoneme

phoneme E2    //  as[E] but reduces to @ if unstressed
  vowel starttype #e endtype #e
  length 140
  ChangeIfDiminished(@)
  FMT(vowel/ee_2)
endphoneme

phoneme O
  vowel starttype #o endtype #o
  length 150
  FMT(vowel/o_5)
endphoneme

phoneme O:      // for "oor"
  vowel starttype #o endtype #o
  length 210
  FMT(vowel/o_6)
endphoneme

phoneme a:
  vowel starttype #a endtype #a
  length 210
  IF thisPh(isUnstressed) THEN
    FMT(vowel/a#_4)
  ENDIF
  FMT(vowel/a)
endphoneme

phoneme A
  vowel starttype #a endtype #a
  length 160
  IF thisPh(isUnstressed) THEN
    FMT(vowel/a#_2)
  ENDIF
  FMT(vowel/aa_7)
endphoneme

phoneme A~
  import_phoneme fr/A~
endphoneme


// Diphthongs
//===========

phoneme e:
  vowel starttype #e endtype #i
  length 190
  FMT(vdiph/ei)
endphoneme

phoneme Y:
  vowel starttype #@ endtype #@
  length 220
  FMT(vdiph/y#y_3)
endphoneme

phoneme o:
  vowel starttype #o endtype #u
  length 200
  FMT(vdiph/Vu_3)
endphoneme


phoneme EI
  vowel starttype #a endtype #i
  length 210
  FMT(vdiph/eei)
endphoneme

phoneme Wy
  vowel starttype #@ endtype #u
  length 220
  FMT(vdiph/&y)
endphoneme

phoneme VU
  vowel starttype #a endtype #o
  length 220
  FMT(vdiph/aau_2)
endphoneme

phoneme eU
  vowel starttype #e endtype #u
  length 220
  FMT(vdiph/eu)
endphoneme

phoneme yU
  vowel starttype #u endtype #u
  length 220
  FMT(vdiph2/yu)
endphoneme




// CONSONANTS
//===========


phoneme r    // from Afrikaans
  import_phoneme base/R2
endphoneme



phoneme Q
  vcd vel frc
  lengthmod 6
  voicingswitch x
  Vowelin f1=2  f2=2300 200 300  f3=-300 80
  Vowelout f1=2  f2=2300 250 300  f3=-300 80 brk

  IF nextPhW(isVoiced) THEN
  ELSE
    ChangePhoneme(x)
  ENDIF

  IF nextPh(isPause2) THEN
    FMT(voc/Q_) addWav(vocw/Q_)
  ENDIF
  FMT(voc/Q_less) addWav(vocw/Q2, 140)
endphoneme