tmp node to gnd in HICUM if no SH

src/spicelib/devices/hicum2/hicum2acld.c

@@ -512,9 +512,7 @@ HICUMacLoad(GENmodel *inModel, CKTcircuit *ckt)
                 //Qcth    from 0  to T  f_0=- f_T=+
                 *(here->HICUMtempTempPtr + 1) += -XQcth_Vrth;
 
-            } else {
-                *(here->HICUMtempTempPtr)   += ckt->CKTgmin;
-            }
+            } 
 
         }
     }

src/spicelib/devices/hicum2/hicum2defs.h

@@ -56,7 +56,7 @@ typedef struct sHICUMinstance {
     const int HICUMbaseNode; /* number of base node of hicum */
     const int HICUMemitNode; /* number of emitter node of hicum */
     const int HICUMsubsNode; /* number of substrate node of hicum */
-    const int HICUMtempNode; /* number of the temperature node of the hicum */
+    int HICUMtempNode;       /* number of the temperature node of the hicum */
     int HICUMcollCINode; /* number of internal collector node of hicum */
     int HICUMbaseBINode; /* number of internal base node of hicum */
     int HICUMemitEINode; /* number of internal emitter node of hicum */

src/spicelib/devices/hicum2/hicum2setup.c

@@ -565,6 +565,19 @@ HICUMsetup(SMPmatrix *matrix, GENmodel *inModel, CKTcircuit *ckt, int *states)
                 here->HICUMbaseBINode = tmp->number;
             }
 
+//VDMOS COPY
+            if (!(model->HICUMflsh == 0 || model->HICUMrth < MIN_R )) {
+               if (here->HICUMtempNode == -1) {
+                  error = CKTmkVolt(ckt,&tmp,here->HICUMname,"dT");
+                  if (error) return(error);
+                     here->HICUMtempNode = tmp->number;
+               }
+            } else {
+                here->HICUMtempNode = 0;
+            }
+//END VDMOS COPY
+
+
 //            if(here->HICUMxfNode == 0) {
 //                error = CKTmkVolt(ckt, &tmp, here->HICUMname, "xf");
 //                if(error) return(error);
@@ -672,10 +685,7 @@ do { if((here->ptr = SMPmakeElt(matrix, here->first, here->second)) == NULL){\
                 TSTALLOC(HICUMtempSubsSIPtr,HICUMtempNode,HICUMsubsSINode);
 
                 TSTALLOC(HICUMtempTempPtr,HICUMtempNode,HICUMtempNode);
-            } else { //need this element so that one can still use the node, even though it is not connected
-                TSTALLOC(HICUMtempTempPtr,HICUMtempNode,HICUMtempNode);
-            }
-
+            } 
         }
     }
     return(OK);

src/spicelib/devices/hicum2/hicumL2.cpp

@@ -3699,11 +3699,6 @@ c           Branch: xf-ground, Stamp element: Rxf
 //              finish
                 }
             }
-            else {
-                // force node to 0 volt
-                *(ckt->CKTrhs + here->HICUMtempNode) += 0;
-                *(here->HICUMtempTempPtr)            += 1;
-            }
         }
 
     }