'''	\"  pic file | troff -mm [-Tdevname] | ...
.PH "'PIC:  File(\n(.F)''Device(\*(.T)'"
.P
.DS CB
.PS
.ps -2
	circle "DISK"
	arrow "character" "defns"
CPU:	box "CPU" "(16-bit mini)"
	{ arrow <- from top of CPU up "input " rjust }
	arrow
CRT:	"   CRT" ljust
	line from CRT - 0,0.075 up 0.15 \
		then right 0.5 \
		then right 0.5 up 0.25 \
		then down 0.5+0.15 \
		then left 0.5 up 0.25 \
		then left 0.5
Paper:	CRT + 1.05,0.75
	arrow <- from Paper down 1.5
	" ...  paper" ljust at end of last arrow + 0, 0.25
	circle rad 0.05 at Paper + (-0.055, -0.25)
	circle rad 0.05 at Paper + (0.055, -0.25)
	"   rollers" ljust at Paper + (0.1, -0.25)
.ps +2
.PE
.DE
.ce
.ft 3
Basic Digital Typesetter
.ft 1
.sp
