.PS # `Emarrows.m4' cct_init hskip = 0.6 { A: em_arrows() box dotted wid A.wid ht A.ht at A.c thinlines_ arrow <- left 0.15 from A.Head; "\sl Head" wid 0.31 rjust arrow <- right 0.12 from A.Tail; "\sl Tail" ljust arrow <- left 0.15 from 0.6 between A.A1.end and A.A1.start; "\sl A1" rjust arrow <- right 0.15 up 0.07 from A.A2; "\sl A2" ljust thicklines_ move down 0.25 from A.s move up 0.2 from A.n "\tt em\_arrows()" at A.s+(0,-4bp__) below } { em_arrows(ND,45) with .sw at last [].se+(hskip*1.5,0) "\tt $\ldots$(ND,45)" at last [].s below } { em_arrows(I) with .sw at last [].se+(hskip,0) "\tt $\ldots$(I)" at last [].s below } { em_arrows(ID) with .sw at last [].se+(hskip,0) "\tt $\ldots$(ID)" at last [].s below } { em_arrows(E) with .sw at last [].se+(hskip,0) "\tt $\ldots$(E)" at last [].s below } { A: em_arrows(NT) with .sw at last [].se+(hskip,0) "\tt $\ldots$(NT)" at last [].s below } .PE