Latvian language improvements

dictsource/lv_list

 // Abbreviations //
 ///////////////////
 as      $abbrev
-asv     ,a:_:,ess_!v'e:_:
+asv     ,a:_:,ess_!v'e:_: $allcaps
 ano     'ano:
 ba      $abbrev
 bba     $abbrev
 eest    $abbrev
 est     $abbrev
 eur     'euR
-lnnk    'ell_,en_,en_k'a: $pause
+lnnk    $abbrev $pause
 lp      $abbrev
 ls      $abbrev
 lu      $abbrev
 na      $abbrev
 nra     $abbrev
 nr      $abbrev
-pctvl   p'e:_ts,e:_t,e:_v,e:_'ell_ $pause
+pctvl   $abbrev $pause
 prks    $abbrev
 psrs    $abbrev
 rpi     $abbrev
 šķ      $abbrev
 tjpr    $abbrev $u $pause
 tml     $abbrev $u $pause
-tp      t,e:_p'e: $pause
+tp      $abbrev $pause
 utjpr   $abbrev $u $pause
 utml    $abbrev $u $pause
 utt     $abbrev $u $pause
-zzs     z'e:_z,e:_'ess $pause
+zzs     $abbrev $pause
 
 ///////////////////////////
 // other exception words //

dictsource/lv_rules

 .group e
            e               e         // Default as narrow e
            ee              e_|e      // internationalisms, prefix: ne-e...
-           ei (+           ei
+           ei (++          ei
 
     // narrow e ---------------------------------------------------------------------- //
            a) e (ro            e     // internationalisms
            e (L25L01_          E
            e (L25L25L01_       E
            e (Jam              E
-      L25) e (L18_+            E     // vareni etc.
+      L25) e (CJL18_           E     // vareni etc.
 
     // specific words ----------------------------------------------------------------- //
         b) e (dL82L05_         e         // bedre
        _v) e (ntL04_           E         // Venta
        _v) e (ntsp             E         // Ventspils
        _z) e (lmL04_           e         // Zelma
-       _z) e (m                e
+        z) e (m+               e
 
 .group ē
            ē                   e:        // Default as narrow ē
            ē (L25L25L25L25L24  E:
                                      // widening endings
            ē (L01_             E:
-           ē (L25L01_          E:
+           ē (L25L01_+         E:
            ē (L25L25L01_       E:
                                     // 5. dec. words
            ē (CL05_            e:
            ē (rkšķ             e:
            ē (tā_              E:
            ē (tL55_            E:
+       gr) ē (kL01_            E:
       izp) ē (t                e:
      _kāp) ē (c_               e:    // kāpēc
         m) ēne (L83            e:ne
         t) ē (L90              e:
         t) ē (mL04_            e:    // ..tēma
         t) ērē                 e:Re:
+        t) ē (zL05_            e:    // ..tēze
        _v) ē (l_               e:    // vēl
        _v) ē (lL01_            E:    // vēls
        _v) ē (rā_              e:    // vērā
            ī               i:
 
 .group j
-        A) j (@           :j
+//        A) j (@           :j
            j               j
         _) jebk            j%ebk     // stress on 2nd syllable
 
         C) n (C            n-        // more voiced variant between consonants
       L59) n (@           :n
            n (d            N
+           ne (vienl+      n'e       // nevienlīdzība
         _) ne (vien        n%e       // stress on 2nd syllable
            n (g            N
            n (k            N
 .group os
        ap) ostrof          ostRo:f
       atm) os              os
-        b) os (L01_        os        // boss
    _blont) os (_           uos       // Blontos
+        b) os (L01_        os        // boss
      _cit) os (_           uos       // citos
      _dat) os (_           uos
        _d) osto (jevskL02_ osto      // Dostojevskis
         f) osfo            osfo:
   _gr) osto (nL04_         osto:     // Grostona
        iz) os              uos
+      kāp) os (t           uos
         k) os (in          os
         k) os (m           os
        _k) osmo (sL01_     osmo      // kosmoss
            osto (L65       uostuo
            os (t_          uos
         p) os (m           uos
+        p) os (tC@         os
         p) os (te          os
         p) os (ter         os
         p) os (tī          uos
-        p) os (tL56m       os
-        p) os (tm          os
-        p) os (tk          os
+        p) os (tL01        uos
+        p) os (tL55m       os
         p) os (to          uos
-        p) os (tso         os
         p) os (tul         os
        pr) os (p           os
        pr) os (t           os

espeak-ng-data/lang/bat/lv

 status mature
 words 0 2
 pitch 64 118
-breath   5 2 0 0 0 1
-breathw  20 40 500 1200
-formant 1 95 100 100 -5
+breath   10 2 1 0 0 0
+breathw  20 42 85 200 500 1200
+formant 0 95 100 100 -5
 //tunes s5 c5 q5 e5
-tone 150 220 450 255 850 10 3500 255
+tone 150 220 450 255 750 20 3500 255
 stressAmp 12 10 10 8 0 0 18 15
 stressLength 180 180 180 160 0 0 240 180

phsource/ph_latvian

 phoneme i:
   vwl starttype #i endtype #i
   length 300
-  FMT(vwl_lv/ii, 100) // was i_7
+  FMT(vwl_lv/ii, 90) // was i_7
 endphoneme
 
 
   WAV(ufric/s,60)
 endphoneme
 
+phoneme j // **y**es
+  liquid pal starttype #i
+
+  IF nextPhW(isVowel) THEN
+    NextVowelStarts
+      VowelStart(j/j@)
+      VowelStart(j/ja)
+      VowelStart(j/je)
+      VowelStart(j/ji)
+      VowelStart(j/jo)
+      VowelStart(j/ju)
+    EndSwitch
+
+    IF prevPhW(e) THEN
+      VowelEnding(j/xj, 10) //
+    ELSE
+      VowelEnding(j/xj, 127) // In difference with English, vowel is lengthened, not shortened
+    ENDIF
+
+    IF prevPh(isPause) THEN
+      FMT(j/_j)
+    ENDIF
+  ELSE
+    // no vowel follows
+    Vowelout len=127
+    FMT(j/xj)
+  ENDIF
+endphoneme
+