phladiprelio-general-simple (empty) → 0.1.0.0

raw patch · 4 files changed

+114/−0 lines, 4 filesdep +basedep +cli-argumentsdep +phladiprelio-general-shared

Dependencies added: base, cli-arguments, phladiprelio-general-shared, phonetic-languages-phonetics-basics, rhythmic-sequences

Files

• CHANGELOG.md +5/−0
• Phladiprelio/General/Simple.hs +57/−0
• README.md +19/−0
• phladiprelio-general-simple.cabal +33/−0

@@ -0,0 +1,5 @@+# Revision history for phladiprelio-general-simple++## 0.1.0.0 -- 2023-03-12++* First version. Released on an unsuspecting world.

@@ -0,0 +1,57 @@+{-# LANGUAGE NoImplicitPrelude #-}++module Phladiprelio.General.Simple where++import GHC.Base+import Text.Show (show)+import Phladiprelio.General.PrepareText +import Phladiprelio.General.Syllables +import Phladiprelio.General.Base+import System.Environment (getArgs)+import GHC.Num ((-))+import Text.Read (readMaybe)+import System.IO (putStrLn, FilePath)+import Rhythmicity.MarkerSeqs hiding (id) +import Rhythmicity.BasicF +import Data.List+import Data.Maybe (fromMaybe) +import Data.Tuple (fst,snd)+import CLI.Arguments+import CLI.Arguments.Get+import CLI.Arguments.Parsing+import GHC.Int (Int8)++generalF + :: GWritingSystemPRPLX -- ^ Data used to obtain the phonetic language representation of the text.+ -> [(Char,Char)] -- ^ The pairs of the 'Char' that corresponds to the similar phonetic languages consonant phenomenon (e. g. allophones). Must be sorted in the ascending order to be used correctly. + -> CharPhoneticClassification+ -> SegmentRulesG+ -> String -- ^ Corresponds to the 100 delimiter in the @ukrainian-phonetics-basic-array@ package.+ -> String -- ^ Corresponds to the 101 delimiter in the @ukrainian-phonetics-basic-array@ package.+ -> ([[[PRS]]] -> [[Double]])+ -> HashCorrections + -> (Int8,[Int8]) + -> [String] + -> IO [()] +generalF wrs ks arr gs us vs h hc (grps,mxms) = mapM (\(x,y) -> putStrLn (show x `mappend` (' ':y)))  . sortOn id . map ((\xss -> (f xss, xss)) . unwords) . permutations+               where f = sum . countHashesG hc grps mxms . mconcat . h . createSyllablesPL wrs ks arr gs us vs++processingF+ :: GWritingSystemPRPLX -- ^ Data used to obtain the phonetic language representation of the text.+ -> [(Char,Char)] -- ^ The pairs of the 'Char' that corresponds to the similar phonetic languages consonant phenomenon (e. g. allophones). Must be sorted in the ascending order to be used correctly. + -> CharPhoneticClassification+ -> SegmentRulesG+ -> String -- ^ Corresponds to the 100 delimiter in the @ukrainian-phonetics-basic-array@ package.+ -> String -- ^ Corresponds to the 101 delimiter in the @ukrainian-phonetics-basic-array@ package.+ -> ([[[PRS]]] -> [[Double]])+  -> HashCorrections + -> (Int8,[Int8]) + -> [[String]] + -> [[String]] + -> String + -> IO ()+processingF wrs ks arr gs us vs h hc (grps,mxms) ysss zsss xs = do+  args <- getArgs+  let str1 = take 7 . words . mconcat . prepareText ysss zsss xs . unwords $ args+  generalF wrs ks arr gs us vs h hc (grps,mxms) str1 >> return ()+

@@ -0,0 +1,19 @@+The library is the new implementation of the ideas related to PhLADiPreLiO (Phonetic Languages+Approach to Discovering the Preferred Line Options) for different languages. It uses hashes and+has at the moment (as of the version 0.1.0.0) not the full functionality. The previous implementation +and its documentation are at the links:++https://hackage.haskell.org/package/phonetic-languages-simplified-generalized-examples-array++[Ukrainian documentation](https://oleksandrzhabenko.github.io/uk/rhythmicity/PhLADiPreLiO.Ukr.21.pdf)++[English documentation](https://oleksandrzhabenko.github.io/uk/rhythmicity/PhLADiPreLiO.Eng.21.pdf)++P.S.: the author would like to devote this project to support the Fund GASTROSTARS.+At the day of publication of the first version of the package (12/03/2023) there is+the Fund foundator's (this is [Emma Kok](https://www.emmakok.nl)) Birthday.+If you would like to share some financial support, please, contact the fund+using the URL:++[Contact Fund GASTROSTARS](https://gastrostars.nl/hou-mij-op-de-hoogte)+

@@ -0,0 +1,33 @@+cabal-version:      2.4+name:               phladiprelio-general-simple+version:            0.1.0.0++-- A short (one-line) description of the package.+synopsis:           A generalized functionality of PhLADiPreLiO for different languages that uses hash algorithms.++-- A longer description of the package.+description:        The basic ideas of PhLADiPreLiO (Phonetic Languages Approach to Discovering Preferred Line Options) are described in the work: [PhLADiPreLiO.Ukr.21.pdf](https://oleksandrzhabenko.github.io/uk/rhythmicity/PhLADiPreLiO.Ukr.21.pdf) [PhLADiPreLiO.Eng.21.pdf](https://oleksandrzhabenko.github.io/uk/rhythmicity/PhLADiPreLiO.Eng.21.pdf). This is the generalization and it uses somewhat different approach with the same basic ideas.++-- A URL where users can report bugs.+-- bug-reports:++-- The license under which the package is released.+license:            MIT+author:             Oleksandr Zhabenko+maintainer:         oleksandr.zhabenko@yahoo.com++-- A copyright notice.+copyright:          Oleksandr Zhabenko+-- category:+extra-source-files: CHANGELOG.md, README.md++library+    -- Modules included in this executable, other than Main.+    exposed-modules:  Phladiprelio.General.Simple++    -- LANGUAGE extensions used by modules in this package.+    other-extensions: NoImplicitPrelude+    build-depends:    base >=4.13 && <5, rhythmic-sequences ==0.2.1.0, phonetic-languages-phonetics-basics ==0.10.0.2, phladiprelio-general-shared ==0.1.0.0, cli-arguments ==0.7.0.0+    hs-source-dirs:   .+    default-language: Haskell2010+