let
p_jk_event s =
Str
.string_match reg_jkevent s 0