"-"
clean-split
init
m:
    f( " \\* " )
    length
    half
    show-line