This change * moves `termination_by` and `decreasing_by` next to the function they apply to * simplify the syntax of `termination_by` * apply the `decreasing_by` goal to all goals at once, for better interactive use. See the section in `RELEASES.md` for more details and migration advise. This is a hard breaking change, requiring developers to touch every `termination_by` in their code base. We decided to still do it as a hard-breaking change, because supporting both old and new syntax at the same time would be non-trivial, and not save that much. Moreover, this requires changes to some metaprograms that developers might have written, and supporting both syntaxes at the same time would make _their_ migration harder.
9 lines
315 B
Text
9 lines
315 B
Text
inductive TreeNode :=
|
|
| mkLeaf (name : String) : TreeNode
|
|
| mkNode (name : String) (children : List TreeNode) : TreeNode
|
|
|
|
open TreeNode in def treeToList (t : TreeNode) : List String :=
|
|
match t with
|
|
| mkLeaf name => [name]
|
|
| mkNode name children => name :: List.join (children.map treeToList)
|
|
termination_by t
|