diff --git a/flygenet.dtx b/flygenet.dtx
index 3733fa0..fa07f33 100644
--- a/flygenet.dtx
+++ b/flygenet.dtx
@@ -121,6 +121,7 @@ has been generated for details.
 %    \end{macrocode}
 %
 %    \begin{macrocode}
+\RequirePackage{wasysym}
 \def\fly@printchromosome#1/#2\end{%
 \def\fly@argii{#2}%
 \ifx\fly@argii\empty\mathit{#1}\else\frac{\mathit{#1}}{\mathit{#2}}\fi}
@@ -145,6 +146,12 @@ has been generated for details.
 \catcode`\:=\active\let:=\mcolon%
 \fly@endgenotype}
 \endgroup
+\def\female{\venus\;\genotype}
+\def\male{\mars\;\genotype}
+\def\virgin{\mercury\;\genotype}
+\def\females{\venus\venus\;\genotype}
+\def\males{\mars\mars\;\genotype}
+\def\virgins{\mercury\mercury\;\genotype}
 %    \end{macrocode}
 %
 % \Finale