origin = ( 2,4 )
		boxht = boxht/2;  minax = minax/2
		arrowlen = arrowlen/2
		majax = 1.25_*majax
	doc:	ellipse 'document'
		arrow -_>
		box  'REFER'
	
		spline -_> _\
		    downright 0.75_*boxht _\
		       to doc.south + ( 0,-boxht ) _\
		         to doc.south + ( 0.75_*boxwid, -(boxht_*1.25) )
	
		right
	tbl:	box 'TBL' 
		arrow -_> 
		box  'EQN'
	
		spline -_> _\
		    downright 0.75_*boxht _\
		       to tbl.south + ( -boxwid_*0.25, -(1.1_*boxht) ) _\
		         to tbl.south + ( 0.75_*boxwid, -(boxht_*1.35) )
	
		right
		box 'TROFF'
		arrow -_>
		ellipse 'typesetter'