perf: always zeta reduce let expressions in cbv (#12397)
This PR adds zeta reduction simproc to the pre step of `cbv`.
This commit is contained in:
parent
57c5efe309
commit
af2444a140
1 changed files with 1 additions and 1 deletions
|
|
@ -145,7 +145,7 @@ def cbvPre : Simproc :=
|
|||
isBuiltinValue <|> isProofTerm <|> skipBinders
|
||||
>> isOpaqueApp
|
||||
>> simpControlCbv
|
||||
<|> ((isOpaqueConst >> handleConst) <|> simplifyAppFn <|> handleProj)
|
||||
<|> ((isOpaqueConst >> handleConst) <|> simplifyAppFn <|> handleProj) <|> zetaReduce
|
||||
|
||||
def cbvPost : Simproc :=
|
||||
evalGround
|
||||
|
|
|
|||
Loading…
Add table
Reference in a new issue