Dischargetype 'opaque result = {| cook_body : (Constr.constr, 'opaque) Declarations.constant_def; | 
| cook_type : Constr.types; | 
| cook_universes : Declarations.universes; | 
| cook_relevance : Sorts.relevance; | 
| cook_inline : inline; | 
| cook_context : Names.Id.Set.t option; | 
| cook_univ_hyps : Univ.Instance.t; | 
| cook_flags : Declarations.typing_flags; | 
}val cook_opaque_proofterm : Cooking.cooking_info list -> Opaqueproof.opaque_proofterm -> Opaqueproof.opaque_prooftermval cook_constant : Environ.env -> Cooking.cooking_info -> Declarations.constant_body -> Declarations.constant_bodyval cook_inductive : Cooking.cooking_info -> Declarations.mutual_inductive_body -> Declarations.mutual_inductive_bodyval cook_rel_context : Cooking.cooking_info -> Constr.rel_context -> Constr.rel_context