X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=components%2Fcontent_pres%2FproceduralTypes.mli;h=dfd82df12ff1d2b0504a07e04309bea6fd0d91f3;hb=7008966fdd5b3811852f60b459572a347be932a0;hp=b06acd1049b1938e815ae4a37c37136fd4150dbb;hpb=ad45ff0a9bc4ddbfe0691ce1edbfa8784b37aa8e;p=helm.git

diff --git a/components/content_pres/proceduralTypes.mli b/components/content_pres/proceduralTypes.mli
index b06acd104..dfd82df12 100644
--- a/components/content_pres/proceduralTypes.mli
+++ b/components/content_pres/proceduralTypes.mli
@@ -31,6 +31,8 @@ val list_split: int -> 'a list -> 'a list * 'a list
 
 val mk_arel: int -> string -> Cic.annterm
 
+val is_atomic:Cic.annterm -> bool 
+
 (****************************************************************************)
 
 type name  = string