Skip to content
Snippets Groups Projects
Commit 8e5241da authored by Ralf Jung's avatar Ralf Jung
Browse files

add lemams for validity of the 1 fraction

parent 4e25dc9b
No related branches found
No related tags found
No related merge requests found
...@@ -160,6 +160,8 @@ Section dfrac. ...@@ -160,6 +160,8 @@ Section dfrac.
Lemma dfrac_valid_own p : DfracOwn p (p 1)%Qp. Lemma dfrac_valid_own p : DfracOwn p (p 1)%Qp.
Proof. done. Qed. Proof. done. Qed.
Lemma dfrac_valid_own_1 : DfracOwn 1.
Proof. done. Qed.
Lemma dfrac_valid_own_r dq q : (dq DfracOwn q) (q < 1)%Qp. Lemma dfrac_valid_own_r dq q : (dq DfracOwn q) (q < 1)%Qp.
Proof. Proof.
......
...@@ -21,6 +21,8 @@ Section frac. ...@@ -21,6 +21,8 @@ Section frac.
Lemma frac_valid p : p (p 1)%Qp. Lemma frac_valid p : p (p 1)%Qp.
Proof. done. Qed. Proof. done. Qed.
Lemma frac_valid_1 : 1%Qp.
Proof. done. Qed.
Lemma frac_op p q : p q = (p + q)%Qp. Lemma frac_op p q : p q = (p + q)%Qp.
Proof. done. Qed. Proof. done. Qed.
Lemma frac_included p q : p q (p < q)%Qp. Lemma frac_included p q : p q (p < q)%Qp.
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment