diff --git a/.gitmodules b/.gitmodules index f19f95960e..c76c86c8f4 100644 --- a/.gitmodules +++ b/.gitmodules @@ -24,4 +24,4 @@ url = https://github.com/NCAR/MMM-physics.git [submodule "src/core_atmosphere/stochastic_physics"] path = src/core_atmosphere/stochastic_physics - url = https://github.com/dtcenter/stochastic_physics.git + url = https://github.com/dustinswales/stochastic_physics.git diff --git a/src/core_atmosphere/dynamics/mpas_atm_time_integration.F b/src/core_atmosphere/dynamics/mpas_atm_time_integration.F index d49d58d1ea..64ce42708b 100644 --- a/src/core_atmosphere/dynamics/mpas_atm_time_integration.F +++ b/src/core_atmosphere/dynamics/mpas_atm_time_integration.F @@ -881,7 +881,6 @@ subroutine atm_srk3(domain, dt, itimestep, exchange_halo_group) #endif real (kind=RKIND) :: time_dyn_step - character(len=32) :: tend_names(4) integer :: ierr logical, parameter :: debug = .false. @@ -1081,13 +1080,9 @@ subroutine atm_srk3(domain, dt, itimestep, exchange_halo_group) rk_step = 1 dynamics_substep = 1 -! apply random perturbation pattern to the tendency - tend_names(1) = "rucuten" - tend_names(2) = "rvcuten" - tend_names(3) = "rublten" - tend_names(4) = "rvblten" +! apply random perturbation pattern to physics process (hydrostatic) tendencies if (dosppt(domain)) then - call stochastic_physics_pattern_apply(domain, 4, tend_names, ierr) + call stochastic_physics_pattern_apply(domain, 'phys', ierr) endif call physics_get_tend( block, mesh, state, diag, tend, tend_physics, & @@ -1096,11 +1091,9 @@ subroutine atm_srk3(domain, dt, itimestep, exchange_halo_group) exchange_halo_group ) call mpas_timer_stop('physics_get_tend') -! apply random perturbation pattern to the tendency - tend_names(1) = "tend_rtheta_physics" -! tend_names(2) = "tend_rho_physics" +! apply random perturbation pattern to the accumulated (non-hydrostatic) physics tendencies if (dosppt(domain)) then - call stochastic_physics_pattern_apply(domain, 1, tend_names, ierr) + call stochastic_physics_pattern_apply(domain, 'prog', ierr) endif #else #ifndef MPAS_CAM_DYCORE diff --git a/src/core_atmosphere/stochastic_physics b/src/core_atmosphere/stochastic_physics index 2f6eace83f..9533f11ed4 160000 --- a/src/core_atmosphere/stochastic_physics +++ b/src/core_atmosphere/stochastic_physics @@ -1 +1 @@ -Subproject commit 2f6eace83f662db2ee16cad8f831c012e7be92f5 +Subproject commit 9533f11ed4d93cecb0cdf5e71b9cc9de3375a8b7