Skip to content
Snippets Groups Projects
Commit 7494849c authored by Loïc Correnson's avatar Loïc Correnson Committed by Patrick Baudin
Browse files

[qed] linting

parent a18585f8
No related branches found
No related tags found
No related merge requests found
...@@ -1327,7 +1327,7 @@ struct ...@@ -1327,7 +1327,7 @@ struct
and i_affine_ratio_leq c xs ys = and i_affine_ratio_leq c xs ys =
try match i_ratio xs , i_ratio ys with try match i_ratio xs , i_ratio ys with
| POS(a,k) , NONE -> | POS(a,k) , NONE ->
(* c + a/k <= ys <==> a/k <= -c+ys *) (* c + a/k <= ys <==> a/k <= -c+ys *)
i_ratio_max a k (Z.neg c,ys) i_ratio_max a k (Z.neg c,ys)
| NEG(a,k) , NONE -> | NEG(a,k) , NONE ->
(* c - a/k <= ys <==> c-ys <= a/k *) (* c - a/k <= ys <==> c-ys <= a/k *)
......
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