Skip to content

Commit 7c5f7c7

Browse files
LluisFByoselita
authored andcommitted
Fix for a do loop index in bep_bem urban code (wrf-model#2196)
TYPE: bug fix KEYWORDS: module_sf_bep_bem.F, loop index, debugging-crash SOURCE: L. Fita (UBA/CIMA/IFAECI) DESCRIPTION OF CHANGES: Problem: The loop index in line 1600 of subroutine module_sf_bep_bem.F should be up to `nzu`, instead of `nz_um`. Solution: This PR fixes the index. ISSUE: For use when this PR closes an issue. Fixes wrf-model#2194 LIST OF MODIFIED FILES: M phys/module_sf_bep_bem.F TESTS CONDUCTED: 1. Code was modified and recompiled in serial debug mode and it did not crashed 2. The Jenkins tests are all passing. RELEASE NOTE: This PR fixed a loop index error in bep_bem urban code.
1 parent 94ad1e4 commit 7c5f7c7

File tree

1 file changed

+1
-1
lines changed

1 file changed

+1
-1
lines changed

phys/module_sf_bep_bem.F

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -1597,7 +1597,7 @@ subroutine BEP1D(itimestep,ix,iy,iurb,kms,kme,kts,kte,z,dt,ua,va,pt,da,pr,pt0,
15971597

15981598

15991599

1600-
do iz=1,nz_um !Compute the outdoor temperature
1600+
do iz=1,nzu !Compute the outdoor temperature
16011601
tmp_u(iz)=pt_u(iz)*(pr_u(iz)/p0)**(rcp_u)
16021602
end do
16031603

0 commit comments

Comments
 (0)