LARYNGEALS ARE NO RESONANTS – cuny

pie.cabal

@@ -27,7 +27,9 @@ source-repository head
 
 library
   exposed-modules:
-      Lib
+      Lib,
+      Phonology,
+      Util
   other-modules:
       Paths_pie
   hs-source-dirs:

src/Lib.hs

@@ -53,7 +53,7 @@ syllabify = replaceSublist [True, True] [True, False]  -- replace VV by VC
                                                       . foldr isSonant []
  where
   hasToBeSyllabic p = features p == Vowel
-  canBeSyllabic p = features p `elem` [Vowel, Resonant, Laryngeal]
+  canBeSyllabic p = features p `elem` [Vowel, Resonant]
   isSonant current xs = case xs of
     []                   -> [canBeSyllabic current] -- make last phoneme in word syllabic
     previousIsSonant : _ -> if previousIsSonant

src/Phonology.hs

@@ -97,9 +97,9 @@ showSyllabic phoneme syllabic = case (phoneme, syllabic) of
   (M , True ) -> "ṃ"
   (R , True ) -> "ṛ"
   (L , True ) -> "ḷ"
-  (H1, True ) -> "ə₁"
-  (H2, True ) -> "ə₂"
-  (H3, True ) -> "ə₃"
-  (H , True ) -> "ə"
+  -- (H1, True ) -> "ə₁"
+  -- (H2, True ) -> "ə₂"
+  -- (H3, True ) -> "ə₃"
+  -- (H , True ) -> "ə"
   _           -> show phoneme