I have list of tuples: asd :: [ (Char, Char) ].
I have a string and I need to find split the string for characters and find the characters in list of tuples (eq with