.PS
cct_init
log_init

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

dot;switch(right_); switch(right_);dot

move right_ 1.5*dim 
G1:AND_gate with .center at Here
line from G1.In1 left_ 2*L_unit
"A " ljust_
line from G1.In2 left_ 2*L_unit
"B " ljust_
line from G1.Out right_ 2*L_unit
" Q" ljust_

"\tiny ANDGate" at (4*dim, -hlf) ljust_ 
.PE