JSON.lex_balance: def of qasim-bend-kit@0.1.0.2
Import: import qasim-bend-kit@0.1.0.2/libs/JSON.bend as JSON
Lines 1092-1099 of qasim-bend-kit@0.1.0.2/libs/JSON.bend: https://jend.leeeet.dev/read.txt?path=qasim-bend-kit@0.1.0.2/libs/JSON.bend&start_line=1092&end_line=1099

import Base

def lex_balance(fuel: Nat, trees: List<&2, LexTree>) -> LexTree:
    match fuel:
        case 0n: lex_join(trees)
        case 1n+p:
            match trees:
                case Nil{}: LexEmpty{}
                case h <> Nil{}: h
                case a <> b <> t: lex_balance(p, lex_pairs(a <> b <> t))

Uses (5):
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=List
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Nat
  https://jend.leeeet.dev/definition.txt?path=qasim-bend-kit@0.1.0.2/libs/JSON.bend&name=LexTree
  https://jend.leeeet.dev/definition.txt?path=qasim-bend-kit@0.1.0.2/libs/JSON.bend&name=lex_join
  https://jend.leeeet.dev/definition.txt?path=qasim-bend-kit@0.1.0.2/libs/JSON.bend&name=lex_pairs