Rename `timings_file` to `timings_fname`

Inst_eddies/inst_eddies.f90

@@ -61,7 +61,7 @@ program inst_eddies
 
   logical exist
   real t0, t1 ! CPU times, in s
-  character(len = 30) timings_file
+  character(len = 30) timings_fname ! file name
   integer:: date = 0, slice = 0
   namelist /dates_nml/ date, slice
 
@@ -72,15 +72,15 @@ program inst_eddies
   call cpu_time(t0)
   print *, "inst_eddies: Enter dates_nml:"
   read(unit = *, nml = dates_nml)
-  write(timings_file, fmt = '("SHPC/Slice_", i0, "/timings.txt")') slice
-  inquire(file = timings_file, exist = exist)
+  write(timings_fname, fmt = '("SHPC/Slice_", i0, "/timings.txt")') slice
+  inquire(file = timings_fname, exist = exist)
   call new_unit(unit)
 
   if (exist) then
-     open(unit, file = timings_file, STATUS = "old", ACTION = "WRITE", &
+     open(unit, file = timings_fname, STATUS = "old", ACTION = "WRITE", &
           position = "append")
   else
-     OPEN(unit, file = timings_file, STATUS = "new", ACTION = "WRITE")
+     OPEN(unit, file = timings_fname, STATUS = "new", ACTION = "WRITE")
   end if
 
   call config