DobutokO.Poetry.StrictV

Maintainer : [e-mail]

Helps to order the 7 or less Ukrainian words (or their concatenations) to obtain (to some extent) suitable for poetry or music text.

Documentation

uniquenessVariants2GN :: Vector ([Int] -> Int) -> (String -> [Int]) -> String -> Vector ([Int], Vector Int, String)

Given a String consisting of no more than 7 Ukrainian words [some of them can be created by concatenation with preserving the Ukrainian pronunciation of the parts, e. g. "так як" (actually two correct Ukrainian words and a single conjunction) can be written "такйак" (one phonetical Ukrainian word transformed literally with preserving phonetical structure), if you would not like to treat them separately], it returns a Vector of possible combinations without repeating of the words in different order and for each of them appends also the information about uniquenessPeriods to it and finds out three different metrics -- named "norms".

Afterwards, depending on these norms some phonetical properties of the words can be specified that allow to use them poetically or to create a varied melody with them.

uniquenessVariants2GNP :: String -> String -> Vector ([Int] -> Int) -> (String -> [Int]) -> String -> Vector ([Int], Vector Int, String)

Generalized variant of uniquenessVariants2GN with prepending and appending String (given as the first and the second argument).

preAppend :: [a] -> [[a]] -> [[a]] -> [[a]]