"-"
81
times #(list)
{
    show-line
    @0
    3
    step
    54
    ljust
    @0
    catenate #(list+list)
}
4
times #(eval)