diff --git a/Inst_eddies/Tests/test_set_max_speed.f90 b/Inst_eddies/Tests/test_set_max_speed.f90 index 70683cb4cf7661ce5924d9b1bfcd27f58f4971d5..b4c7bc69ad5020ee4d57b9b1f7eacb1e58fc7626 100644 --- a/Inst_eddies/Tests/test_set_max_speed.f90 +++ b/Inst_eddies/Tests/test_set_max_speed.f90 @@ -38,7 +38,7 @@ program test_set_max_speed type(ssh_contour) cont_list(n_max_cont) ! Contour list. The outermost contour is element with subscript - ! n_cont = 1. The contours are in monotonic order of ssh. + ! n_cont. The contours are in monotonic order of ssh. !----------------------------------------------------------------