-
Notifications
You must be signed in to change notification settings - Fork 55
New issue
Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.
By clicking “Sign up for GitHub”, you agree to our terms of service and privacy statement. We’ll occasionally send you account related emails.
Already on GitHub? Sign in to your account
9 - coupler_chksum_obj, coupler_atmos_tracer_driver_gather_data, coupler_sfc_boundary_layer #123
Conversation
full/full_coupler_mod.F90
Outdated
!! The members of this type point to the model components | ||
type coupler_chksum_type | ||
private | ||
type(coupler_components_type) :: components |
There was a problem hiding this comment.
Choose a reason for hiding this comment
The reason will be displayed to describe this comment to others. Learn more.
are these two of these? Should this point to coupler_components_obj
?
There was a problem hiding this comment.
Choose a reason for hiding this comment
The reason will be displayed to describe this comment to others. Learn more.
it has been changed to a pointer
full/full_coupler_mod.F90
Outdated
!> Function set_component sets the requested component in the coupler_components_type object | ||
!! Users are required to provide the component to be set as an input argument. For example, | ||
!! coupler_components_obj%get_component(Atm) will set coupler_components_obj%Atm = Atm | ||
subroutine set_component(this, set_this_component ) |
There was a problem hiding this comment.
Choose a reason for hiding this comment
The reason will be displayed to describe this comment to others. Learn more.
I would be shocked if this worked. I don't think these types all have overloaded =
There was a problem hiding this comment.
Choose a reason for hiding this comment
The reason will be displayed to describe this comment to others. Learn more.
It has been removed.
In this PR,
Coupler_chksum_obj
of typecoupler_chksum_type
has been added and is used for input argument to coupler subroutines that compute checksums if do_chksum = .True. The purpose of this object is to simplify coupler subroutine arguments list.coupler_atmos_tracer_driver_gather_data
andcoupler_sfc_boundary_layer
have been added.CHECKSUMS were only checked for the first timestep in run "CM4_piControl_C_2x0m15d_432x2a_2997x1o" and agree with those from main.