def prepend

stelliferous@0.0.2.0 · proofs/word_encoding.bend:154

import Base

154def prepend(-n: Nat, -m: Nat, b: Bool, parts: Split<n,m>) -> Split<1n+n,m>:
155  Parts{low,high} = parts
156  Parts{WCon{b,low},high}