X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;ds=sidebyside;f=helm%2Fsoftware%2Fcomponents%2Facic_procedural%2FproceduralHelpers.mli;h=97b637d70b126cc21f0c1b80ec28e5faefcf6bbd;hb=798e85cb6d55d80d988f91e6289e4041e95ad2e4;hp=881f7e26635c192968d862c64f721ac0b3890e26;hpb=cf4301b669442bdd78984d3a3a1e38660db1f2ea;p=helm.git

diff --git a/helm/software/components/acic_procedural/proceduralHelpers.mli b/helm/software/components/acic_procedural/proceduralHelpers.mli
index 881f7e266..97b637d70 100644
--- a/helm/software/components/acic_procedural/proceduralHelpers.mli
+++ b/helm/software/components/acic_procedural/proceduralHelpers.mli
@@ -43,6 +43,8 @@ val is_unsafe:
    int -> Cic.context * Cic.term -> bool
 val is_not_atomic:
    Cic.term -> bool
+val is_atomic:
+   Cic.term -> bool
 val get_ind_type:
    UriManager.uri -> int -> int * Cic.inductiveType
 val get_default_eliminator: