eval"N,M,K,A=#{`tr ' ' ,`}[]" A[A.index~-N.times{K-=i=[_1,K].min;A.insert~i,_1}]+=M-A.sum p *A