diff --git a/source/model/turb_mod.f90 b/source/model/turb_mod.f90 index 65f678732483f779086d91d027938d2b21baf1fb..6ad5857b63c3f9a86ff7dba997e8287d017f2d12 100644 --- a/source/model/turb_mod.f90 +++ b/source/model/turb_mod.f90 @@ -996,7 +996,6 @@ allocate (rhotemp(1:M), rhosal(1:M)) do i = 1, M KT(i) = max(CEt(i)*E2(i)**2/(eps2(i) + ACCk),min_diff)*cw_m_row0 !E2, eps2 enddo - !print*, maxval(KT)/cw_m_row0, maxval(k2), maxval(CEt), maxval(CE) ! Diagnostic calculation !Turbulent transport of TKE