Update src/ice_nucleation.F90

Co-authored-by: Jeffrey Curtis <[email protected]>
compdyn · Dec 3, 2024 · 62c297b · 62c297b
1 parent 6d3dd98
commit 62c297b
Showing 1 changed file with 0 additions and 1 deletion.
diff --git a/src/ice_nucleation.F90 b/src/ice_nucleation.F90
@@ -117,7 +117,6 @@ subroutine singular_initialize(aero_state, aero_data)
             temp = (log(1 - p) + exp(-S * exp(-a_INAS * T0 + b_INAS))) / (-S)
             aero_state%apa%particle(i_part)%imf_temperature = T0 + (log(temp) &
                      - b_INAS) / a_INAS
-            !print*, aerosol_diameter, aero_state%apa%particle(i_part)%imf_temperature
         end do
     end subroutine singular_initialize