\setlength{\unitlength}{0.00083333in}
\setlength{\unitlength}{0.00043333in} %この数値を変えて大きさを調整
%
\begingroup\makeatletter\ifx\SetFigFont\undefined%
\gdef\SetFigFont#1#2#3#4#5{%
  \reset@font\fontsize{#1}{#2pt}%
  \fontfamily{#3}\fontseries{#4}\fontshape{#5}%
  \selectfont}%
\fi\endgroup%
{\renewcommand{\dashlinestretch}{30}
\begin{picture}(3694,2749)(0,-10)
\path(612,1812)(3612,1812)(3612,612)
	(612,612)(612,1812)
\path(612,2412)(612,12)
\path(612,687)(12,12)
\path(612,987)(12,312)
\path(612,1287)(12,612)
\path(612,1587)(12,912)
\path(612,1887)(12,1212)
\path(612,387)(312,12)
\path(612,2187)(12,1512)
\path(387,2262)(12,1812)
\blacken\path(732.000,117.000)(612.000,87.000)(732.000,57.000)(732.000,117.000)
\path(612,87)(3612,87)
\blacken\path(3492.000,57.000)(3612.000,87.000)(3492.000,117.000)(3492.000,57.000)
\path(3612,162)(3612,12)
\thicklines
\path(3612,2712)(3612,1812)
\blacken\path(3552.000,2052.000)(3612.000,1812.000)(3672.000,2052.000)(3552.000,2052.000)
\put(3237,2412){\makebox(0,0)[lb]{{\SetFigFont{15}{15.0}{\rmdefault}{\mddefault}{\updefault}$P$}}}
\put(2037,162){\makebox(0,0)[lb]{{\SetFigFont{15}{15.0}{\rmdefault}{\mddefault}{\updefault}$\ell$}}}
\end{picture}
}
