a=" "*$$
gsub("."){a[i=$.*?z+$`.size*4],a[i-61,5],a[i-?y,3]="|___|","|   |","___"}while gets
puts a.unpack"A61"*61