Skip to content

Commit

Permalink
eCLM: debug output in lnd2atm
Browse files Browse the repository at this point in the history
  • Loading branch information
jjokella committed Dec 9, 2024
1 parent 0dba6d2 commit 71d2dff
Showing 1 changed file with 1 addition and 0 deletions.
1 change: 1 addition & 0 deletions src/clm5/main/lnd2atmMod.F90
Original file line number Diff line number Diff line change
Expand Up @@ -115,6 +115,7 @@ subroutine lnd2atm_minimal(bounds, &
p2c_scale_type='unity', c2l_scale_type= 'urbanf', l2g_scale_type='unity')

do g = bounds%begg,bounds%endg
print *, "g, lnd2atm_inst%eflx_lwrad_out_grc(g)", g, lnd2atm_inst%eflx_lwrad_out_grc(g)
lnd2atm_inst%t_rad_grc(g) = sqrt(sqrt(lnd2atm_inst%eflx_lwrad_out_grc(g)/sb))
end do

Expand Down

0 comments on commit 71d2dff

Please sign in to comment.