type obj_kind =
| Constant of relevance * string * term option * term * c_attr
| Fixpoint of bool * inductiveFun list * f_attr
+ (* true -> fix, funcs, arrts *)
| Inductive of bool * int * inductiveType list * i_attr
- (* (co)inductive, leftno, types *)
+ (* true -> inductive, leftno, types *)
(* the int must be 0 if the object has no body *)
type obj = NUri.uri * int * metasenv * substitution * obj_kind