第111回薬剤師国家試験

$\begin{tikzpicture}[>=Stealth, line width=0.6pt]\begin{scope}[shift={(0,0)},declare function = {fiberL=8;fiberR=1.2;coreR=0.5;}]\draw[fill,gray!20] (0,fiberR) arc (90:270:0.4 and fiberR) -- (fiberL,-fiberR) -- (fiberL,fiberR) -- cycle;\draw[fill,white] (0,coreR) -- (fiberL,coreR) -- (fiberL,-coreR) -- (0,-coreR) -- cycle;\draw (0,fiberR) -- (fiberL,fiberR);\draw (0,-fiberR) -- (fiberL,-fiberR);\draw[fill=white] (0,0) ellipse (0.4 and fiberR);\draw (0,0) ellipse (0.2 and coreR);\draw[dash pattern=on 1.5pt off 1.5pt] (-0.04,coreR) -- (fiberL,coreR);\draw[dash pattern=on 1.5pt off 1.5pt] (-0.04,-coreR) -- (fiberL,-coreR);\foreach \y/\label in {0.5/ク,0.2/ラ,-0.1/ッ, -0.4/ド}\node[] at (-0.29, \y) {\scriptsize\label};\foreach \y/\label in {0.2/コ, -0.1/ア}\node[] at (-0.045, \y) {\scriptsize\label};\coordinate (P0) at (-0.6, 0.2);\coordinate (P1) at (1, -0.5);\coordinate (P2) at (3, 0.5);\coordinate (P3) at (5, -0.5);\coordinate (P4) at (7, 0.5);\coordinate (P5) at (8.5, 0.1);\draw[-latex] ($(P0)!0.41!(P1)$) -- ($(P0)!0.48!(P1)$);\draw ($(P0)!0.41!(P1)$) -- (P1);\draw[-latex] (P1) -- ($(P1)!0.6!(P2)$);\draw (P1) -- (P2);\draw[-latex] (P2) -- ($(P2)!0.6!(P3)$);\draw (P2) -- (P3);\draw[-latex] (P3) -- ($(P3)!0.6!(P4)$);\draw (P3) -- (P4);\draw[-latex] (P4) -- ($(P4)!0.6!(P5)$);\draw (P4) -- ($(P4)!0.7!(P5)$);\node[font=\large] at (fiberL/2, -2.5) {図 1　光ファイバー};\end{scope}\begin{scope}[shift={(10.5,0)}]\draw[very thick] (-2,0) -- (3,0) node[right] {境界面};\draw[densely dashed] (0,-2.1) -- (0,2.5);\draw (0,0.3) -| (0.3,0);\node at (2, 0.3) {媒質 1};\node at (2, -0.3) {媒質 2};\coordinate (O) at (0,0);\coordinate (In) at (120:2.8);\draw[-latex] (In) -- ($(In)!0.4!(O)$);\draw (In) -- (O);\coordinate (Refr) at (-30:3);\draw[-latex] (O) -- ($(O)!0.6!(Refr)$);\draw (O) -- (Refr);\coordinate (N_top) at (0,2);\coordinate (N_bot) at (0,-2);\pic [draw, "$\theta_{\rm i}$", angle eccentricity=1.5, angle radius=0.8cm, -Straight Barb] {angle = N_top--O--In};\pic [draw, "$\theta_{\rm r}$", angle eccentricity=1.5, angle radius=0.7cm, -Straight Barb] {angle = N_bot--O--Refr};\node[font=\large] at (1.3, -2.5) {図 2　光の屈折};\end{scope}\end{tikzpicture}$

\begin{tikzpicture}[>=Stealth, line width=0.6pt]
\begin{scope}[shift={(0,0)},
declare function = {
fiberL=8;
fiberR=1.2;
coreR=0.5;
}]
\draw[fill,gray!20] (0,fiberR) arc (90:270:0.4 and fiberR) -- (fiberL,-fiberR) -- (fiberL,fiberR) -- cycle;
\draw[fill,white] (0,coreR) -- (fiberL,coreR) -- (fiberL,-coreR) -- (0,-coreR) -- cycle;
\draw (0,fiberR) -- (fiberL,fiberR);
\draw (0,-fiberR) -- (fiberL,-fiberR);
\draw[fill=white] (0,0) ellipse (0.4 and fiberR);
\draw (0,0) ellipse (0.2 and coreR);
\draw[dash pattern=on 1.5pt off 1.5pt] (-0.04,coreR) -- (fiberL,coreR);
\draw[dash pattern=on 1.5pt off 1.5pt] (-0.04,-coreR) -- (fiberL,-coreR);
\foreach \y/\label in {0.5/ク,0.2/ラ,-0.1/ッ, -0.4/ド}
\node[] at (-0.29, \y) {\scriptsize\label};
\foreach \y/\label in {0.2/コ, -0.1/ア}
\node[] at (-0.045, \y) {\scriptsize\label};
\coordinate (P0) at (-0.6, 0.2);
\coordinate (P1) at (1, -0.5);
\coordinate (P2) at (3, 0.5);
\coordinate (P3) at (5, -0.5);
\coordinate (P4) at (7, 0.5);
\coordinate (P5) at (8.5, 0.1);
\draw[-latex] ($(P0)!0.41!(P1)$) -- ($(P0)!0.48!(P1)$);
\draw ($(P0)!0.41!(P1)$) -- (P1);
\draw[-latex] (P1) -- ($(P1)!0.6!(P2)$);
\draw (P1) -- (P2);
\draw[-latex] (P2) -- ($(P2)!0.6!(P3)$);
\draw (P2) -- (P3);
\draw[-latex] (P3) -- ($(P3)!0.6!(P4)$);
\draw (P3) -- (P4);
\draw[-latex] (P4) -- ($(P4)!0.6!(P5)$);
\draw (P4) -- ($(P4)!0.7!(P5)$);
\node[font=\large] at (fiberL/2, -2.5) {図 1　光ファイバー};
\end{scope}
\begin{scope}[shift={(10.5,0)}]
\draw[very thick] (-2,0) -- (3,0) node[right] {境界面};
\draw[densely dashed] (0,-2.1) -- (0,2.5);
\draw (0,0.3) -| (0.3,0);
\node at (2, 0.3) {媒質 1};
\node at (2, -0.3) {媒質 2};
\coordinate (O) at (0,0);
\coordinate (In) at (120:2.8);
\draw[-latex] (In) -- ($(In)!0.4!(O)$);
\draw (In) -- (O);
\coordinate (Refr) at (-30:3);
\draw[-latex] (O) -- ($(O)!0.6!(Refr)$);
\draw (O) -- (Refr);
\coordinate (N_top) at (0,2);
\coordinate (N_bot) at (0,-2);
\pic [draw, "$\theta_{\rm i}$", angle eccentricity=1.5, angle radius=0.8cm, -Straight Barb] {angle = N_top--O--In};
\pic [draw, "$\theta_{\rm r}$", angle eccentricity=1.5, angle radius=0.7cm, -Straight Barb] {angle = N_bot--O--Refr};
\node[font=\large] at (1.3, -2.5) {図 2　光の屈折};
\end{scope}
\end{tikzpicture}