Skip to content

Commit e4030cd

Browse files
Copilotmahf708
andcommitted
Fix parameter redeclaration bug in vertremap_mod.F90
Co-authored-by: mahf708 <[email protected]>
1 parent ed08d97 commit e4030cd

File tree

1 file changed

+1
-1
lines changed

1 file changed

+1
-1
lines changed

components/homme/src/theta-l/share/vertremap_mod.F90

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -45,7 +45,7 @@ subroutine vertical_remap(hybrid,elem,hvcoord,dt,np1,np1_qdp,nets,nete)
4545
type (hvcoord_t) :: hvcoord
4646
real (kind=real_kind) :: dt
4747

48-
integer :: ie,i,j,k,np1,nets,nete,np1_qdp
48+
integer :: ie,i,j,k
4949
integer :: q
5050

5151
real (kind=real_kind), dimension(np,np,nlev) :: dp,dp_star

0 commit comments

Comments
 (0)