add optional to conditionally-allocated var in GFS_ccpp_suite_sim_pre

grantfirl · Jun 5, 2024 · 47dec94 · 47dec94
1 parent a1a3872
commit 47dec94
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 1 deletion.
diff --git a/physics/Interstitials/UFS_SCM_NEPTUNE/GFS_ccpp_suite_sim_pre.F90 b/physics/Interstitials/UFS_SCM_NEPTUNE/GFS_ccpp_suite_sim_pre.F90
@@ -40,7 +40,7 @@ subroutine GFS_ccpp_suite_sim_pre_run(do_ccpp_suite_sim, dtend, ntqv, dtidx, dtp
          index_of_temperature, index_of_x_wind, index_of_y_wind
     integer, intent(in), dimension(:,:) :: dtidx
     real(kind_phys), intent(in) :: dtp
-    real(kind_phys), intent(in), dimension(:,:,:) :: dtend
+    real(kind_phys), intent(in), dimension(:,:,:), optional :: dtend
     type(base_physics_process),intent(in) :: physics_process(:)
     integer,         intent(in) :: iactive_T, iactive_u, iactive_v, iactive_q
 

diff --git a/physics/Interstitials/UFS_SCM_NEPTUNE/GFS_ccpp_suite_sim_pre.meta b/physics/Interstitials/UFS_SCM_NEPTUNE/GFS_ccpp_suite_sim_pre.meta
@@ -29,6 +29,7 @@
   type = real
   kind = kind_phys
   intent = in
+  optional = True
 [dtidx]
   standard_name = cumulative_change_of_state_variables_outer_index
   long_name = index of state-variable and process in last dimension of diagnostic tendencies array AKA cumulative_change_index