procedure main()
   write( if match("abc", "abcxyz123") then "yes" else "no")   # yes
   write( if match("xyz", "abcxyz123") then "yes" else "no")   # no
end