Skip to content
Open
Changes from all commits
Commits
File filter

Filter by extension

Filter by extension

Conversations
Failed to load comments.
Loading
Jump to
Jump to file
Failed to load files.
Loading
Diff view
Diff view
7 changes: 6 additions & 1 deletion components/eam/src/physics/cam/physpkg.F90
Original file line number Diff line number Diff line change
Expand Up @@ -840,6 +840,12 @@ subroutine phys_init( phys_state, phys_tend, pbuf2d, cam_out )

call check_energy_init(phys_state)

! Initialize energy diagnostic state fields (tc_curr, tc_init, etc.)
! so they aren't left at the Infinity sentinel value for ideal/adiabatic
! physics configurations (e.g. FIDEAL), which return before the call
! further below.
call co2_diags_init(phys_state)

call tracers_init()

! age of air tracers
Expand Down Expand Up @@ -913,7 +919,6 @@ subroutine phys_init( phys_state, phys_tend, pbuf2d, cam_out )
if (co2_transport()) then
call co2_init()
end if
call co2_diags_init(phys_state)

! CAM3 prescribed ozone
if (cam3_ozone_data_on) call cam3_ozone_data_init(phys_state)
Expand Down