Remove superflous brackers.

0efe3294 · Robbert Krebbers · 79bf7df8 · 0efe3294
Commit 0efe3294 authored Feb 11, 2016 by Robbert Krebbers
--- a/heap_lang/tests.v
+++ b/heap_lang/tests.v
@@ -55,9 +55,9 @@ Module LiftingTests.
  Qed.

  Definition FindPred : val :=
-    λ: "x", (rec: "pred" "y" :=
+    λ: "x", rec: "pred" "y" :=
      let: "yp" := "y" + '1 in
-      if "yp" < "x" then "pred" "yp" else "y").
+      if "yp" < "x" then "pred" "yp" else "y".
  Definition Pred : val :=
    λ: "x", if "x" ≤ '0 then -FindPred (-"x" + '2) '0 else FindPred "x" '0.