848 words_in_line == 0)
THEN 849 columns_in_line = columns_in_line + ncols_next_word
851 IF (columns_in_line <= this%ncols)
THEN 852 IF (words_in_line > 0)
THEN 853 this%paragraph(columns_in_line-ncols_next_word+1:columns_in_line,nlines+1) = &
854 transfer(
' '//line(this%word_start(nw):this%word_end(nw)), this%paragraph)
856 this%paragraph(columns_in_line-ncols_next_word+1:columns_in_line,nlines+1) = &
857 transfer(line(this%word_start(nw):this%word_end(nw)), this%paragraph)
860 this%paragraph(1:this%ncols,nlines+1) = &
861 transfer(line(this%word_start(nw):this%word_start(nw)+this%ncols-1), this%paragraph)