-- Wrongri-La Shower

main = do
  s <- getLine
  n <- readLn
  s' <- getLine
  let
      os = length $ filter (=='o') s
      os' = length $ filter (=='o') s'
      e = s == s'
      re = s == reverse s'
   in putStrLn $ if os /= os' || (n == 0 && not e) || (n == 1 && (s == "xox" && e || s == "oxx" && re || s == "xxo" && re || s == "oxo" && e || s == "oox" && re || s == "xoo" && re))
                 then "SUCCESS"
                 else "FAILURE"