मैं कोशिश कर रहा हूँ करने के लिए एक कार्यक्रम बनाने के लिए, लगता है कि एक पत्र और उस पत्र में मोर्स कोड.
मोर्स तालिका में दिया जाता है, के रूप में अच्छी तरह के रूप में charToCode :: [(Char, String)] -> Char -> String
मैं भी उपयोग करने के लिए है देखने और fromJust प्रपत्र डेटा.शायद यह काम करने के लिए. पर संकलन मैं निम्न त्रुटि प्राप्त:
Couldn't match expected type [Maybe Char]
with actual type Maybe String
* In the second argument of 'map', namely '(lookup a f)'
In the expression: map (fromJust) (lookup a f)
In an equation for 'charToCode':
charToCode f a = map (fromJust) (lookup a f)
मैं है का उपयोग करने के लिए नक्शे से प्रस्तावना. यहाँ है मेरे कोड इतनी दूर है:
morseTab :: [(Char, String)]
morseTab = [('A', ".-"), ('B', "-..."), ('C', "-.-."), ('D', "-.."), ('E', "."), ('F', "..-."), ('G', "--."), ('H', "...."),('I', ".."), ('J', ".---"), ('K', "-.-"), ('L', ".-.."), ('M', "--"), ('N', "-."), ('O', "---"), ('P', ".--."), ('Q', "--.-"), ('R', ".-."), ('S', "..."), ('T', "-"), ('U', "..-"), ('V', "...-"), ('W', ".--"), ('X', "-..-"), ('Y', "-.--"), ('Z', "--..")]
charToCode :: [(Char, String)] -> Char -> String
charToCode f a = map (fromJust) (lookup a f)
morseTab है एक निश्चित समारोह, मैं नहीं कर सकता यह परिवर्तन करने के लिए या तो.