Upload homework #2
Conversation
|
|
||
|
|
||
| isVowel :: Char -> Bool | ||
| isVowel = undefined | ||
| isVowel char | ||
| | isInString (toLower char) vowels == True = True |
There was a problem hiding this comment.
Няма нужда от guard, тъй като резултатният тип е Bool, т.е.
isVowel char = isInString (toLower char) vowelsе еквивалентно :)
|
|
||
|
|
||
| isConsonant :: Char -> Bool | ||
| isConsonant = undefined | ||
| isConsonant char | ||
| | isVowel char == False && isChar char == True = True |
There was a problem hiding this comment.
Няма нужда да сравняваш върнатия булев резултат с True, тъй като:
True == True е същото като True, само че с повече тавтология. Ако искаме да обърнем резултата, обикновено ползваме не (not).
| encode = undefined | ||
| encode [] = [] | ||
| encode (first:rest) | ||
| | isConsonant first == True = first : 'o' : first : (encode rest) |
|
Decode се нуждае от още малко любов: пр: decode "uou"
> "uou"
decode "oooo"
> "oooo" |
|
Поизчистих кода но при мене decode си работи при тези случаи |
|
|
|
Оправих го, забравих че са гласни :D |
|
👍 |
|
Качих домашните за пермутации и таблицата. |
No description provided.