Polish

Inst_eddies/get_1_outerm.f90

@@ -48,10 +48,11 @@ contains
     type(ssh_contour), intent(out):: out_cont
 
     type(ssh_contour), intent(out):: cont_list(:) ! (n_max_cont)
-    ! Contour list. The outermost contour is element n_cont. The
+    ! Contour list. Defined only for subscripts 1:n_cont. If n_cont >=
+    ! 1, the outermost contour is element with subscript n_cont. The
     ! contours are in monotonic order of ssh. If n_cont >= 2,
-    ! cont_list(:n_cont - 1)%area is missing and cont_list(:n_cont -
-    ! 1) is not oriented.
+    ! cont_list(:n_cont - 1)%area are missing and cont_list(:n_cont -
+    ! 1) are not oriented.
 
     integer, intent(out):: n_cont
     ! number of good contours found and stored, >= 0

Inst_eddies/set_all_contours.f90

@@ -69,10 +69,11 @@ contains
     integer, parameter:: n_max_cont = 31
 
     type(ssh_contour) cont_list(n_max_cont)
-    ! Contour list. The outermost contour is element with subscript
-    ! n_cont. The contours are in monotonic order of ssh. If n_cont >=
-    ! 2, cont_list(:n_cont - 1)%area is missing and cont_list(:n_cont
-    ! - 1) is not oriented.
+    ! Contour list. Defined only for subscripts 1:n_cont. If n_cont >=
+    ! 1, the outermost contour is element with subscript n_cont. The
+    ! contours are in monotonic order of ssh. If n_cont >= 2,
+    ! cont_list(:n_cont - 1)%area are missing and cont_list(:n_cont -
+    ! 1) are not oriented.
 
     integer n_cont ! number of good contours found and stored in cont_list, >= 0
 

Trajectories/Tests/tests.json

@@ -59,7 +59,7 @@
 	]
     },
     "Greece_cost_function": {
-	"description": "This is a case where the speed is not defined on a whole segment.",
+	"description": "This is a case where the speed is not defined on a whole segment. It can be seen in the properties first_av_ros or last_av_ros.",
 	"command": [
             "$src_dir/Trajectories/cost_function.py",
             "$tests_old_dir/Greece/SHPC",