1 .PS

2

3 boxwid = 2

4 boxht = 1

5 colheaderh = 0.4

6 rowheaderw = 1.0

7

8

9

10 define header {

11 [

12 right

13 box invis "" ht colheaderh wid rowheaderw

14 box dotted "\fI" $1 "\fR" ht colheaderh

15 box dotted "\fI" $2 "\fR" ht colheaderh

16 ]

17 }

18 define row {

19 [

20 right

21 box dotted "\fI" $1 "\fR" wid rowheaderw

22 box $2

23 box $3

24 ]

25 }

26 down

27

28

29 header("written", "recorded")

30 row("asynchronous" "(messages)", "email" "SMS", "voice mail" "video messages")

31 row("synchronous" "(dialog)", "IM" "chat", "VoIP" "video conferencing")

32

33

34

35

36

37 .PE