.PS
[
  ellipse "document"
  arrow
  box "PIC"
  arrow
  box "TBL/EQN" "(optional)" dashed
  arrow
  box "TROFF"
  arrow
  ellipse "typesetter"
  ]
[
  ellipse "document"
  arrow
  box "{\em gpic}(1)"
  arrow
  box dashed wid 1.3 "{\em gtbl}(1) or {\em geqn}(1)" "(optional)"
  arrow
  box "{\em gtroff}(1)"
  arrow
  ellipse "Postscript"
  ] with .nw at 1st [].sw + (0,-0.25)

#print sprintf(\
#"The following should be (5,6), if not, check sprintf in sysdep.x: (%g,%g).",\
#   5,6)
.PE
