.PS
cct_init

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

Op1:opamp(right_,,,,P)
line right_ hlf
" $v_o$" ljust_
line from Op1.In1 left_ qrt
capacitor(left_); rlabel(,C,)

move down_ dim 
ground(,T)
source(up_,AC); llabel(,v_i,)
line from Op1.In2 left_ hlf then down hlf
ground(,T)

move to Op1.In1 then left_ qrt
dot; line up_ hlf then right_ qrt
resistor(right_); llabel(,R,)
line right_ qrt 
line to (Here, Op1.Out);dot

"\tiny Differentiator" at (1.5*dim, -1*dim) rjust_ 
.PE