diff --git a/PROXIMITY_EFFECT_TEST_CASES/run_test_cases b/PROXIMITY_EFFECT_TEST_CASES/run_test_cases
new file mode 100755
index 0000000..74a4181
--- /dev/null
+++ b/PROXIMITY_EFFECT_TEST_CASES/run_test_cases
@@ -0,0 +1,8 @@
+cd COAX_OVER_GROUND_FASTHENRY ; ./generate_spice_cable_bundle_model run ; cd ..
+cd COAX_OVER_GROUND_FASTHENRY_2 ; ./generate_spice_cable_bundle_model run ; cd ..
+cd SPACEWIRE_STP ; ./generate_spice_cable_bundle_model run ; cd ..
+cd THREE_RECTANGLES ; ./generate_spice_cable_bundle_model run ; cd ..
+cd TWINAX ; ./generate_spice_cable_bundle_model run ; cd ..
+cd TWISTED_PAIR ; ./generate_spice_cable_bundle_model run ; cd ..
+cd TWO_CYLINDRICAL_WIRES_SEPARATION_TEST ; ./generate_spice_cable_bundle_model run ; cd ..
+cd TWO_RECTANGULAR_WIRES_SEPARATION_TEST ; ./generate_spice_cable_bundle_model run ; cd ..
diff --git a/SRC/PUL_PARAMETER_CALCULATION/PUL_RL_FastHenry2.F90 b/SRC/PUL_PARAMETER_CALCULATION/PUL_RL_FastHenry2.F90
index 819b39e..c52175c 100644
--- a/SRC/PUL_PARAMETER_CALCULATION/PUL_RL_FastHenry2.F90
+++ b/SRC/PUL_PARAMETER_CALCULATION/PUL_RL_FastHenry2.F90
@@ -363,9 +363,8 @@ integer :: ierr
 
       local_line_length=len(trim(line))
       
-! Changed to avoid compilation warning
-!      freq_and_dim_string=line(33:local_line_length)
-      freq_and_dim_string(1:local_line_length-32)=line(33:local_line_length)
+! The following line needs to be changed to avoid a compilation warning
+      freq_and_dim_string=line(33:local_line_length)
   
 !      write(*,*)'reading matrix for:',trim(freq_and_dim_string)
 
--
libgit2 0.21.2