mirror of
https://github.com/achlipala/frap.git
synced 2024-12-01 00:26:18 +00:00
minus notation should be for subtraction, not set minus
This commit is contained in:
parent
b7fd72f309
commit
fa4d8ca8db
2 changed files with 4 additions and 2 deletions
|
@ -6,6 +6,8 @@
|
||||||
Require Import Frap.
|
Require Import Frap.
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
(** * Syntax and semantics of a simple imperative language *)
|
(** * Syntax and semantics of a simple imperative language *)
|
||||||
|
|
||||||
(* Here's some appropriate syntax for expressions (side-effect-free) of a simple
|
(* Here's some appropriate syntax for expressions (side-effect-free) of a simple
|
||||||
|
@ -188,7 +190,7 @@ Notation "'assert' {{ I }}" := (Assert I) (at level 75).
|
||||||
Delimit Scope cmd_scope with cmd.
|
Delimit Scope cmd_scope with cmd.
|
||||||
|
|
||||||
Infix "+" := plus : reset_scope.
|
Infix "+" := plus : reset_scope.
|
||||||
Infix "-" := minus : reset_scope.
|
Infix "-" := Init.Nat.sub : reset_scope.
|
||||||
Infix "*" := mult : reset_scope.
|
Infix "*" := mult : reset_scope.
|
||||||
Infix "=" := eq : reset_scope.
|
Infix "=" := eq : reset_scope.
|
||||||
Infix "<" := lt : reset_scope.
|
Infix "<" := lt : reset_scope.
|
||||||
|
|
|
@ -164,7 +164,7 @@ Notation "'assert' {{ I }}" := (Assert I) (at level 75).
|
||||||
Delimit Scope cmd_scope with cmd.
|
Delimit Scope cmd_scope with cmd.
|
||||||
|
|
||||||
Infix "+" := plus : reset_scope.
|
Infix "+" := plus : reset_scope.
|
||||||
Infix "-" := minus : reset_scope.
|
Infix "-" := Init.Nat.sub : reset_scope.
|
||||||
Infix "*" := mult : reset_scope.
|
Infix "*" := mult : reset_scope.
|
||||||
Infix "=" := eq : reset_scope.
|
Infix "=" := eq : reset_scope.
|
||||||
Infix "<" := lt : reset_scope.
|
Infix "<" := lt : reset_scope.
|
||||||
|
|
Loading…
Reference in a new issue