(* transforms list of gml formulas (diamond?,number,formula)
to list of consequences (positive?,formula),
here positive? means that the formula must be true in order to make the
given conjunct of modalities true *)
external gml_rules : (bool*int*int) list -> (int*bool) list list list = "gmlRules_stub"
external pml_rules : (bool*int*int*int) list -> (int*bool) list list list = "pmlRules_stub"