remove hard-coded three constituents from se dp_coupling

ESCOMP · May 11, 2023 · 4f19dc6 · 4f19dc6
1 parent ef5223d
commit 4f19dc6
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 2 deletions.
diff --git a/Externals.cfg b/Externals.cfg
@@ -21,7 +21,7 @@ externals = Externals.cfg
 required = True
 
 [cmeps]
-tag = cmeps0.14.18
+tag = cmeps0.14.24
 protocol = git
 repo_url = https://github.com/ESCOMP/CMEPS.git
 local_path = components/cmeps

diff --git a/src/dynamics/se/dp_coupling.F90 b/src/dynamics/se/dp_coupling.F90
@@ -288,7 +288,7 @@ subroutine d_p_coupling(cam_runtime_opts, phys_state, phys_tend, dyn_out)
 
    ! Save the tracer fields input to physics package for calculating tendencies
    ! The mixing ratios are all dry at this point.
-   q_prev(1:pcols,1:pver,:) = real(const_data_ptr(1:pcols,1:pver,1:3), r8)
+   q_prev(1:pcols,1:pver,:) = real(const_data_ptr(1:pcols,1:pver,1:num_advected), r8)
 
    call test_mapping_output_phys_state(phys_state,dyn_out%fvm)