X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=components%2Fcic%2FcicUtil.mli;h=9b1fecf0c25de2218a593884d8f92d9fbd4f17b5;hb=1f1e441c320c1ed94e648f5e126cf2298a1eda00;hp=b8d71f51f96da76779f64a2efc25ba58e1565750;hpb=6a1196490a40ebab9cdbba3649559c6fd1478187;p=helm.git diff --git a/components/cic/cicUtil.mli b/components/cic/cicUtil.mli index b8d71f51f..9b1fecf0c 100644 --- a/components/cic/cicUtil.mli +++ b/components/cic/cicUtil.mli @@ -53,6 +53,9 @@ val id_of_annterm: Cic.annterm -> Cic.id val params_of_obj: Cic.obj -> UriManager.uri list val attributes_of_obj: Cic.obj -> Cic.attribute list +val projections_of_record: Cic.obj -> UriManager.uri -> UriManager.uri list +val arity_of_composed_coercion: Cic.obj -> int +val is_generated: Cic.obj -> bool (** mk_rels [howmany] [from] * creates a list of [howmany] rels starting from [from] in decreasing order *)