diff --git a/_CoqProject b/_CoqProject
index 6e7e43577c09648ade870d5a63c72b9ece87bfca..dc2c81e2524d146fba8bab6be6186c9254b25837 100644
--- a/_CoqProject
+++ b/_CoqProject
@@ -1,4 +1,6 @@
 -Q theories stdpp
+# "Declare Scope" does not exist yet in 8.9
+-arg -w -arg -undeclared-scope
 theories/base.v
 theories/tactics.v
 theories/option.v
diff --git a/theories/numbers.v b/theories/numbers.v
index 1ef1721ddd46155855e4609993f6b68930fdf329..2455887c1c02e0402ea44116333025b7560829a3 100644
--- a/theories/numbers.v
+++ b/theories/numbers.v
@@ -399,7 +399,7 @@ Next Obligation. intros x y; apply Qclt_not_le. Qed.
 Next Obligation. done. Qed.
 Program Instance Qc_lt_dec: RelDecision Qclt := λ x y,
   if Qclt_le_dec x y then left _ else right _.
-Solve Obligations with done.
+Next Obligation. done. Qed.
 Next Obligation. intros x y; apply Qcle_not_lt. Qed.
 
 Instance: PartialOrder (≤).