1.PS 2scale=100 3define m0 | 4[ 5$2: box "\f(CWBuffer\fP" $1 ht 40 wid 88 with .nw at 0,40 6box "\f(CWString\fP" "(cache)" ht 40 wid 72 with .nw at 104,40 7line left 16 from last box.w 8] | 9 10define m1 | 11[ 12box "\f(CWDisc\fP" ht 40 wid 88 with .sw at 0,56 13box "temp. file" ht 40 wid 88 with .sw at 0,0 14line up 16 from last box.n 15] | 16 17D1: m1 with .nw at 184,576 18D2: m1 with .nw at 0,576 19Mtranscript: m0("(transcript)", Buffer) with .nw at 0,640 20Mcontents: m0("(contents)", Contents) with .nw at 184,640 21F: box "\f(CWFile\fP" ht 40 wid 112 with .nw at 75,704 22 23line from D2.n to Mtranscript.Buffer.s 24line from D1.n to Mcontents.Contents.s 25line up 12 from Mtranscript.Buffer.n then right 50 then up 12 26line up 12 from Mcontents.Contents.n then left 60 then up 12 27.PE 28