diff --git a/examples/vbic/npn_ft.sp b/examples/vbic/npn_ft.sp
index 90854519c..62d9196e2 100644
--- a/examples/vbic/npn_ft.sp
+++ b/examples/vbic/npn_ft.sp
@@ -21,7 +21,7 @@ set scratch=$curplot     $ store its name to 'scratch'
 setplot $scratch         $ make 'scratch' the active plot 
 let ft=unitvec(ft_runs)  $ create a vector in plot 'scratch' to store ft data 
 let ic=unitvec(ft_runs)  $ create a vector in plot 'scratch' to store ic data 
-foreach myic 1m 4m 7m 10m 20m 40m 60m 75m 90m 100m 110m 130m 180m
+foreach myic 2m 5m 9m 15m 22m 30m 50m 75m 90m 100m 110m 130m 180m
  alter ic = $myic
  ac dec 100 100k 50g
 *plot vdb(vgain#branch)
diff --git a/examples/vbic/npn_out.sp b/examples/vbic/npn_out.sp
index 30256ec4c..44ea0a0a6 100644
--- a/examples/vbic/npn_out.sp
+++ b/examples/vbic/npn_out.sp
@@ -9,7 +9,6 @@ XQ1 C B 0 S qnva
 
 .control
 dc vc 0.0 5.0 0.05 ib 1u 10u 1u
-run
 plot abs(i(vc))
 .endc
 
diff --git a/src/frontend/inpcom.c b/src/frontend/inpcom.c
index 1726feed6..d7b178151 100644
--- a/src/frontend/inpcom.c
+++ b/src/frontend/inpcom.c
@@ -1350,10 +1350,9 @@ struct inp_read_t inp_read( FILE *fp, int call_depth, const char *dir_name,
          */
         if (ciprefix(".lib", buffer))
             if (newcompat.lt || newcompat.ps) {
-                /* compatibility mode,
-                 *   this is neither a libray section definition nor a
-                 * reference interpret as old style .lib <file name> (no lib
-                 * name given)
+                /* In lt or ps there is no library section definition defined,
+                 * so .lib is interpreted as old style .lib <file name> (no lib
+                 * name given, .lib replaced by .include).
                  */
                 char *s = skip_non_ws(buffer); /* skip over .lib */
                 fprintf(cp_err, "  File included as:   .inc %s\n", s);
diff --git a/src/spicelib/devices/vbic/vbicload.c b/src/spicelib/devices/vbic/vbicload.c
index b0c7efff4..622345c20 100644
--- a/src/spicelib/devices/vbic/vbicload.c
+++ b/src/spicelib/devices/vbic/vbicload.c
@@ -246,7 +246,8 @@ VBICload(GENmodel *inModel, CKTcircuit *ckt)
                 Vrth = 0.0, Icth = 0.0, Icth_Vrth = 0.0;
             } else if((ckt->CKTmode & MODEINITJCT) && (here->VBICoff==0)) {
                 Vbe=Vbei=Vbex=model->VBICtype*here->VBICtVcrit;
-                Vbc=Vbci=Vbcx=Vbep=0.0;
+                Vbc=Vbcx=Vbep=0.0;
+                Vbci=-model->VBICtype*here->VBICtVcrit;
                 Vbcp=Vbc-Vbe;
                 Vrci=Vrbi=Vrbp=0.0;
                 Vrcx=Vrbx=Vre=Vrs=0.0;