(defun main (&rest argv)
  (declare (ignorable argv))
  (let* ((n (read-line))
         (p "404")
         (s (read-line)))
    (declare (ignore n))
    (princ (if (search p s)
               "NotFound"
               "Found"))
    (terpri)))
(main)