Include argument keyword for better clarity

kuanchihwang · Nov 22, 2024 · dc5d19a · dc5d19a
1 parent 3096c2b
commit dc5d19a
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 2 deletions.
diff --git a/src/dynamics/mpas/dyn_comp.F90 b/src/dynamics/mpas/dyn_comp.F90
@@ -507,7 +507,7 @@ subroutine set_mpas_state_u()
 
             nullify(ucellzonal, ucellmeridional)
 
-            call mpas_dynamical_core % compute_edge_wind(.false.)
+            call mpas_dynamical_core % compute_edge_wind(wind_tendency=.false.)
         end subroutine set_mpas_state_u
 
         !> Set MPAS state `w` (i.e., vertical velocity at cell interfaces).

diff --git a/src/dynamics/mpas/dyn_coupling.F90 b/src/dynamics/mpas/dyn_coupling.F90
@@ -498,7 +498,7 @@ subroutine set_mpas_physics_tendency_ru()
 
             nullify(u_tendency, v_tendency)
 
-            call mpas_dynamical_core % compute_edge_wind(.true.)
+            call mpas_dynamical_core % compute_edge_wind(wind_tendency=.true.)
         end subroutine set_mpas_physics_tendency_ru
 
         !> Set MPAS physics tendency `tend_rho_physics` (i.e., "coupled" tendency of dry air density due to physics).