feat: improve generateElements a bit
This commit is contained in:
parent
52403fca83
commit
093ab49b7f
1 changed files with 2 additions and 1 deletions
|
|
@ -111,6 +111,7 @@ where
|
|||
generateElements (numArgs : Array Nat) (argCombination : Array Nat) : TermElabM (Array TerminationByElement) := do
|
||||
let mut result := #[]
|
||||
let var ← `(x)
|
||||
let body ← `(sizeOf x)
|
||||
let hole ← `(_)
|
||||
for preDef in preDefs, numArg in numArgs, argIdx in argCombination do
|
||||
let mut vars := #[var]
|
||||
|
|
@ -120,7 +121,7 @@ where
|
|||
ref := preDef.ref
|
||||
declName := preDef.declName
|
||||
vars := vars
|
||||
body := var
|
||||
body := body
|
||||
implicit := false
|
||||
}
|
||||
return result
|
||||
|
|
|
|||
Loading…
Add table
Reference in a new issue