.PS # `GroundsDPV.m4' cct_init(svg_font(sans-serif,11bp__)) sep = 0.65 Ground: ground move right sep GT: ground(,T) move right sep GF: ground(,,F) sep = 0.55 move right sep GE: ground(,,E) move right sep B: Here+(0,-0.5) D: B+(0,11bp__) { "`ground'" wid 36bp__ at (Ground,B) "`ground'(,T)" at (GT,B)+(0,11bp__) "(,,F)" at (GF,B) "(,,E)" at (GE,D)} GS: ground(,,S) move right sep GS90: [ground(,,S,90) ] with .n at Here move right sep from GS90.n GQ: ground(,,Q) move right sep GL: ground(,,L) move right sep GP: ground(,,P) move right sep GPA: ground(,T,PA) C: Here+(0,-0.5) E: C+(0,11bp__) "(,,S)" at (GS,C) "(,,S,90)" at (GS90,E) "(,,Q)" at (GQ,C) "(,,L)" at (GL,E) "(,,P)" at (GP,C) "(,T,PA)" wid 32bp__ at (GPA,E) command "" # end font .PE