added UttS

2025-09-11 09:50:53 +02:00
parent 0e5bb779cc
commit bc41082247
3 changed files with 15 additions and 0 deletions
@@ -3,6 +3,7 @@ concrete PhraseSqi of Phrase = CatSqi ** open Prelude, ResSqi in {
  lin
    PhrUtt pconj utt voc = {s = pconj.s ++ utt.s ++ voc.s} ;

+    UttS s = s ;
    UttNP np = {s = np.s ! Nom} ;
    UttInterj i = i ;