Coq:本地 ltac 定义

Coq: local ltac definition

是否有办法定义一个 "local" Ltac 表达式,我可以用它来证明引理但在外面不可见?

Lemma Foo ...
Proof.
   Ltac ll := ...
   destrict t.
   - reflexivity.
   - ll.
   - ll.
Qed.

(* ll should not be visible here *)

您可以使用一个部分:

Section Foo.
  Ltac solve := exact I.
  Lemma Foo : True.
  Proof.
    solve.
  Qed.
End Foo.