-
Notifications
You must be signed in to change notification settings - Fork 37
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
add SPP support for G-F deep convection #98
add SPP support for G-F deep convection #98
Conversation
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.
Looks good. Just a small request.
physics/cu_gf_driver.F90
Outdated
rand_clos(:,:) = 0. | ||
else | ||
do i=1,im | ||
spp_wts_cu_deep_tmp=min(max(-1.0, spp_wts_cu_deep(i,1)),1.0) |
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's best to be explicit with the types you are passing to intrinsics.
Replace min(max(-1.0, spp_wts_cu_deep(i,1)),1.0)
With min(max(-1.kind_phys, spp_wts_cu_deep(i,1)),1._kind_phys)
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.
updated as requested. Thanks for the suggestion @dustinswales
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.
@JiliDong-NOAA Thanks for making this change.
@grantfirl testing is complete on ufs-wm PR #1876. Are you able to merge this PR? |
This PR is co-authored with Georg Grell and @haiqinli, including:
Related PRs for FV3 and ufs-weather-model will be submitted shortly.