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 compare : t -> t -> int