Phladiprelio.Ukrainian.DeEnCoding

Functions to encode and decode String -> \['Int8'\] used in the Simple/Main.hs code. Is taken from the phonetic-languages-simplified-lists-examples package.

Documentation

encodeToInt :: Ord a => [[a]] -> Int

indexedL :: Foldable t => b -> t b -> [(Int8, b)]

Is taken mostly from the Phonetic.Languages.Ukrainian.Simplified.Lists.UniquenessPeriodsG module from the phonetic-languages-simplified-common package.

trans2 :: [[a]] -> [(Int8, [a])]

trans232 :: [[a]] -> [(Int, [a])]

int2l :: Int -> [Int8]

decodeToStr :: [Int8] -> String -> String

So for the strings consisting of no more than 10 words: > decodeToStr (int2l . encodeToInt . words $ xs) xs == unwords . words $ xs

decodeToReadyFCUkr :: [Int8] -> ReadyForConstructionUkr -> ReadyForConstructionUkr

For the ReadyForConstructionUkr that corresponds to the String consisting of no more than 10 words.

toHeap :: [String] -> Heap Int

Every String consists of words with whitespace symbols in between.

toHeapR :: [ReadyForConstructionUkr] -> Heap Int

Every ReadyForConstructionUkr corresponds to the String that consists of words with whitespace symbols in between. The list must be consistent -- either FSL-constructed or Str-constructed.

fromHeap :: String -> Heap Int -> [String]

fromHeapReadyFCUkr :: ReadyForConstructionUkr -> Heap Int -> [ReadyForConstructionUkr]

intersectInterResults :: [String] -> [String] -> [String]

intersectInterReadyFCUkr :: (String -> [[FlowSound]]) -> [ReadyForConstructionUkr] -> [ReadyForConstructionUkr] -> [ReadyForConstructionUkr]

intersectInterReadyFCUkr2 :: String -> [ReadyForConstructionUkr] -> [ReadyForConstructionUkr] -> [ReadyForConstructionUkr]

newLineEnding :: String

Auxiliary printing function to define the line ending in some cases. Is taken from the Languages.UniquenessPeriods.Vector.General.DebugG module from the phonetic-languages-general package

foldlI :: String -> [[ReadyForConstructionUkr]] -> [ReadyForConstructionUkr]