1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
|
.PS
# `ujt.m4'
cct_init
dwn = 1.0
dsep = 0.15
define(`demo_ujt',`Q: ujt(`$1',`$2',`$3',`$4')
"\sl B1" ifelse(`$5',,below,ljust) at last [].B1
"{\sl E}sp_" at 1.5 between last [].Bulk.c and last [].E
"\sl B2" ifelse(`$5',,above,ljust) at last [].B2
')
[demo_ujt(up_ dimen_,,,E,A)
`"{\tt ujt(up\_ dimen\_,{,},E)}"' wid 1.45 ht 0.1 at Q.s+(0,-0.15) ]
[demo_ujt(,,P,)
`"{\tt ujt(,{,}P,)}"' at Q.s+(0.1,-dsep) below ] \
with .Q.w at last [].Q.e+(0.85,0)
[demo_ujt(,R,,)
`"{\tt ujt(,R,{,})}"' at Q.s+(0,-dsep) below] \
with .Q.w at last [].Q.e+(0.8,0)
[demo_ujt(,R,P,)
`"{\tt ujt(,R,P,)}"' at Q.s+(0,-dsep) below] \
with .Q.w at last [].Q.e+(0.8,0)
.PE
|
