X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;ds=sidebyside;f=helm%2Fsoftware%2Fcomponents%2Flibrary%2FcoercDb.ml;h=14ddf7c8631b5054aca10a8accc0268e9c12b05f;hb=4941c45d05f0708774f614a89c1dbaf3ec171c52;hp=fae09622950467c001f8271e4baf646f83feba11;hpb=6ac18bcd7ace15182db46a40191e6a9dc4b8851e;p=helm.git diff --git a/helm/software/components/library/coercDb.ml b/helm/software/components/library/coercDb.ml index fae096229..14ddf7c86 100644 --- a/helm/software/components/library/coercDb.ml +++ b/helm/software/components/library/coercDb.ml @@ -183,7 +183,6 @@ let add_coercion (src,tgt,u,saturations) = if List.exists (fun (x,_,_) -> UriManager.eq u x) l then let l' = List.map (fun (x,n,saturations') -> - assert (saturations=saturations'); if UriManager.eq u x then (x,n+1,saturations) else