Rename dummy argument to `innermost_level_2`

Rename dummy argument `innermost_level` to `innermost_level_2`.

Inst_eddies/get_1_outerm.f90

@@ -5,7 +5,7 @@ module get_1_outerm_m
 contains
 
   type(ssh_contour) function get_1_outerm(cyclone, coord_extr, &
-       innermost_level, outside_points, ssh, corner, step)
+       innermost_level_2, outside_points, ssh, corner, step)
 
     ! Gets one outermost contour, if it can find one. Method:
     ! dichotomy on level of ssh. If the procedure cannot find an
@@ -34,9 +34,9 @@ contains
     logical, intent(in):: cyclone
     real, intent(in):: coord_extr(:) ! (2)
 
-    real, intent(in):: innermost_level
+    real, intent(in):: innermost_level_2
     ! ssh level of the innermost contour to consider around the target
-    ! extremum, in m. Assume: innermost_level < extremum for a
+    ! extremum, in m. Assume: innermost_level_2 < extremum for a
     ! maximum, > extremum for a minimum.
 
     real, intent(in):: outside_points(:, :) ! (2, :) longitude and
@@ -60,7 +60,7 @@ contains
 
     !-----------------------------------------------------------------
 
-    get_1_outerm%polyline = good_contour(corner, step, ssh, innermost_level, &
+    get_1_outerm%polyline = good_contour(corner, step, ssh, innermost_level_2, &
          coord_extr, outside_points)
 
     if (get_1_outerm%n_points == 0) then
@@ -68,7 +68,7 @@ contains
        get_1_outerm%ssh = missing_ssh
        get_1_outerm%area = - 1e6
     else
-       level_good = innermost_level
+       level_good = innermost_level_2
        mask = ssh /= huge(0.)
        level_try = merge(maxval(ssh, mask), minval(ssh, mask), cyclone)
        call assert(merge(level_try > level_good, level_try < level_good, &