871970f

Pinchord · pinchord.git · Tickets · Changelog

Branches > build-process > 871970f > files / generate-dictionary.clj

merge pre-prefixes and prefixes (idk didn't test hopefully it works garfsmie)

Grahp, 2026-01-31

Commit: 871970f9b6cc01c8e06e941e4df8891fc2ff694e
Parent: 0516a3e

2 changed files:

chords.edn modified (view file)

@@ -2,102 +2,102 @@  :banks {:initials "TSPWHR&"          :vowels "AOIU^"          :finals "LRPKFST*"}- :initials {"T" "t",+ :initials {"T" "t"             "TSP&" "sk"-            "TP" "f",-            "TP&" "ph",-            "TSWR" "kr",-            "THR" "thr",-            "TPR" "fr",-            "PWR" "br",-            "SH&" "sch",-            "TSPR" "scr",-            "TSPR&" "skr",-            "TSWH" "kn",-            "TWH" "thw",-            "PWHR" "bl",-            "SPWHR" "cl",-            "TS" "st",-            "SPR" "spr",-            "SHR&" "shr",-            "HR" "l",-            "WH" "wh",-            "TW" "tw",-            "S" "s",-            "SR" "v",-            "SR&" "vr",-            "TPWR" "dr",-            "TPWH" "x",-            "H" "h",-            "PR" "pr",-            "TSPWR" "gr",-            "SHR" "sl",-            "SW" "sw",-            "SW&" "sv",-            "SWR" "y",-            "TSPWH" "gh",-            "R" "r",-            "SWHR" "squ",-            "TSR" "str",-            "TWHR" "j",-            "SH" "sh",-            "PH" "m",-            "TSP" "sc",-            "TR" "tr",-            "P" "p",-            "WHR" "qu",-            "WHR&" "q",-            "TPHR" "fl",-            "TPHR&" "phl",-            "TPR&" "phr",-            "TH" "th",-            "WR" "wr",-            "SPWR" "cr",-            "SPH" "sm",-            "TSW" "k",-            "SPHR" "spl",-            "TSPWHR" "gl",-            "TSWHR" "kl",-            "SPW" "c",-            "SWH" "z",-            "PHR" "pl",-            "SPWH" "ch",-            "TSPW" "g",-            "W" "w",-            "SP" "sp",-            "TSPH" "sn",-            "TPH" "n",-            "TPW" "d",+            "TP" "f"+            "TP&" "ph"+            "TSWR" "kr"+            "THR" "thr"+            "TPR" "fr"+            "PWR" "br"+            "SH&" "sch"+            "TSPR" "scr"+            "TSPR&" "skr"+            "TSWH" "kn"+            "TWH" "thw"+            "PWHR" "bl"+            "SPWHR" "cl"+            "TS" "st"+            "SPR" "spr"+            "SHR&" "shr"+            "HR" "l"+            "WH" "wh"+            "TW" "tw"+            "S" "s"+            "SR" "v"+            "SR&" "vr"+            "TPWR" "dr"+            "TPWH" "x"+            "H" "h"+            "PR" "pr"+            "TSPWR" "gr"+            "SHR" "sl"+            "SW" "sw"+            "SW&" "sv"+            "SWR" "y"+            "TSPWH" "gh"+            "R" "r"+            "SWHR" "squ"+            "TSR" "str"+            "TWHR" "j"+            "SH" "sh"+            "PH" "m"+            "TSP" "sc"+            "TR" "tr"+            "P" "p"+            "WHR" "qu"+            "WHR&" "q"+            "TPHR" "fl"+            "TPHR&" "phl"+            "TPR&" "phr"+            "TH" "th"+            "WR" "wr"+            "SPWR" "cr"+            "SPH" "sm"+            "TSW" "k"+            "SPHR" "spl"+            "TSPWHR" "gl"+            "TSWHR" "kl"+            "SPW" "c"+            "SWH" "z"+            "PHR" "pl"+            "SPWH" "ch"+            "TSPW" "g"+            "W" "w"+            "SP" "sp"+            "TSPH" "sn"+            "TPH" "n"+            "TPW" "d"             "PW" "b"             "" "{^}"} - :vowels {"OU" "ou",-          "AU" "au",-          "AOI" "ei",-          "AO" "oa",-          "AO^" "ao",-          "AU^" "ua",-          "AI^" "ia",-          "IU^" "ee",-          "IU" "e",-          "AIU" "ea",-          "OI^" "io",-          "AIU^" "ae",-          "AOU" "ui",-          "AOI^" "ie",-          "U" "u",-          "O" "o",-          "O^" "oo",-          "A" "a",-          "A^" "aa",-          "I" "i",-          "I^" "eu",-          "^" "y",-          "OIU" "oe",-          "AOU^" "iu",-          "OI" "oi",-          "OIU^" "eo",-          "U^" "ue",+ :vowels {"OU" "ou"+          "AU" "au"+          "AOI" "ei"+          "AO" "oa"+          "AO^" "ao"+          "AU^" "ua"+          "AI^" "ia"+          "IU^" "ee"+          "IU" "e"+          "AIU" "ea"+          "OI^" "io"+          "AIU^" "ae"+          "AOU" "ui"+          "AOI^" "ie"+          "U" "u"+          "O" "o"+          "O^" "oo"+          "A" "a"+          "A^" "aa"+          "I" "i"+          "I^" "eu"+          "^" "y"+          "OIU" "oe"+          "AOU^" "iu"+          "OI" "oi"+          "OIU^" "eo"+          "U^" "ue"           "AI" "ai"}   :finals {"FS" "v"@@ -283,8 +283,9 @@           "LPKFST" "lcy"           "LRPKFST" "ncy"           "RPKFST" "rcy"}- :pre-prefixes {"+" "{^}"-                "_" "{^}_"-                "_+" "{^}-"}- :prefixes {"#" "{-|}"}- :suffixes {"E" "e"}}+ :prefixes {"#" "{-|}"+            "+" "{^}"+            "#+" "{^}{-|}"}+ :suffixes {"E" "e"+            "Z" "s"+            "EZ" "es"}}

generate-dictionary.clj modified (view file)

@@ -5,7 +5,7 @@             [clj-yaml.core :as yaml]             [clojure.edn :as edn])) -(def sections [:pre-prefixes :prefixes :initials :vowels :finals :suffixes])+(def sections [:prefixes :initials :vowels :finals :suffixes])  (def priority   "Priorities used for javelin orthospelling."