如何临时禁用Eisbach方法的回溯以提升执行效率?
解决Isabelle/Eisbach方法链式调用卡顿的问题
嘿,这个问题我太熟了!之前在调试复杂的Eisbach方法时也踩过一模一样的坑😅
问题根源
你遇到的核心矛盾,其实是Isabelle两种方法组合模式的差异:
- 用逗号
,组合(比如my_method, fail)是回溯式组合:它会先让my_method生成所有可能的证明状态,然后对每一个状态都尝试后续的fail/no_tac,直到把所有状态都处理完才会终止——这就是为啥你的界面会卡顿,毕竟要遍历大量状态。 - 而分开两次
apply(apply my_method+apply fail)是顺序式执行:第一次apply生成状态后,第二次apply会直接在当前状态上执行,失败就立即终止,不会回头去尝试my_method的其他可能状态。
解决方案
要让链式调用的行为和分开apply一致,也就是强制失败时不回溯、直接终止,有几个简单的办法:
1. 改用分号;进行方法组合
这是最直接的方案,把原来的逗号换成分号,就能强制方法按顺序执行,不回溯前面的状态:
apply (my_method; fail)
这个写法的行为和你分开两次apply完全一致:先执行my_method,然后对生成的状态执行fail,一旦失败就直接终止,不会去遍历my_method的其他可能状态。
2. 自定义不回溯的链式方法(进阶)
如果需要经常用这种模式,可以用Eisbach定义一个自定义方法,明确禁止回溯:
method_setup no_backtrack = \<open>Method.text_closure >> (fn m => fn ctxt => SIMPLE_METHOD (Method.evaluate m ctxt THEN Method.fail))\<close> "Run a method without backtracking, fail immediately on error"
定义完成后,你就可以这样用:
apply (no_backtrack my_method)
这个方法会执行my_method,然后直接失败(和你加fail的效果一样),而且全程不会回溯my_method的任何替代状态。
3. 用once限制方法只生成第一个状态
如果你的my_method会生成多个状态,但你只关心第一个可能性,可以用once修饰它,这样它只会生成第一个可能的状态,后续的fail也只会处理这一个,不会遍历其他:
apply (once my_method; fail)
这个适合你不需要所有状态,只需要快速尝试第一个可能性的场景。
额外提示
- 要牢记
;和,的核心差异:;是“先做A,再对A的结果做B,绝不回头”,,是“尝试A的所有可能,每个都做B”。 - 如果你的场景是希望
my_method执行后不管结果如何都直接终止(哪怕成功),把fail换成no_tac效果是一样的,因为no_tac也是无条件失败。
内容的提问来源于stack exchange,提问作者JAB
相关产品推荐
相关产品推荐

