def fm0a
import bendtorch@1.3.0.0/PROOF.bend as PROOFimport Base
import bendtorch@1.3.0.0/main.bend as T
498def fm0a(-l: List<&1, T.FS>, r: List<&1, T.FS>, -n: Nat, +h: Nat, +dm: T.Dm, a: L1RF<h, dm, l, Nil{}>) -> MRF<0n, T.Halves{l, r}, n, h, dm>:
499 match a:
500 case L1RF{l1y, sl, fl}:
501 fm0b(l, r, n, h, dm, l1y, sl, fl, lf1(r, h, dm, Nil{}))