diff --git a/Inst_eddies/set_max_speed.F90 b/Inst_eddies/set_max_speed.F90
index 05abace1bece0ac166db2e80ee2181c4659f16a0..351c735703789621a285cf4310222e43e5743550 100644
--- a/Inst_eddies/set_max_speed.F90
+++ b/Inst_eddies/set_max_speed.F90
@@ -35,10 +35,10 @@ contains
     type(ssh_contour), intent(out):: speed_cont
 
     real, intent(out):: max_speed
-     ! Average of azimuthal speed on cont_list(i_outer) or speed_cont,
-     ! in m s-1. Positive means counterclockwise circulation. If
-     ! speed_cont is not a null ssh contour then max_speed is the
-     ! speed on speed_cont.
+    ! Average of azimuthal speed on cont_list(i_outer) or speed_cont,
+    ! in m s-1. Positive means counterclockwise circulation. If
+    ! speed_cont is not a null ssh contour then max_speed is the
+    ! speed on speed_cont.
 
     type(ssh_contour), intent(inout):: cont_list(:) ! (n_max_cont)
     ! Contour list. Defined only for subscripts 1:n_cont. On entry,