X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fsoftware%2Fmatita%2Fcontribs%2FRELATIONAL%2FNPlus%2Fdefs.ma;h=34f4e3491eba32b2d3620690eda0ebf2e4a8d300;hb=9dfc8aced0bb2c643d2e04d582f5c288698b1d9e;hp=289093403b3bc1c1643fc7607167a26f9d21d0a4;hpb=883affb9b633393615ce3cb674834664c5b9c881;p=helm.git diff --git a/helm/software/matita/contribs/RELATIONAL/NPlus/defs.ma b/helm/software/matita/contribs/RELATIONAL/NPlus/defs.ma index 289093403..34f4e3491 100644 --- a/helm/software/matita/contribs/RELATIONAL/NPlus/defs.ma +++ b/helm/software/matita/contribs/RELATIONAL/NPlus/defs.ma @@ -12,11 +12,9 @@ (* *) (**************************************************************************) -set "baseuri" "cic:/matita/RELATIONAL/NPlus/defs". -include "logic/equality.ma". -include "Nat/defs.ma". +include "datatypes/Nat.ma". inductive NPlus (p:Nat): Nat \to Nat \to Prop \def | nplus_zero_2: NPlus p zero p @@ -26,6 +24,6 @@ inductive NPlus (p:Nat): Nat \to Nat \to Prop \def interpretation "natural plus predicate" 'rel_plus x y z = (cic:/matita/RELATIONAL/NPlus/defs/NPlus.ind#xpointer(1/1) x y z). -notation "hvbox(a break + b break == c)" +notation "hvbox(a break + b break == c)" non associative with precedence 95 for @{ 'rel_plus $a $b $c}.