Question

我尝试了不同的符号，但无法使用我的前缀表示法（中缀，另一方面，有效）。我认为这是一个水平问题，但无法解决它。有什么想法吗？

Variable (X R: Type)(x:X)(r:R).
Variable In: X -> R -> Prop.
Variable rt:> R -> Type.
Variable rTr: forall (x:X)(y:R), In x y -> y.
Notation "' a b" := (rTr a b I) (at level 9).
(* Check ' x r. -- Syntax error: [constr:operconstr] expected after 
[constr:operconstr level 200] (in [constr:operconstr]). *)

Notation "a ' b" := (rTr a b I) (at level 9).
Fail Check x ' r. (* Works (half-compiles) *)
Print Grammar constr.
(* ...
| "9" LEFTA
  [ SELF; "'"; NEXT
  | "'"; constr:operconstr LEVEL "200"; NEXT
... *)

Answer 1

诀窍是指定a的级别至少与'的级别一样低。此外，两者都必须小于10：

Notation "' a b" := (rTr a b I) (at level 9, a at level 9).
Fail Check ' x r. (* Works (half-compiles) *)

此外，前缀表示法的abbreviation版本无法解决问题（唯一的烦恼是符号在缩写中被禁止）：

Notation T a b := (rTr a b I).
Fail Check T x r. (* Works (half-compiles) *)

Coq：定义前缀表示法

1 个答案: