Clean out some trailing whitespace.

ESMG · Mar 30, 2021 · 9aa2b52 · 9aa2b52
1 parent 12432e3
commit 9aa2b52
Showing 1 changed file with 6 additions and 6 deletions.
diff --git a/config_src/external/Icepack_interfaces/icepack_warnings.F90 b/config_src/external/Icepack_interfaces/icepack_warnings.F90
@@ -92,12 +92,12 @@ subroutine icepack_warnings_clear()
       end subroutine icepack_warnings_clear
 
 !=======================================================================
-      
+
       subroutine icepack_warnings_getall(warningsOut)
 
         character(len=char_len_long), dimension(:), allocatable, intent(out) :: &
              warningsOut
- 
+
         integer :: iWarning
         character(len=*),parameter :: subname='(icepack_warnings_getall)'
 
@@ -159,7 +159,7 @@ subroutine icepack_warnings_add(warning)
 
         character(len=*), intent(in) :: warning ! warning to add to array of warnings
 
-        ! local 
+        ! local
 
         character(len=char_len_long), dimension(:), allocatable :: warningsTmp
         integer :: &
@@ -182,10 +182,10 @@ subroutine icepack_warnings_add(warning)
 
            ! find the size of the warnings array at the start
            nWarningsArray = size(warnings)
-           
+
            ! check to see if need more space in warnings array
            if (nWarnings + 1 > nWarningsArray) then
-           
+
               ! allocate the temporary warning storage
               allocate(warningsTmp(nWarningsArray))
 
@@ -207,7 +207,7 @@ subroutine icepack_warnings_add(warning)
               deallocate(warningsTmp)
 
            endif
-              
+
         endif
 
         ! increase warning number