From 897165d026303d1ee50c7edadfde7630dc72ecf9 Mon Sep 17 00:00:00 2001
From: dwarning <dwarning>
Date: Wed, 1 Apr 2020 16:41:46 +0200
Subject: [PATCH] VDMOS change default value for Rthca

---
 examples/vdmos/self-heating.sp        | 2 +-
 src/spicelib/devices/vdmos/vdmosset.c | 2 +-
 2 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/examples/vdmos/self-heating.sp b/examples/vdmos/self-heating.sp
index 463d3072d..5de456a2b 100644
--- a/examples/vdmos/self-heating.sp
+++ b/examples/vdmos/self-heating.sp
@@ -11,7 +11,7 @@ VD D 0 2V
 + Is=60p N=1.1 Rb=14m XTI=3
 + Cjo=1.5n Vj=0.8 m=0.5
 + tcvth=0.0065 MU=-1.27 texp0=1.5
-+ Rthjc=0.02 Cthj=1e-3 Rthca=100
++ Rthjc=0.02 Cthj=1e-3 Rthca=1000
 + mtriode=0.8
 .control
 dc vd 0.1 50 .1 vg 5 13 2
diff --git a/src/spicelib/devices/vdmos/vdmosset.c b/src/spicelib/devices/vdmos/vdmosset.c
index 085b43910..e83359ec7 100644
--- a/src/spicelib/devices/vdmos/vdmosset.c
+++ b/src/spicelib/devices/vdmos/vdmosset.c
@@ -122,7 +122,7 @@ VDMOSsetup(SMPmatrix *matrix, GENmodel *inModel, CKTcircuit *ckt,
             model->VDMOSrthjc = 1.0e-03;
 
         if (!model->VDMOSrthcaGiven)
-            model->VDMOSrthca = 100;
+            model->VDMOSrthca = 1000;
 
         if (!model->VDMOScthjGiven)
             model->VDMOScthj = 10e-06;