s←⊢⊆⍨' '≠⊢
a b c←2097144 131064 1957895
f←{(⊂⍵)∊(12↑v),(s'yi ya ye yao you yan yang yin ying yong yu yue yuan yun wu wa wo wai wei wan wang wen weng nv lv nve lve'),(,⊤(a-8)1966080 393208 1966064 2096720 1966072 1048568a a 2056184a 131048a 7288b 7280 106488b 7280b 0 1958911 73735c c 352263c 24583 1859591c,5⍴7)/,('bpmfdtnlgkhzcs',s'zh ch sh r j q x')∘.,v←'aoe',s'ai ei ao ou an ang en eng ong u ua uo uai ui uan uang un ueng i ia ie iao iu ian iang in ing iong u ue uan un'}
इसे ऑनलाइन आज़माएं!
गोल्फ का काम जारी है।
Ungolfed
s←{⍵⊆⍨' '≠⍵}
con←s'b p m f d t n l g k h z c s zh ch sh r j q x'
vwl←s'a o e ai ei ao ou an ang en eng ong u ua uo uai ui uan uang un ueng i ia ie iao iu ian iang in ing iong u ue uan un'
tab←con∘.,vwl
bin←,⊤2097136 1966080 393208 1966064 2096720 1966072 1048568 2097144 2097144 2056184 2097144 131048 2097144 7288 131064 7280 106488 131064 7280 131064 0 1958911 73735 1957895 1957895 352263 1957895 24583 1859591 1957895 7 7 7 7 7
all←'aoe',(12↑vwl),(s'yi ya ye yao you yan yang yin ying yong yu yue yuan yun wu wa wo wai wei wan wang wen weng nv lv nve lve'),bin/,tab
f←{(⊂⍵)∊all}
इसे ऑनलाइन आज़माएं!
सहायक कार्य s
स्थान-सीमांकित स्ट्रिंग को खोल देता है:
{⍵⊆⍨' '≠⍵} monadic function taking a string
' '≠⍵ 0s at spaces, 1s elsewhere
⍵⊆⍨ Partition (split at 0s)
मैं पहले संभव प्रारंभिक और अंतिम तार को शब्दांश में संग्रहीत करता हूं, फिर tab
दूसरी सूची के प्रत्येक स्ट्रिंग के साथ पहली सूची से प्रत्येक स्ट्रिंग के संघनन युक्त एक तालिका बनाते हैं ।
अगला, मैं बाइनरी डेटा को पूर्णांकों की सूची के रूप में संग्रहीत करता हूं। पूर्णांकों में से कुछ को दोहराया जाता है और इसलिए इसे चर में संग्रहित किया जा सकता है, जो कुछ स्थानों को खत्म करने की भी अनुमति देता है।
प्रत्येक पूर्णांक बाइनरी में डिकोड किया जाता है, और तालिका की एक पंक्ति का प्रतिनिधित्व करता है। संख्या में प्रत्येक बिट यह दर्शाता है कि उस पंक्ति में एक निश्चित शब्दांश एक मान्य शब्दांश है, जिसमें MSB पहले कॉलम का प्रतिनिधित्व करता है। सभी अमान्य सिलेबल्स को टेबल से हटा दिया जाता है।
हम तालिका को सूची में समतल करते हैं, एक विशेष मामले के रूप में प्रारंभिक व्यंजन के साथ रूपों पर जोड़ते हैं, और अंत में जांचें कि क्या हमारा इनपुट सूची में है।
संभावित आगे गोल्फ क्षमता:
- बेस 64 या बेस 255 एनकोडिंग लिखें
- संख्याओं को छोटा करने के लिए स्तंभों और पंक्तियों को फिर से व्यवस्थित करें।
पायथन सहायक स्क्रिप्ट और टेस्ट-केस जनरेटर: इसे ऑनलाइन आज़माएं!
nar
? : P