diff --git a/src/spicelib/devices/vbic/vbicload.c b/src/spicelib/devices/vbic/vbicload.c
index 7e79a34b2..f30aca66a 100644
--- a/src/spicelib/devices/vbic/vbicload.c
+++ b/src/spicelib/devices/vbic/vbicload.c
@@ -18,6 +18,19 @@ Spice3 Implementation: 2003 Dietmar Warning DAnalyse GmbH
 #include "sperror.h"
 #include "devdefs.h"
 
+int vbic_4T_it_cf_fj(double *,
+    double *,double *,double *,double *,double *,double *,
+    double *,double *,double *,double *,double *,double *, double *,
+    double *,double *,double *,double *,double *,double *, double *,
+    double *,double *,double *,double *,double *,double *, double *,
+    double *,double *,double *,double *,double *,double *, double *,
+    double *,double *,double *,double *,double *,double *, double *,
+    double *,double *,double *,double *,double *,double *, double *,
+    double *,double *,double *,double *,double *,double *, double *,
+    double *,double *,double *,double *,double *,double *, double *,
+    double *,double *,double *,double *,double *,double *, double *,
+    double *,double *,double *,double *,double *,double *);
+
 int
 VBICload(GENmodel *inModel, CKTcircuit *ckt)
         /* actually load the current resistance value into the 
@@ -39,18 +52,6 @@ VBICload(GENmodel *inModel, CKTcircuit *ckt)
     ,Qbco,Qbco_Vbc,Ibcp,Ibcp_Vbcp,Iccp,Iccp_Vbep,Iccp_Vbci
     ,Iccp_Vbcp,Irs,Irs_Vrs,Qbcp,Qbcp_Vbcp,SCALE;
     int iret;
-    int vbic_4T_it_cf_fj(double *
-        ,double *,double *,double *,double *,double *,double *
-        ,double *,double *,double *,double *,double *,double *, double *
-        ,double *,double *,double *,double *,double *,double *, double *
-        ,double *,double *,double *,double *,double *,double *, double *
-        ,double *,double *,double *,double *,double *,double *, double *
-        ,double *,double *,double *,double *,double *,double *, double *
-        ,double *,double *,double *,double *,double *,double *, double *
-        ,double *,double *,double *,double *,double *,double *, double *
-        ,double *,double *,double *,double *,double *,double *, double *
-        ,double *,double *,double *,double *,double *,double *, double *
-        ,double *,double *,double *,double *,double *,double *);
     double vce, xfact;
     double vt;
     double delvbei;
diff --git a/src/spicelib/devices/vbic/vbictemp.c b/src/spicelib/devices/vbic/vbictemp.c
index a7486893a..54078991d 100644
--- a/src/spicelib/devices/vbic/vbictemp.c
+++ b/src/spicelib/devices/vbic/vbictemp.c
@@ -16,6 +16,9 @@ Spice3 Implementation: 2003 Dietmar Warning DAnalyse GmbH
 
 
 /* ARGSUSED */
+
+int iret, vbic_4T_it_cf_t(double *, double *, double *);
+
 int
 VBICtemp(GENmodel *inModel, CKTcircuit *ckt)
         /* Pre-compute many useful parameters
@@ -24,7 +27,6 @@ VBICtemp(GENmodel *inModel, CKTcircuit *ckt)
     VBICmodel *model = (VBICmodel *)inModel;
     VBICinstance *here;
     double p[108], pnom[108], TAMB;
-    int iret, vbic_4T_it_cf_t(double *, double *, double *);
     double vt;
 
     /*  loop through all the bipolar models */