\ / version 2 or (at your option) any later version.
\ / This software is distributed as is, NO WARRANTY.
V_______________________________________________________________ *)
-
+(*
type csys = {
buri: Entity.uri;
mutable tp : int list;
val add_zero: csys -> Entity.attrs -> unit
val add_equal: csys -> Entity.attrs -> Entity.attrs -> unit
+*)