.PS

#scale = 1.4

boxwid = 1.25
boxht = 3
colheaderh = 0.4
rowheaderw = 1.0
ad = 0.1 # arrow distance

copy "marker.pic.inc"



define segment {
	[
		down
		A: box "" invis
		line dotted from A.ne to A.se
		#B: box invis "\fI" $1 "\fR" ht 0.5
		marker_bot(last box, $1)
	]
}


move up boxht/2-markerlen/2
right

segment("introduction")
segment("growth")
segment("mature")
segment("saturation")
segment("decline")


arrow from 1st [].A.sw to last [].A.se
"\fI" "time" above rjust "\fR" at last arrow.end + (-0.2,0.00)
arrow from 1st [].A.sw to 1st [].A.nw
"\fI" "sales," ljust  "market share," ljust  "importance," ljust  "etc." ljust "\fR" at last arrow.end + (0.05,-0.45)
#line dotted from 1st [].B.nw to 1st [].B.sw


spline from 1st [].A.sw right boxwid*0.7 up 0.1 \
	then right boxwid*0.8 up 1.0 \
	then right boxwid up 1.2 \
	then right boxwid up 0.5 \
	then right boxwid down 0.3 \
	then right boxwid/2 down 0.1


move to (0,0)

line left ad up ad*3 with .start at (0.38*boxwid, 0.1)
box "video" "messages" invis wid 0.6 ht 0.4

line left ad up ad*3 with .start at (0.77*boxwid, 0.3)
box "voice" "mail" invis same

line left ad up ad*3 with .start at (1.61*boxwid, 1.3)
box "Voice" "over IP" invis same

line right ad down ad*3 with .start at (2.31*boxwid, 2.0)
box "instant" "messaging" invis same

line right ad down ad*3 with .start at (3.23*boxwid, 2.6)
box "email" invis wid 0.6 ht 0.2

line right ad down ad*3 with .start at (4.31*boxwid, 2.5)
box "telefax" invis same




.PE