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

Add explicit types to literals in COARE ocean surface flux scheme #3153

Merged
merged 1 commit into from
Sep 20, 2019

Conversation

JackReevesEyre
Copy link
Contributor

The COARE ocean surface flux scheme had un-typed literals (including some in functions that caused a build issue on Summit). This change adds explicit types - in most cases converting to "_R8" reals. This shouldn't affect the climate of "out of the box" cases (which use a different ocean surface flux scheme). But, when using the COARE scheme (ocn_surface_flux_scheme = 1 in user_nl_cpl), it is non-BFB with the earlier COARE implementation.

Fixes #3105

[BFB] [FCC]

The COARE ocean surface flux scheme had a large number of un-typed
literals (including some in functions that caused a build issue on
Summit). This change converts most to "_R8". This shouldn't affect
the climate of "out of the box" cases (which use a different ocean
surface flux scheme), but may be non-BFB with the original COARE
implementation. This needs to be tested.

[BFB] - Bit-For-Bit
? [FCC] - Flag Climate Changing

Issue number 3105
@JackReevesEyre JackReevesEyre added bug fix PR BFB PR leaves answers BFB Stealth PR has feature which, if turned on, could change climate. fka FCC CIME labels Aug 23, 2019
@JackReevesEyre
Copy link
Contributor Author

This commit has been tested on Summit (@dqwu) and fixed the IBM XL compiler build failures.

It has been tested on Anvil with the COARE scheme active (i.e., ocn_surface_flux_scheme = 1 in user_nl_cpl): it built and ran successfully but gave different answers to the pre-bug fix version (due to changed types/kinds of some constants).

@dqwu
Copy link
Contributor

dqwu commented Sep 17, 2019

@kaizhangpnl @singhbalwinder
I think this PR is ready to be merged to next and master.

@kaizhangpnl
Copy link
Contributor

Sorry, I missed the notification (to review the commit). Just approved it.

@singhbalwinder
Copy link
Contributor

Thanks! I will merge it today.

singhbalwinder added a commit that referenced this pull request Sep 19, 2019
Add explicit types to literals in COARE ocean surface flux scheme

The COARE ocean surface flux scheme had un-typed literals (including
some in functions that caused a build issue on Summit). This change
adds explicit types - in most cases converting to "_R8" reals. This
shouldn't affect the climate of "out of the box" cases (which use a
different ocean surface flux scheme). But, when using the COARE
scheme (ocn_surface_flux_scheme = 1 in user_nl_cpl), it is non-BFB
with the earlier COARE implementation.

Fixes #3105

[BFB] [FCC]

* jackreeveseyre/cime/sfc_flux_bug_fix:
  Adds explicit types to literals in COARE ocean surface flux scheme.
@singhbalwinder
Copy link
Contributor

Pushed to next

singhbalwinder added a commit that referenced this pull request Sep 20, 2019
Add explicit types to literals in COARE ocean surface flux scheme

The COARE ocean surface flux scheme had un-typed literals (including
some in functions that caused a build issue on Summit). This change
adds explicit types - in most cases converting to "_R8" reals. This
shouldn't affect the climate of "out of the box" cases (which use a
different ocean surface flux scheme). But, when using the COARE
scheme (ocn_surface_flux_scheme = 1 in user_nl_cpl), it is non-BFB
with the earlier COARE implementation.

Fixes #3105

[BFB] [FCC]

* jackreeveseyre/cime/sfc_flux_bug_fix:
  Adds explicit types to literals in COARE ocean surface flux scheme.
@singhbalwinder singhbalwinder merged commit 14ae374 into master Sep 20, 2019
minxu74 added a commit that referenced this pull request Sep 20, 2019
With PR #3153 and #3184 locally merged for testing, there are
still build errors reported by IBM XL compiler on Summit.

This PR fixes the following build errors for IBM compiler:
1511-077 (E) ELSEWHERE statement is in error.
1513-041 (S) Arguments of the wrong type were specified
for the INTRINSIC procedure "max".
1515-019 (S) Syntax is incorrect.
1515-021 (E) Syntax error: Token " & " is expected.
1515-022 (S) Syntax Error: Extra token " , " was found.

[BFB]

* dqwu/fixes_for_summit:
  Fixing some build errors for IBM XL compiler on Summit
minxu74 added a commit that referenced this pull request Sep 23, 2019
With PR #3153 and #3184 locally merged for testing, there are still build errors reported by IBM XL compiler on Summit.

This PR fixes the following build errors for IBM compiler:
1511-077 (E) ELSEWHERE statement is in error.
1513-041 (S) Arguments of the wrong type were specified for the INTRINSIC procedure "max".
1515-019 (S) Syntax is incorrect.
1515-021 (E) Syntax error: Token " & " is expected.
1515-022 (S) Syntax Error: Extra token " , " was found.

[BFB]
rljacob pushed a commit that referenced this pull request May 6, 2021
Add explicit types to literals in COARE ocean surface flux scheme

The COARE ocean surface flux scheme had un-typed literals (including
some in functions that caused a build issue on Summit). This change
adds explicit types - in most cases converting to "_R8" reals. This
shouldn't affect the climate of "out of the box" cases (which use a
different ocean surface flux scheme). But, when using the COARE
scheme (ocn_surface_flux_scheme = 1 in user_nl_cpl), it is non-BFB
with the earlier COARE implementation.

Fixes #3105

[BFB] [FCC]

* jackreeveseyre/cime/sfc_flux_bug_fix:
  Adds explicit types to literals in COARE ocean surface flux scheme.
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment
Labels
BFB PR leaves answers BFB bug fix PR CIME Stealth PR has feature which, if turned on, could change climate. fka FCC
Projects
None yet
Development

Successfully merging this pull request may close these issues.

shr_flux_mod.F90: Missing explicit typing of constants (Causes build failure on Summit)
5 participants