Skip to content

Commit 17e2c23

Browse files
authored
Merge pull request #55 from rmatthes/tametheiterationsymbol
a try to overcome the compilation problem
2 parents 752abd3 + 0eacec7 commit 17e2c23

File tree

1 file changed

+3
-3
lines changed

1 file changed

+3
-3
lines changed

2017-12-Birmingham/Part2_Fundamentals_Coq/fundamentals_lecture.v

Lines changed: 3 additions & 3 deletions
Original file line numberDiff line numberDiff line change
@@ -293,10 +293,10 @@ In fact one can write:
293293
Definition iter (A : UU) (a : A) (f : A → A) : nat → A :=
294294
nat_rec A a (λ _ y, f y).
295295

296-
(** A more fancy notation where the ̂ symbol is the unicode one (written \^ ) *)
296+
(** A fancier notation where the ̂ symbol is the unicode one (written \^ ) *)
297297
Notation "f ̂ n" := (λ x, iter _ x f n) (at level 10).
298298

299-
Eval compute in pred̂2 5.
299+
Eval compute in pred ̂ 2 5.
300300

301301
(** Exercise: define a notation "myif b then x else y" for "ifbool _ x y b"
302302
and rewrite negbool and andbool using this notation.
@@ -306,7 +306,7 @@ this is already used.
306306
307307
*)
308308

309-
Definition sub (m n : nat) : nat := pred̂n m.
309+
Definition sub (m n : nat) : nat := pred ̂ n m.
310310

311311
Eval compute in sub 15 4.
312312
Eval compute in sub 11 15.

0 commit comments

Comments
 (0)