k=1000 a=4*k
:w5=:gd*((:l2+:l3+:l5+:l6)<a) :w6=:gd*((:l1+:l2+:l4+:l5)<a) goto2