X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fsoftware%2Fmatita%2Fnlibrary%2Fnat%2Fnat.ma;h=e9d32973bdb02a10caba88490cd84603209feee4;hb=c68f6ae61227544df47512b14e1a74d270dfbb6d;hp=0fc9e3a6b4cdec4e3d1d3f1113cd873ef2e9f389;hpb=a0c0e92cee3ed99995e12b02f18e30f018d946ea;p=helm.git

diff --git a/helm/software/matita/nlibrary/nat/nat.ma b/helm/software/matita/nlibrary/nat/nat.ma
index 0fc9e3a6b..e9d32973b 100644
--- a/helm/software/matita/nlibrary/nat/nat.ma
+++ b/helm/software/matita/nlibrary/nat/nat.ma
@@ -12,6 +12,7 @@
 (*                                                                        *)
 (**************************************************************************)
 
+include "hints_declaration.ma".
 include "logic/equality.ma".
 include "sets/setoids.ma".
 
@@ -23,4 +24,5 @@ ndefinition NAT: setoid.
  napply mk_setoid [ napply nat | napply EQ]
 nqed.
 
-unification hint 0 ((λx,y.True) (carr NAT) nat).
\ No newline at end of file
+alias symbol "hint_decl" = "hint_decl_Type1".
+unification hint 0 ≔ ⊢ carr NAT ≡ nat.