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__)
{ "{\tt `ground'}" wid 32bp__ at (Ground,B)
"{\tt `ground'(,T)}" at (GT,B)+(0,11bp__)
"{\tt (,{,}F)}" at (GF,B)
"{\tt (,{,}E)}" at (GE,D)}
GS: ground(,dimen_/2,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__)
"{\tt (,dimen\_/2,S)}" at (GS,C)
"{\tt (,{,}S,90)}" at (GS90,E)
"{\tt (,{,}Q)}" at (GQ,C)
"{\tt (,{,}L)}" at (GL,E)
"{\tt (,{,}P)}" at (GP,C)
"{\tt (,T,PA)}" at (GPA,E)
