Skip to content

Commit

Permalink
remove inserted whitespace for uvelE,N and vvelE,N
Browse files Browse the repository at this point in the history
  • Loading branch information
DeniseWorthen committed Jun 22, 2022
1 parent 9e2dd69 commit cc0f89c
Showing 1 changed file with 4 additions and 4 deletions.
8 changes: 4 additions & 4 deletions cicecore/cicedynB/dynamics/ice_dyn_shared.F90
Original file line number Diff line number Diff line change
Expand Up @@ -244,10 +244,10 @@ subroutine init_dyn (dt)
uvel(i,j,iblk) = c0 ! m/s
vvel(i,j,iblk) = c0 ! m/s
if (grid_ice == 'CD' .or. grid_ice == 'C') then ! extra velocity variables
uvelE (i,j,iblk) = c0
vvelE (i,j,iblk) = c0
uvelN (i,j,iblk) = c0
vvelN (i,j,iblk) = c0
uvelE(i,j,iblk) = c0
vvelE(i,j,iblk) = c0
uvelN(i,j,iblk) = c0
vvelN(i,j,iblk) = c0
endif

! strain rates
Expand Down

0 comments on commit cc0f89c

Please sign in to comment.