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 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65
|
.PS
# `bi_trans.m4'
sinclude(Circuit_macros.dim)
s_init(bitrans)
ifdef(`bitrans_1',,`sinclude(tst.dim)')
cct_init
[[
Q: bi_trans(,,BCuEBUS)
s_box($C$) at Q.C below
s_box($B$) at Q.B above
s_box($E$) at Q.E below
thinlines_
M4_xyO: Q.M4_xyO
spline <- from tr_xy(0,5.25) left 0.1 then up 0.15 left 0.15
s_box(\tt B) above
spline <- from 0.5<tr_xy(3,0),tr_xy(1.2,4)> right 0.1 then right 0.15 up 0.15
s_box(\tt C) ljust
spline <- from 0.7<tr_xy(-2,4),tr_xy(2,4)> up 0.1 then right 0.15 up 0.15
s_box(\tt BU) above
spline <- from 0.7<tr_xy(-3,0),tr_xy(-1.2,4)> left 0.1 then left 0.15 up 0.15
s_box(\tt uE) rjust
arrow <- from Q.Bulk.start+vec_(vscal_(m4_U,0,0.5)) up 0.15 left 0.15
s_box(\tt S) above rjust
arrow <- from Q.Bulk.end up 0.1 right 0.1
s_box($\;\;$\tt S) above
]
s_box(\tt bi\_trans(,{,}BCuEBUS)) at last [].s below
]
[[
Q2: bi_trans(,,BCdE2BU)
s_box($C$) at Q2.C below
s_box($B$) at Q2.B above
thinlines_
M4_xyO: Q2.M4_xyO
arrow <- from Q2.E0 down 0.1 right 0.1; s_box($\;\;E0$) below
arrow <- from Q2.E2 down 0.1 left 0.1; s_box($E2\;\;$) below
arrow <- from Q2.E1 down 0.1 ; s_box($E1$) below
spline <- from 0.4<Q2.Em2.start,Q2.Em2.end> left 0.1 then up 0.15 left 0.15
s_box($Em2\;\;$) above
]
s_box(\tt bi\_trans(,{,}BCdE2BU)) at last [].s below
] with .nw at last [].ne+(0.5,0)
[[
Q2: bi_trans(,,BC2dEBU)
s_box($E$) at Q2.E below
s_box($B$) at Q2.B above
thinlines_
M4_xyO: Q2.M4_xyO
arrow <- from Q2.C0 down 0.1 left 0.1; s_box($C0\;\;$) below
arrow <- from Q2.C2 down 0.1 right 0.1; s_box($\;\;C2$) below
arrow <- from Q2.C1 down 0.1 ; s_box($C1$) below
spline <- from 0.4<Q2.Cm2.start,Q2.Cm2.end> right 0.1 then up 0.15 right 0.15
s_box($Cm2\;\;$) above
]
s_box(\tt bi\_trans(,{,}BC2dEBU)) at last [].s below
] with .nw at last [].ne+(0.5,0)
.PE
|