remove trailing white space

NOAA-GFDL · Oct 20, 2023 · 225101e · 225101e
1 parent aa35299
commit 225101e
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/mpp/include/mpp_write_2Ddecomp.fh b/mpp/include/mpp_write_2Ddecomp.fh
@@ -130,7 +130,7 @@
 !write time information if new time
           if( newtime )then
               if( KIND(time).EQ.r8_kind )then
-                  error = NF_PUT_VAR1_DOUBLE( mpp_file(iunit)%ncid, mpp_file(iunit)%id, & 
+                  error = NF_PUT_VAR1_DOUBLE( mpp_file(iunit)%ncid, mpp_file(iunit)%id, &
                                             & mpp_file(iunit:iunit)%time_level, time )
               else if( KIND(time).EQ.r4_kind )then
                  error = NF90_PUT_VAR ( mpp_file(iunit)%ncid, mpp_file(iunit)%id, time)