let
p_jk_pdlgs s =
Str
.string_match reg_jkprivdlg s 0