Slashed “male” symbol

Question

For my thesis I need a symbol for neutered male (veterinary medicine) which is a mars symbol with a backslash superimposed. With the descriptions I found, it didn't work for my document. I'm using scrartcl as documentclass which I can't change because of my reference style.

Answer 1

Since the placement of tha backslash is not obvious from the description in the original question, I provide three options using TikZ (the last one suggested by barbara beeton in a comment):

\documentclass{scrartcl}
\usepackage{tikz}

\def\Nmale{%
  \tikz{\node[draw,circle,scale=0.5] (a) {};\draw[->] (a.45) -- +(45:4pt);\draw +(a.north west) -- +(a.south east);}}

\def\Nemale{%
  \tikz{\node[draw,circle,scale=0.5] (a) {};\draw[->] (a.45) -- +(45:4pt);\draw +([xshift=-1.5pt,yshift=1.5pt]a.north west) -- +([xshift=1.5pt,yshift=-1.5pt]a.south east);}}

\def\Neumale{%
  \tikz{\node[draw,circle,scale=0.5] (a) {};\draw[->] (a.45) -- +(45:4pt);\draw +([xshift=-0.5pt,yshift=2.5pt]a.45) -- +([xshift=2.5pt,yshift=-0.5pt]a.45);}}

\begin{document}

\Nmale

\Nemale

\Neumale

\end{document}

I am now almost convinced that the backslash should cross only the arrow, so here are some options for male and female:

\documentclass{scrartcl}
\usepackage{tikz}

\def\Neumale{%
  \tikz{\node[draw,circle,scale=0.5] (a) {};\draw[->] (a.45) -- +(45:4pt);\draw[very thin] +([xshift=-0.5pt,yshift=2.2pt]a.45) -- +([xshift=2.2pt,yshift=-0.5pt]a.45);}}

\def\Neufemale{%
  \tikz{\node[draw,circle,scale=0.5] (a) {};\draw[->] (a.270) -- +(270:4pt);\draw[very thin] +([xshift=-1.9pt,yshift=-1pt]a.270) -- +([xshift=1.9pt,yshift=-1pt]a.270);}}

\begin{document}

\Neumale

\Neufemale

\end{document}

Answer 2

As you didn't state clearly how your symbol should look like, here are some examples (with and without TikZ). For the \Neumale symbol exists a Unicode character: U+26A6

Code

\documentclass{scrartcl}
\usepackage[nointegrals]{wasysym}
\usepackage{graphicx}
\usepackage{tikz}\usetikzlibrary{calc}
\def\notmaleanymore{\leavevmode\kern.07em\raise.1ex\hbox{\scalebox{.7}{\bfseries\textbackslash}}\kern-.47em\male}
\def\neumale{\tikz{\node[inner sep=0pt] (male) {\male};\draw ($(male.south west)!.65!(male.center)$) +(135:.19em) -- + (-45:.2em);}}
\def\Neumale{\tikz{\node[inner sep=0pt] (male) {\male};\draw ($(male.south west)!1.20!(male.center)$) +(135:.15em) -- + (-45:.15em);}}
\def\neufemale{\tikz[baseline=-0.4ex]{\node[inner sep=0pt] (female) {\female};\draw (female.center)++(-.01em,.17em) +(135:.19em) -- + (-45:.2em);}}
\usepackage{fontspec} % needs XeLaTeX
\begin{document}
\noindent \male \notmaleanymore \neumale \Neumale \female \neufemale\\
\fontspec{LinLibertine_R.otf} % needs XeLaTeX
\char"2642                    % needs XeLaTeX
\char"2640                    % needs XeLaTeX
\char"26A6                    % needs XeLaTeX
\end{document}

Output