read n
dc -e "
	[li1!=y]sl [li1-lxx]sd [sillx]sx
	[10*3+ldx]sy ${n}dZ1-r dZ1r lxx
	[c_1]sy !=y n10P
"