Skip to content

Conversation

HingOng
Copy link

@HingOng HingOng commented Aug 6, 2025

This branch is similar to "clubb_Coriolis" but supports coupling to NCAR CAM

Copy link
Contributor

@vlarson vlarson left a comment

Choose a reason for hiding this comment

The reason will be displayed to describe this comment to others. Learn more.

I'm impressed by how ably you detected so many of the CLUBB coding conventions! I can make the suggested changes if you don't want to or don't have time.

dt ! Timestep length [s]

real( kind = core_rknd ), dimension(ngrdcol), intent(in) :: &
fcory ! Nontraditional Coriolis parameter [s^-1]
Copy link
Contributor

Choose a reason for hiding this comment

The reason will be displayed to describe this comment to others. Learn more.

Could you please give a few lines of description of fcory? How does it differ from fcor? Qualitatively, how does it vary from equator to pole?

!#######################################################################
subroutine advance_clubb_core( gr, nz, ngrdcol, & ! intent(in)
l_implemented, dt, fcor, sfc_elevation, & ! intent(in)
l_implemented, dt, fcor, fcory, sfc_elevation, & ! intent(in)
Copy link
Contributor

Choose a reason for hiding this comment

The reason will be displayed to describe this comment to others. Learn more.

For readability, could you please rename "fcory" to "fcor_y"?

end if


if ( l_nontraditional_Coriolis ) then
Copy link
Contributor

Choose a reason for hiding this comment

The reason will be displayed to describe this comment to others. Learn more.

rtm_min = epsilon( rtm_min ), & ! Value below which rtm will be nudged [kg/kg]
rtm_nudge_max_altitude = 10000._core_rknd ! Highest altitude at which to nudge rtm [m]

integer, parameter :: &
Copy link
Contributor

Choose a reason for hiding this comment

The reason will be displayed to describe this comment to others. Learn more.

How did this code change end up in your pull request? Do you happen to know? I don't see this line in the master branch.

@vlarson vlarson mentioned this pull request Aug 7, 2025
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment
Labels
None yet
Projects
None yet
Development

Successfully merging this pull request may close these issues.

3 participants