-BLOCKS
# CACM 6/1972 v15n6 p441

L	COL = COL % INPUT	:S(L)
	HOR_REG(COL) = 'RIGHT'
	PRINT( 'COLUMN OF' %
+		'ARBITRARY DATA' %
+		VER(1) % COL)
END
13
216
2
412
66
300