|
|
1.1 ! root 1: .PS 8.5i ! 2: .ps 20 ! 3: ## ! 4: ellipsewid = ellipsewid*3/2 ! 5: ellipseht = ellipseht*5/4 ! 6: linewid = linewid*3/2 ! 7: ## figure 10 ! 8: B1: ellipse "RO spec" ! 9: B2: box "ROSY" "compiler" \ ! 10: with .w at (B1.e.x+linewid, B1.e.y) ! 11: arrow from B1.e to B2.w ! 12: B2a: ellipse "stub" "defs/tables" "for operations" \ ! 13: with .s at (B2.n.x, B2.n.y+lineht) ! 14: arrow from B2.n to B2a.s ! 15: ## ! 16: B3: box "POSY" "compiler" \ ! 17: with .w at (B2.e.x+linewid, B2.e.y) ! 18: arrow from B2.e to B3.w ! 19: B3a: ellipse "structure defs" "for data types" \ ! 20: with .s at (B3.n.x, B3.n.y+lineht) ! 21: arrow from B3.n to B3a.s ! 22: ## ! 23: B4: box "PEPY" "compiler" \ ! 24: with .w at (B3.e.x+linewid, B3.e.y) ! 25: arrow from B3.e to B4.w ! 26: B4a: ellipse "conversion" "routines" "for data types" \ ! 27: with .s at (B4.n.x, B4.n.y+lineht) ! 28: arrow from B4.n to B4a.s ! 29: ## ! 30: box dashed with .nw at (B2a.w.x-linewid/2, B2a.n.y+lineht/2) \ ! 31: height ellipseht+boxht width B4a.e.x-B2a.w.x+boxwid ! 32: ## ! 33: .PE
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.