main :: IO ()
main = do
  print $ last' "asdf"
  print $ lastbutone "asdf"
  print $ nth 1 "asdf"
  print $ len' "asdf"
  print $ rev "asdf"
  print $ isPal "asdfdsa"
main :: IO ()
main = do
  print $ last' "asdf"
  print $ lastbutone "asdf"
  print $ nth 1 "asdf"
  print $ len' "asdf"
  print $ rev "asdf"
  print $ isPal "asdfdsa"
main = do
  print $ last' "asdf"
  print $ lastbutone "asdf"
  print $ nth 1 "asdf"
  print $ len' "asdf"
  print $ rev "asdf"
  print $ isPal "asdfdsa"