From fc32837b44af68f4d47643df9390e8afc2ea806d Mon Sep 17 00:00:00 2001
From: rlar <rlar>
Date: Sat, 3 Dec 2016 18:01:40 +0100
Subject: [PATCH] muttemp.c, allow negative inductance

---
 src/spicelib/devices/ind/muttemp.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/spicelib/devices/ind/muttemp.c b/src/spicelib/devices/ind/muttemp.c
index e0fe10939..853235ae6 100644
--- a/src/spicelib/devices/ind/muttemp.c
+++ b/src/spicelib/devices/ind/muttemp.c
@@ -29,7 +29,7 @@ MUTtemp(GENmodel *inModel, CKTcircuit *ckt)
             /*           _______
              * M = k * \/L1 * L2
              */
-            here->MUTfactor = here->MUTcoupling * sqrt(ind1 * ind2);
+            here->MUTfactor = here->MUTcoupling * sqrt(fabs(ind1 * ind2));
         }
 
     return(OK);