endswith :: String -> String -> Bool
endswith a b = drop (length a - length b) a == b
endswith :: String -> String -> Bool
endswith a b = drop (length a - length b) a == b
endswith a b = drop (length a - length b) a == b