Skip to content

Commit

Permalink
remove unncessary initialization of model_pressure_t
Browse files Browse the repository at this point in the history
There is no early return from this subroutine
  • Loading branch information
hkershaw-brown committed Sep 8, 2023
1 parent 5c87440 commit d799b32
Showing 1 changed file with 0 additions and 2 deletions.
2 changes: 0 additions & 2 deletions models/wrf/model_mod.f90
Original file line number Diff line number Diff line change
Expand Up @@ -1188,8 +1188,6 @@ function model_pressure_t(i,j,k,id,state_handle, ens_size)

integer :: var_idv, var_idt, e

model_pressure_t = missing_r8

! Adapted the code from WRF module_big_step_utilities_em.F ----
! subroutine calc_p_rho_phi Y.-R. Guo (10/20/2004)

Expand Down

0 comments on commit d799b32

Please sign in to comment.