.PS cct_init # Usual defs... qrt=dimen_/4; hlf=dimen_/2; dim=dimen_; source(up_,AC); capacitor(right_); dot; diode(down_); dot; ground move left_ dim line right_ 2.5*dim; dot move left_ hlf; dot capacitor(up_); dot {line right_ hlf; dot; " $V_\mathrm{out}$ (DC)" ljust_} diode(left_) "\tiny Doubler" at (2*dim,-0.5*dim) .PE