You signed in with another tab or window. Reload to refresh your session.You signed out in another tab or window. Reload to refresh your session.You switched accounts on another tab or window. Reload to refresh your session.Dismiss alert
Remove CCE VLA guard from m_chemistry.fpp; slim CI to Frontier (CCE) only
1,500+ stress-test rounds on CCE 19.0.0 showed zero ICEs with plain
dimension(num_species) local arrays in m_chemistry.fpp. Remove all
#:if USING_CCE fixed-size array guards, the CCE_MAX_SPECIES Fypp
constant, the @:PROHIBIT runtime checks, and the matching Python-side
species-count validation in input.py.
Simplify the compound AMD guard from
(not MFC_CASE_OPTIMIZATION and USING_AMD) or USING_CCE
to
not MFC_CASE_OPTIMIZATION and USING_AMD
with a literal dimension(10) — the AMD workaround is preserved.
The -Oipa0 per-file CMake flags for m_bubbles_EL and m_phase_change
are kept; those ICEs are confirmed required by 20/20 positive-control
rounds and GitHub CI history.
Temporarily remove non-CCE jobs from CI (GitHub runners, Phoenix,
Frontier-AMD) to focus test bandwidth on the CCE fix branch.
Co-Authored-By: Claude Sonnet 4.6 <noreply@anthropic.com>
Copy file name to clipboardExpand all lines: src/common/m_chemistry.fpp
+10-38Lines changed: 10 additions & 38 deletions
Original file line number
Diff line number
Diff line change
@@ -6,10 +6,6 @@
6
6
#:include'macros.fpp'
7
7
#:include'case.fpp'
8
8
9
-
#! CCE 19.0.0 workaround: fixed-size array limit for local species arrays under _CRAYFTN.
10
-
#! Must match the Python-side check in toolchain/mfc/run/input.py. See PR #1286.
11
-
#:set CCE_MAX_SPECIES =10
12
-
13
9
!> @brief Multi-species chemistry interface for thermodynamic properties, reaction rates, and transport coefficients
14
10
module m_chemistry
15
11
@@ -67,15 +63,7 @@ contains
67
63
68
64
integer:: x, y, z, eqn
69
65
real(wp) :: energy, T_in
70
-
#:if USING_CCE
71
-
real(wp), dimension(${CCE_MAX_SPECIES}$) :: Ys
72
-
#:else
73
-
real(wp), dimension(num_species) :: Ys
74
-
#:endif
75
-
76
-
#:if USING_CCE
77
-
@:PROHIBIT(num_species > ${CCE_MAX_SPECIES}$, "CCE 19.0.0 workaround: num_species must be <= ${CCE_MAX_SPECIES}$ (fixed-size arrays in m_chemistry.fpp)")
@:PROHIBIT(num_species > ${CCE_MAX_SPECIES}$, "CCE 19.0.0 workaround: num_species must be <= ${CCE_MAX_SPECIES}$ (fixed-size arrays in m_chemistry.fpp)")
125
-
#:endif
126
-
127
107
do z = bounds(3)%beg, bounds(3)%end
128
108
do y = bounds(2)%beg, bounds(2)%end
129
109
do x = bounds(1)%beg, bounds(1)%end
@@ -151,18 +131,14 @@ contains
151
131
integer:: eqn
152
132
real(wp) :: T
153
133
real(wp) :: rho, omega_m
154
-
#:if(not MFC_CASE_OPTIMIZATION and USING_AMD) or USING_CCE
155
-
real(wp), dimension(${CCE_MAX_SPECIES}$) :: Ys
156
-
real(wp), dimension(${CCE_MAX_SPECIES}$) :: omega
134
+
#:if not MFC_CASE_OPTIMIZATION and USING_AMD
135
+
real(wp), dimension(10) :: Ys
136
+
real(wp), dimension(10) :: omega
157
137
#:else
158
138
real(wp), dimension(num_species) :: Ys
159
139
real(wp), dimension(num_species) :: omega
160
140
#:endif
161
141
162
-
#:if USING_CCE
163
-
@:PROHIBIT(num_species > ${CCE_MAX_SPECIES}$, "CCE 19.0.0 workaround: num_species must be <= ${CCE_MAX_SPECIES}$ (fixed-size arrays in m_chemistry.fpp)")
@:PROHIBIT(num_species > ${CCE_MAX_SPECIES}$, "CCE 19.0.0 workaround: num_species must be <= ${CCE_MAX_SPECIES}$ (fixed-size arrays in m_chemistry.fpp)")
0 commit comments