100
range1
m:
    4
    primes #(4: factor)
    1
    catenate #(list+elem)
    max
    show-line