From a101e49ae3a0b319577fc4aa159832726103559f Mon Sep 17 00:00:00 2001 From: Gustavo Marques Date: Tue, 20 Mar 2018 16:02:21 -0600 Subject: [PATCH] Reduced the numbers of characters in a line --- src/parameterizations/vertical/MOM_cvmix_conv.F90 | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/src/parameterizations/vertical/MOM_cvmix_conv.F90 b/src/parameterizations/vertical/MOM_cvmix_conv.F90 index 88dece60fb..721c35faa2 100644 --- a/src/parameterizations/vertical/MOM_cvmix_conv.F90 +++ b/src/parameterizations/vertical/MOM_cvmix_conv.F90 @@ -149,8 +149,8 @@ subroutine calculate_cvmix_conv(h, tv, G, GV, CS, hbl) type(verticalGrid_type), intent(in) :: GV !< Vertical grid structure. real, dimension(SZI_(G),SZJ_(G),SZK_(G)), intent(in) :: h !< Layer thickness, in m or kg m-2. type(thermo_var_ptrs), intent(in) :: tv !< Thermodynamics structure. - type(cvmix_conv_cs), pointer :: CS !< The control structure returned by a previous call to - !! CVMix_conv_init. + type(cvmix_conv_cs), pointer :: CS !< The control structure returned + !! by a previous call to CVMix_conv_init. real, dimension(:,:), optional, pointer :: hbl!< Depth of ocean boundary layer (m) ! local variables