X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fsoftware%2Fmatita%2Fnlibrary%2Fnat%2Fminus.ma;h=86a4b1df22866d3bfbd169de719e8889d4a79b13;hb=1439ced76cb62f9c5f5e638c53a005c3843870ae;hp=f800cc0587c06799bb05848c216b56d6ae003b76;hpb=c6d3537eee27d05490a9555cc7326bc954b356c5;p=helm.git diff --git a/helm/software/matita/nlibrary/nat/minus.ma b/helm/software/matita/nlibrary/nat/minus.ma index f800cc058..86a4b1df2 100644 --- a/helm/software/matita/nlibrary/nat/minus.ma +++ b/helm/software/matita/nlibrary/nat/minus.ma @@ -22,5 +22,7 @@ nlet rec minus (n:nat) (m:nat) on m : nat ≝ [ O ⇒ O | S n' ⇒ minus n' m']]. +interpretation "natural minus" 'minus x y = (minus x y). + naxiom le_minus: ∀n,m,p. le n m → le (minus n p) m. -naxiom lt_minus: ∀n,m,p. lt n m → lt (minus n p) m. \ No newline at end of file +naxiom lt_minus: ∀n,m,p. lt n m → lt (minus n p) m.