while gets
z=$_
a=$_.scan(/^((d )*)/)
if $&
(a[0][0].size/2+1).times{puts $'}
else
puts z
end
end