X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fsoftware%2Fcomponents%2Fcic%2FcicUtil.mli;h=422bb130b47a0f83b22659f49318c8e6e187c091;hb=d5c1f34cd226898525168e470d3e2ec273699826;hp=b8d71f51f96da76779f64a2efc25ba58e1565750;hpb=8d07bbad4976d7dc1b99918cc3513fe40cd1ee9f;p=helm.git diff --git a/helm/software/components/cic/cicUtil.mli b/helm/software/components/cic/cicUtil.mli index b8d71f51f..422bb130b 100644 --- a/helm/software/components/cic/cicUtil.mli +++ b/helm/software/components/cic/cicUtil.mli @@ -53,6 +53,7 @@ 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 arity_of_composed_coercion: Cic.obj -> int (** mk_rels [howmany] [from] * creates a list of [howmany] rels starting from [from] in decreasing order *)