let p_jk_event s = Str.string_match reg_jkevent s 0