Module G


module G: sig  end
Global input facts.
Author(s): Harald Ruess Global facts are used as inputs for inference systems. See also module {!Infsys}.


type t
Set of input facts of type Fact.t. These are atoms together with a justification.

val empty : t
Empty set of inputs.
val is_empty : t -> bool
is_empty g holds iff g does not contain any inputs.
Parameters:
g : t
val copy : t -> t
Parameters:
g : t
val eq : t -> t -> bool
Identity test for input facts.
Parameters:
g1 : t
g2 : t
val pp : t Pretty.printer
Pretty-printing input facts.
Parameters:
fmt : Format.formatter
g : t
val replace : Fact.Equal.t -> t -> unit
replace e g with e of the form x = a replaces occurrences of a in g with x.
Parameters:
e : Fact.Equal.t
g : t
val get : t -> Fact.t
get g chooses a fact fct in g and returns this fact fct together with g where fct is removed. If g is empty, then get g raises Not_found.
Parameters:
g : t
val put : Fact.t -> t -> unit
put fct g adds fact fct to g.
Parameters:
fct : Fact.t
g : t
val get_clause : t -> Clause.t
get_clause g removes a clause cl in g or raise Not_found.
Parameters:
g : t
val put_clause : Clause.t -> t -> unit
put_clause g adds a clause cl to g.
Parameters:
cl : Clause.t
g : t