Module Com.Error

type typ =
| Anomaly
| Discordance
| Information
val compare_typ : typ -> typ -> int
type t = {
name : string Pos.marked;

The position is the variable declaration

famille : string Pos.marked;
code_bo : string Pos.marked;
sous_code : string Pos.marked;
libelle : string Pos.marked;
is_isf : string Pos.marked;
typ : typ;
}
val pp_descr : Pp.t -> t -> unit
val pp : Pp.t -> t -> unit
val compare : t -> t -> int
module Set : SetExt.T with type T.elt = t
module Map : sig ... end