.PS cct_init # Usual defs... qrt=dimen_/4; hlf=dimen_/2; dim=dimen_; gap(up_ 2*dim); clabel(-,230V\ AC,+) line right_; {move down_ dim/10 then left_ dim/10;dot} inductor(down_ 2*dim,W,12,M);line left_ move right_ 1.425*dim {line right_ 2*dim then up_ hlf; dot} Sec:inductor(up_ 2*dim,W,12,); rlabel(,\qquad v_s,); {move down_ dim/10 then right_ dim/10;dot} line right_ 2*dim then down_ hlf; Top:dot move right_ hlf then down_ hlf; Right: Here move left_ dim Left: Here move right hlf then down hlf Bottom: Here diode(from Top to Right) ; rlabel(,\qquad D_1,); dot; diode(from Left to Top); rlabel(,D_4\qquad ,) diode(from Left to Bottom); llabel(,D_2\qquad,) diode(from Bottom to Right); llabel(,\qquad D_3) move to Left dot; line left_ qrt then down_ 3*qrt line to (Right, Here) then right_ qrt then down_ qrt line right_; Out:gap(up_ 2*dim); rlabel(-,v_o,+) move to Right line right_ qrt then up_ then right_; # gpic and dpic have different defaults (.center vs .start) # move to Out then up_ dim move to Out dot; line left_ qrt; ground; move to Sec# then up_ dim line right_ qrt; ground; "\tiny DualBridge" at (4*dim,-qrt) .PE