\begin{tikzpicture}[scale=2.54]%
% dpic version 2024.01.01 option -g for TikZ and PGF 1.01
\ifx\dpiclw\undefined\newdimen\dpiclw\fi
\global\def\dpicdraw{\draw[line width=\dpiclw]}
\global\def\dpicstop{;}
\dpiclw=0.8bp
\dpiclw=0.8bp
\dpicdraw (0,0)
 --(0,0.75)\dpicstop
\dpicdraw (0,1.125) circle (0.147638in)\dpicstop
\dpicdraw (-0.25,1.125)
 ..controls (-0.245886,1.129295) and (-0.238602,1.13684)
 ..(-0.23375,1.141834)
 ..controls (-0.228897,1.146828) and (-0.220898,1.154808)
 ..(-0.215902,1.159638)
 ..controls (-0.210906,1.164469) and (-0.202127,1.172271)
 ..(-0.196316,1.177046)
 ..controls (-0.190505,1.181821) and (-0.181167,1.188576)
 ..(-0.175483,1.192117)
 ..controls (-0.169799,1.195658) and (-0.160653,1.200289)
 ..(-0.155078,1.20245)
 ..controls (-0.149504,1.20461) and (-0.140499,1.206953)
 ..(-0.134988,1.207677)
 ..controls (-0.129477,1.208401) and (-0.120523,1.208401)
 ..(-0.115012,1.207677)
 ..controls (-0.109501,1.206953) and (-0.100496,1.20461)
 ..(-0.094922,1.20245)
 ..controls (-0.089347,1.200289) and (-0.080201,1.195658)
 ..(-0.074517,1.192117)
 ..controls (-0.068833,1.188576) and (-0.059495,1.181821)
 ..(-0.053684,1.177046)
 ..controls (-0.047873,1.172271) and (-0.038343,1.163742)
 ..(-0.032422,1.158017)
 ..controls (-0.026501,1.152292) and (-0.01683,1.142568)
 ..(-0.010845,1.136321)
 ..controls (-0.004861,1.130074) and (0.004861,1.119926)
 ..(0.010845,1.113679)
 ..controls (0.01683,1.107432) and (0.026501,1.097708)
 ..(0.032422,1.091983)
 ..controls (0.038343,1.086258) and (0.047873,1.077729)
 ..(0.053684,1.072954)
 ..controls (0.059495,1.068179) and (0.068833,1.061424)
 ..(0.074517,1.057883)
 ..controls (0.080201,1.054342) and (0.089347,1.049711)
 ..(0.094922,1.04755)
 ..controls (0.100496,1.04539) and (0.109501,1.043047)
 ..(0.115012,1.042323)
 ..controls (0.120523,1.041599) and (0.129477,1.041599)
 ..(0.134988,1.042323)
 ..controls (0.140499,1.043047) and (0.149504,1.04539)
 ..(0.155078,1.04755)
 ..controls (0.160653,1.049711) and (0.169799,1.054342)
 ..(0.175483,1.057883)
 ..controls (0.181167,1.061424) and (0.190505,1.068179)
 ..(0.196316,1.072954)
 ..controls (0.202127,1.077729) and (0.210906,1.085531)
 ..(0.215902,1.090362)
 ..controls (0.220898,1.095192) and (0.228897,1.103172)
 ..(0.23375,1.108166)
 ..controls (0.238602,1.11316) and (0.245886,1.120705)
 ..(0.25,1.125)\dpicstop
\dpicdraw (0,1.5)
 --(0,2.25)\dpicstop
\dpicdraw (0,2.25)
 --(2.25,2.25)\dpicstop
\dpicdraw (2.25,2.125)
 --(2.673453,1.701547)\dpicstop
\fill[fill=black,line width=0bp](2.673453,1.701547)
 --(2.761842,1.789935)
 --(2.822633,1.552367)
 --(2.585065,1.613158)
 --(2.673453,1.701547)--cycle
\dpicstop
\dpicdraw (2.673453,1.701547)
 --(2.761842,1.789935)
 --(2.822633,1.552367)
 --(2.585065,1.613158)
 --(2.673453,1.701547)\dpicstop
\dpicdraw (2.735293,1.4572)
 --(2.9178,1.639707)\dpicstop
\dpicdraw (2.826547,1.548453)
 --(3.25,1.125)\dpicstop
\dpicdraw (2.25,0.125)
 --(2.673453,0.548453)\dpicstop
\fill[fill=black,line width=0bp](2.673453,0.548453)
 --(2.585065,0.636842)
 --(2.822633,0.697633)
 --(2.761842,0.460065)
 --(2.673453,0.548453)--cycle
\dpicstop
\dpicdraw (2.673453,0.548453)
 --(2.585065,0.636842)
 --(2.822633,0.697633)
 --(2.761842,0.460065)
 --(2.673453,0.548453)\dpicstop
\dpicdraw (2.9178,0.610293)
 --(2.735293,0.7928)\dpicstop
\dpicdraw (2.826547,0.701547)
 --(3.25,1.125)\dpicstop
\dpicdraw (1.25,1.125)
 --(1.673453,1.548453)\dpicstop
\fill[fill=black,line width=0bp](1.673453,1.548453)
 --(1.585065,1.636842)
 --(1.822633,1.697633)
 --(1.761842,1.460065)
 --(1.673453,1.548453)--cycle
\dpicstop
\dpicdraw (1.673453,1.548453)
 --(1.585065,1.636842)
 --(1.822633,1.697633)
 --(1.761842,1.460065)
 --(1.673453,1.548453)\dpicstop
\dpicdraw (1.9178,1.610293)
 --(1.735293,1.7928)\dpicstop
\dpicdraw (1.826547,1.701547)
 --(2.25,2.125)\dpicstop
\dpicdraw (1.25,1.125)
 --(1.673453,0.701547)\dpicstop
\fill[fill=black,line width=0bp](1.673453,0.701547)
 --(1.761842,0.789935)
 --(1.822633,0.552367)
 --(1.585065,0.613158)
 --(1.673453,0.701547)--cycle
\dpicstop
\dpicdraw (1.673453,0.701547)
 --(1.761842,0.789935)
 --(1.822633,0.552367)
 --(1.585065,0.613158)
 --(1.673453,0.701547)\dpicstop
\dpicdraw (1.735293,0.4572)
 --(1.9178,0.639707)\dpicstop
\dpicdraw (1.826547,0.548453)
 --(2.25,0.125)\dpicstop
\dpicdraw (2.25,2.125)
 --(2.25,2.25)\dpicstop
\dpicdraw (2.25,0.125)
 --(2.25,0)\dpicstop
\dpicdraw (2.25,0)
 --(0,0)\dpicstop
\dpicdraw (3.25,1.125)
 --(4.25,1.125)\dpicstop
\dpicdraw[fill=white](4.25,1.125) circle (0.023622in)\dpicstop
\dpicdraw[fill=white](4.25,-0.25) circle (0.023622in)\dpicstop
\draw (4.25,0.777778) node[above right=-2bp]{$ +$};
\draw (4.25,0.097222) node[below right=-2bp]{$ -$};
\dpicdraw (1.25,1.125)
 --(1,1.125)\dpicstop
\dpicdraw (1,1.125)
 --(1,0.119444)\dpicstop
\dpicdraw (1,0.125)
 ..controls (1.044658,0.125) and (1.085924,0.101175)
 ..(1.108253,0.0625)
 ..controls (1.130582,0.023825) and (1.130582,-0.023825)
 ..(1.108253,-0.0625)
 ..controls (1.085924,-0.101175) and (1.044658,-0.125)
 ..(1,-0.125)\dpicstop
\dpicdraw (1,-0.119444)
 --(1,-0.25)\dpicstop
\dpicdraw (1,-0.25)
 --(4.19,-0.25)\dpicstop
\dpicdraw (4,0.311683)
 --(4.5,0.311683)\dpicstop
\dpicdraw (4.0625,0.311683)
 ..controls (4.06583,0.325577) and (4.071713,0.349912)
 ..(4.075626,0.365976)
 ..controls (4.079538,0.38204) and (4.085939,0.407382)
 ..(4.089905,0.422515)
 ..controls (4.093871,0.437648) and (4.10071,0.461413)
 ..(4.105163,0.475536)
 ..controls (4.109617,0.489658) and (4.11662,0.509063)
 ..(4.120788,0.518829)
 ..controls (4.124957,0.528595) and (4.131527,0.541068)
 ..(4.135449,0.546656)
 ..controls (4.13937,0.552245) and (4.145624,0.558248)
 ..(4.149402,0.56005)
 ..controls (4.153181,0.561853) and (4.159319,0.561853)
 ..(4.163098,0.56005)
 ..controls (4.166876,0.558248) and (4.17313,0.552245)
 ..(4.177051,0.546656)
 ..controls (4.180973,0.541068) and (4.187543,0.528595)
 ..(4.191712,0.518829)
 ..controls (4.19588,0.509063) and (4.202883,0.489658)
 ..(4.207337,0.475536)
 ..controls (4.21179,0.461413) and (4.218629,0.437648)
 ..(4.222595,0.422515)
 ..controls (4.226561,0.407382) and (4.232962,0.38204)
 ..(4.236874,0.365976)
 ..controls (4.240787,0.349912) and (4.24667,0.325577)
 ..(4.25,0.311683)\dpicstop
\dpicdraw (4.25,0.311683)
 ..controls (4.25333,0.325577) and (4.259213,0.349912)
 ..(4.263126,0.365976)
 ..controls (4.267038,0.38204) and (4.273439,0.407382)
 ..(4.277405,0.422515)
 ..controls (4.281371,0.437648) and (4.28821,0.461413)
 ..(4.292663,0.475536)
 ..controls (4.297117,0.489658) and (4.30412,0.509063)
 ..(4.308288,0.518829)
 ..controls (4.312457,0.528595) and (4.319027,0.541068)
 ..(4.322949,0.546656)
 ..controls (4.32687,0.552245) and (4.333124,0.558248)
 ..(4.336902,0.56005)
 ..controls (4.340681,0.561853) and (4.346819,0.561853)
 ..(4.350598,0.56005)
 ..controls (4.354376,0.558248) and (4.36063,0.552245)
 ..(4.364551,0.546656)
 ..controls (4.368473,0.541068) and (4.375043,0.528595)
 ..(4.379212,0.518829)
 ..controls (4.38338,0.509063) and (4.390383,0.489658)
 ..(4.394837,0.475536)
 ..controls (4.39929,0.461413) and (4.406129,0.437648)
 ..(4.410095,0.422515)
 ..controls (4.414061,0.407382) and (4.420462,0.38204)
 ..(4.424374,0.365976)
 ..controls (4.428287,0.349912) and (4.43417,0.325577)
 ..(4.4375,0.311683)\dpicstop
\dpicdraw (5,1.125)
 --(5,0.8125)
 --(5.125,0.75)
 --(4.875,0.625)
 --(5.125,0.5)
 --(4.875,0.375)
 --(5.125,0.25)
 --(4.875,0.125)
 --(5,0.0625)
 --(5,-0.25)\dpicstop
\draw (5.125,0.4375) node[right=-2bp]{$ R$};
\filldraw[line width=0bp](4.725,1.175)
 --(4.625,1.125)
 --(4.725,1.075) --cycle\dpicstop
\dpicdraw (5,1.125)
 --(4.637423,1.125)\dpicstop
\filldraw[line width=0bp](4.725,-0.2)
 --(4.625,-0.25)
 --(4.725,-0.3) --cycle\dpicstop
\dpicdraw (5,-0.25)
 --(4.637423,-0.25)\dpicstop
\end{tikzpicture}%