V10/vol2/grap/prof1.g

.G1
ticks left off
cury = 0
barht = .7
copy "prof2.d" thru {
	line from 0, cury to $1, cury
	line from $1, cury to $1, cury-barht
	line from 0, cury-barht to $1, cury-barht
	"  $2" ljust at 0, cury-barht/2
	cury = cury-1
}
line from 0, 0 to 0, cury+1-barht
bars = -cury
frame invis ht bars/3 wid 3
.G2