a = vector(141)
n = 0
emit(v) = {
	print (n++ " " v);
	if (n<=#a,
		a[n] = v;
	);
}

{
	emit(s=1);
	for (r=1, #a,
		forstep (v=s+a[r], s+1, -1,
			emit(v);
		);
		s+=a[r];
	);
}

quit