diff --git a/src/spicelib/devices/relmodel/relmodelmask.c b/src/spicelib/devices/relmodel/relmodelmask.c
index cc122d0dd..ba451d05e 100644
--- a/src/spicelib/devices/relmodel/relmodelmask.c
+++ b/src/spicelib/devices/relmodel/relmodelmask.c
@@ -63,6 +63,10 @@ RELMODELmAsk (CKTcircuit *ckt, GENmodel *inst, int which, IFvalue *value)
             value->rValue = model->RELMODELbeta1 ;
             return (OK) ;
 
+        case RELMODEL_MOD_TYPE:
+            value->iValue = model->RELMODELtype ;
+            return (OK) ;
+
         case RELMODEL_MOD_RELMODEL:
             value->iValue = model->RELMODELrelmodel ;
             return (OK) ;
diff --git a/src/spicelib/devices/relmodel/relmodelmpar.c b/src/spicelib/devices/relmodel/relmodelmpar.c
index 8ba4cf8b0..845693b0d 100644
--- a/src/spicelib/devices/relmodel/relmodelmpar.c
+++ b/src/spicelib/devices/relmodel/relmodelmpar.c
@@ -71,6 +71,11 @@ RELMODELmParam (int param, IFvalue *value, GENmodel *inMod)
             model->RELMODELbeta1Given = TRUE ;
             return (OK) ;
 
+        case RELMODEL_MOD_TYPE:
+            model->RELMODELtype = value->iValue ;
+            model->RELMODELtypeGiven = TRUE ;
+            return (OK) ;
+
         case RELMODEL_MOD_RELMODEL:
             model->RELMODELrelmodel = 1 ;
             model->RELMODELrelmodelGiven = TRUE ;