.#,* # min # max ! r % count+# 100°% count ) push_spot . bol_skip_white $ eolp. ( pop_spotw/c + what_column°# min ( eol_trim + what_column°# max. # max $ WRAP= % countC/.ý! 0 # maxþ & random°! r¹% count ! r # min=.u/cý ! rþ + goto_column * skip_whiteý
" 32þ * ffind_char. 3 insert_single_space·# max # eol/c/f ( pop_spoty1 text_justify_line,* ! n+ ) push_spot 2 backward_paragraph ) what_line°! n 1 forward_paragraphý! 2þ % go_up ! n ) what_line:! 0?. ( pop_spotw/c ) push_mark 2 backward_paragraph
 ) what_line! 1B. ) go_down_1/c & narrow # bob. 1 text_justify_line/. & down_1/k % widen ( pop_spoty5 format_paragraph_hook