diff --git a/src/pregmod/analyzePregnancy.tw b/src/pregmod/analyzePregnancy.tw
index 9608f471464844796ba376f55f7bd4b5b5022e3e..e4c4868afcf3fe7065fbb3b84e1e028ff18ae2f1 100644
--- a/src/pregmod/analyzePregnancy.tw
+++ b/src/pregmod/analyzePregnancy.tw
@@ -374,21 +374,16 @@
 	</p>
 <<elseif getSlave($activeSlave.ID).pregWeek < 0>> /*special states*/
 	Subject is in the postpartem period.
-<<elseif getSlave($activeSlave.ID).preg == -1>> /*special states*/
+<<elseif getSlave($activeSlave.ID).preg == -1 ||  getSlave($activeSlave.ID).mpreg == -1>> /*special states*/
 	Contreceptive agents detected in subject.
+<<elseif getSlave($activeSlave.ID).mpreg < 0>>
+	$His infertility is due to defective anal ovaries.
+<<elseif getSlave($activeSlave.ID).ovaries === 0>>
+	$His infertility is due to missing ovaries.
+<<elseif getSlave($activeSlave.ID).ovaryAge >= 47 >>
+	$His infertility is due to menopausal ovaries.
 <<elseif getSlave($activeSlave.ID).preg == -2>> /*special states*/
-	$His infertility is due to
-	<<if $activeSlave.mpreg === 0>>
-		<<if $activeSlave.ovaries === 0>>
-			missing ovaries.
-		<<elseif $activeSlave.ovaryAge >= 47 >>
-			menopausal ovaries.
-		<<else>>
-			sterilization; although $his tubes are tied $his ovaries could still work.
-		<</if>>	
-	<<else>>
-		defective anal ovaries.
-	<</if>>
+	$His infertility is due to sterilization; although $his tubes are tied $his ovaries could still work.
 <<elseif getSlave($activeSlave.ID).preg == -3>> /*special states*/
 	Failure to locate any ova. Subject is infertile.
 <</if>>