remove temp writes to iulog in clmfates_interface

ESCOMP · Mar 26, 2020 · 5196717 · 5196717
1 parent 7c299e0
commit 5196717
Showing 1 changed file with 0 additions and 4 deletions.
diff --git a/src/utils/clmfates_interfaceMod.F90 b/src/utils/clmfates_interfaceMod.F90
@@ -2066,9 +2066,6 @@ subroutine init_history_io(this,bounds_proc)
         dk_index = this%fates_hist%hvars(ivar)%dim_kinds_index
         ioname = trim(this%fates_hist%dim_kinds(dk_index)%name)
 
-        write(iulog,*) 'attempt ioname: ', ioname
-        write(iulog,*) 'dk_index: ', dk_index
-
         select case(trim(ioname))
         case(patch_r8)
            call hist_addfld1d(fname=trim(vname),units=trim(vunits),         &
@@ -2118,7 +2115,6 @@ subroutine init_history_io(this,bounds_proc)
         end select
 
       end associate
-      write(iulog,*)'success: ', ioname
 
    end do
  end subroutine init_history_io