let aori s =
　　match s with
　　"ﾌﾟ" | "ｹﾞﾗ" | "嘲笑激藁" -> true
　　| _ -> false

let aori_check s =
　　if aori s then print_endline "ﾂﾚﾀ!"

let _ =
　　aori_check "ﾌﾟ"