Method code for $list.vcolumnize3()

[Turn on line numbering]

---

arg list, lines, @rest;
var linelength, cols, width, i, j, line, outlist;

[(linelength ?= (| sender().linelen() |) || 78)] = rest;
cols = list.length() / lines + (list.length() % lines ? 1 : 0);
width = linelength / cols;
outlist = [];
for i in [1 .. lines] {
    line = "";
    for j in [0 .. cols]
        (| (line = line + list[i + j * lines].pad(width)) |);
    outlist += [line];
}
return outlist;

---

["// Created 26-Mar-1995 as a part of ColdCore, see: @help Credit"]