%% Copyright 2016 Nils Fleischhacker
%%
%% This work may be distributed and/or modified under the 
%% conditions of the LaTeX Project Public License, either 
%% version 1.3 of this license or (at your option) any later 
%% version. The latest version of this license is in
%%
%%   http://www.latex-project.org/lppl.txt
%%
%% and version 1.3 or later is part of all distributions of 
%% LaTeX version 2005/12/01 or later.
%%
%% This work has the LPPL maintenance status `maintained'.
%% 
%% The Current Maintainer of this work is Nils Fleischhacker.
\tikzpeople@addcolorkey{stethoscope}
\tikzpeople@addcolorkey{tube}

\newcommand{\tikzpeople@physician@paint}{
	\tikzpeople@person@paintshirt
	\tikzpeople@physician@paintshirtdetails
	\tikzpeople@physician@stethoscope
	\tikzpeople@person@paintrighthorn
	\tikzpeople@person@painthead
	\tikzpeople@person@painthair
	\tikzpeople@physician@painthat
	\tikzpeople@person@paintgoatee
	\tikzpeople@person@paintlefthorn
	\tikzpeople@person@painthalo
}

\newcommand{\tikzpeople@physician@paintshirtdetails}{
	\begin{scope}
		\clip (-4pt,-8pt) .. controls (-2pt,-10pt) and (3pt,-9pt) .. 
			( 5pt,-7pt) .. controls ( 5pt,  0pt) and (-5pt,0pt) ..
			(-4pt,-8pt);
		\draw[skin]
			(245:3pt) .. controls (1pt,-4.85pt) .. (1.3pt,-4.85pt) .. controls (1.7pt,-4.6pt) .. (311:3pt) -- cycle;
		\draw[shirt,shading angle=-45] (-.1pt,-7.2pt) to[out=204,in=348] (-2.5pt,-7.2pt) -- ++(270:1.3pt) arc (180:360:1.2pt) --cycle;
		\draw[color=\tikzpeople@shirt!90!black,thick] (-.1pt,-7.2pt) to[out=204,in=348] (-2.5pt,-7.2pt);
	\end{scope}
}

\newcommand{\tikzpeople@physician@painthat}{
	\draw[hat] (160:3pt) ++(.3pt,1.6pt) -- (160:3pt) arc (-180:0:2.85pt and 1pt) -- ++(-.3pt,1.6pt) arc (0:180:2.55pt and 1pt) arc (-180:0:2.55pt and 1pt);
}

\newcommand{\tikzpeople@physician@stethoscope}{
	\draw[tube] 
		(234:2.9pt) ++(295:1.3pt) ++(323:1.8pt) to[out=318,in=135] ++(321:1.4pt) 
		to[in=225,out=315] ++(10:.5pt) to[out=55,in=260] ++(84:1.3pt) -- 
		++(350:.3pt) to[out=260,in=55] ++(264:1.7pt) to[out=235,in=90] ++(210:.3pt) 
		-- ++(270:3.2pt) .. controls +(270:1pt) and +(285:1pt) .. ++(-1.9pt,-.2pt) 
		to[out=105, in=292] (-.7pt,-7.4pt) -- ++(-.4pt,0) arc (180:18:.39pt) 
		to[out=288, in=105] ++(288:2pt) .. controls +(285:.7pt) and +(270:.7pt) .. 
		++(7:1.2pt) -- ++(90:3pt) to[out=100,in=325] ++(140:.6pt) to[out=145,in=315]
		++(135:1pt);
	\draw[stethoscope] 
		(234:2.9pt) ++(295:1.3pt) ++(321:2.2pt) .. controls +(323:.6pt) and 
		+(260:.6pt) .. ++(17:1.55pt) -- +(.15pt,0) .. controls +(260:.8pt) and 
		+(323:.8pt) .. ++(197:1.7pt);
	\draw[stethoscope]
		(234:2.9pt) to[out=270,in=135] ++(295:1.3pt) to[out=315,in=143] 
		++(323:1.8pt) coordinate (tikzpeople@tmp) -- ++(233:.3pt) to[in=315,out=143] 
		++(143:1.9pt) to[in=270,out=135] ++(110:2pt);
	\draw[stethoscope] 
		(tikzpeople@tmp) ++(0,.06pt) coordinate (tikzpeople@tmp2) to[out=225,in=61] ++(233:.4pt) -- 
		++(323:.5pt) coordinate (tikzpeople@tmp) to[in=241,out=45] ++(53:.4pt) (tikzpeople@tmp) 
		to[in=225,out=61] ++(53:.4pt) --(tikzpeople@tmp2);
	\draw[stethoscope] 
		(314:2.9pt) to[out=308,in=87] ++(307:.4pt) to[out=273,in=80] ++(263:1.6pt) 
		coordinate (tikzpeople@tmp) -- ++(353:.3pt) to[in=273,out=80] ++(83:1.7pt) 
		to[in=270,out=93] ++(120:.7pt);
	\draw[stethoscope] 
		(tikzpeople@tmp) ++(-.04pt,.06pt) coordinate (tikzpeople@tmp2) to[out=358,in=162] ++(350:.4pt) -- 
		++(260:.5pt) coordinate (tikzpeople@tmp) to[in=358,out=162] ++(170:.4pt) --(tikzpeople@tmp2);
}

\newcommand{\tikzpeople@physician@definecolors}{
	\definecolor{shirt}{RGB}{150,176,228}
	\definecolor{hat}{RGB}{150,176,228}
	\definecolor{stethoscope}{RGB}{149,153,164}
	\definecolor{tube}{RGB}{193,75,26}
	\definecolor{hair}{rgb}{0,0,0}
}

\newcommand{\tikzpeople@physician@definestyles}{
	\if@tikzpeople@saturated
		\tikzset{
			tube/.style={color=\tikzpeople@tube,top color=\tikzpeople@tube!70, bottom color=\tikzpeople@tube,shading angle=45},
			stethoscope/.style={color=\tikzpeople@stethoscope,top color=\tikzpeople@stethoscope!70, bottom color=\tikzpeople@stethoscope,shading angle=45}
		}
	\else
		\tikzset{
			tube/.style={color=\tikzpeople@tube!80,top color=\tikzpeople@tube!40, bottom color=\tikzpeople@tube!80,shading angle=45},
			stethoscope/.style={color=\tikzpeople@stethoscope!80,top color=\tikzpeople@stethoscope!40, bottom color=\tikzpeople@stethoscope!80,shading angle=45}
		}
	\fi
}

\newcommand{\tikzpeople@physician@colors}{
	shirt/340/{1/-.75}, hair/160/{-.75/.9}, hat/20/{.5/1.3}, 
	stethoscope/180/{-.48/-.15}, tube/200/{-.25/-1.2}, skin/0/{.3/.6}%
}
