isReversePalindrome :: String -> Bool
isReversePalindrome s = complementDna s == s
isReversePalindrome :: String -> Bool
isReversePalindrome s = complementDna s == s
isReversePalindrome s = complementDna s == s