Skip to content
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

Fix incorrect intents. #201

Closed

Conversation

dustinswales
Copy link
Collaborator

Some inconsistencies in fortran/metadata were discovered when using Capgen. Capgen's Fortran parser uncovered these mismatch in argument intents.

@@ -430,7 +430,7 @@
dimensions = (horizontal_loop_extent,vertical_layer_dimension,number_of_tracers)
type = real
kind = kind_phys
intent = inout
intent = in
Copy link
Collaborator

Choose a reason for hiding this comment

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

no change for save_q

Copy link
Collaborator Author

Choose a reason for hiding this comment

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

The fortran code has this as intent(in). Change is needed here to match

@@ -43,10 +43,10 @@ subroutine GFS_MP_generic_post_run(
integer, intent(in) :: index_of_temperature,index_of_process_mp,use_lake_model(:)
integer, intent(in) :: imfshalcnv,imfshalcnv_gf,imfdeepcnv,imfdeepcnv_gf,imfdeepcnv_samf
integer, dimension (:), intent(in) :: htop
integer :: dfi_radar_max_intervals
integer, intent(in) :: dfi_radar_max_intervals
Copy link
Collaborator

Choose a reason for hiding this comment

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

This variable isn't being used in the code as far as I can tell. Can we just take it out?

Copy link
Collaborator Author

Choose a reason for hiding this comment

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

Done.

Copy link
Collaborator

@grantfirl grantfirl left a comment

Choose a reason for hiding this comment

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

All good catches! Thanks.

@grantfirl
Copy link
Collaborator

@dustinswales I'd like to combine this with other PRs to save on the UFS merge process. Are you OK if I do this? My understanding is that this should not change RT results.

@grantfirl
Copy link
Collaborator

Combined into #205

@grantfirl grantfirl closed this May 15, 2024
@dustinswales dustinswales deleted the cleanup_intents branch January 6, 2025 22:20
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.

5 participants