.PS
cct_init

# Usual defs...
qrt=dimen_/4;
hlf=dimen_/2;
dim=dimen_;


Q1:bi_tr(up_,,,); 
Q2:bi_tr(up_,R,,) with .B at Here+(1.5*dim,0)
line from Q1.E to Q2.E
dot(at last line.center)
source(down_,I); llabel(,I_\mathrm{Bias},)
arrow down_ 0.2*dim
right_; "$V_\mathrm{EE}$" below_
resistor(from Q1.C up_ 1.3*dim); llabel(,R,); b_current(I_{C_1},,Out)
line to (Q2.C,Here)
{arrow from last line.center up_ 0.5*dim
  right_;"$V_\mathrm{CC}$" above_}
resistor(down_ 1.3*dim); llabel(,R,); b_current(I_{C_2},,Out,End)
dot(at Q1.C); line left_ 0.75*dim; "$V_\mathrm{C_1}$" ljust_
dot(at Q2.C); line right_ 0.75*dim; "$V_\mathrm{C_2}$" ljust_
right_; "$V_\mathrm{B_1}$" at Q1.B rjust_
"$V_\mathrm{B_2}$" at Q2.B ljust_

"\tiny Differential" at (2.5*dim,-1.5*dim)
.PE