Skip to content

Commit

Permalink
IfW: Bug Fix: compute vel avg profile when exceed allowed (#1748)
Browse files Browse the repository at this point in the history
  • Loading branch information
ebranlard authored Aug 25, 2023
1 parent b5084ef commit 1ee714a
Showing 1 changed file with 1 addition and 1 deletion.
2 changes: 1 addition & 1 deletion modules/inflowwind/src/InflowWind.f90
Original file line number Diff line number Diff line change
Expand Up @@ -516,7 +516,7 @@ SUBROUTINE InflowWind_Init( InitInp, InputGuess, p, ContStates, DiscStates, Cons
end if

! Calculate field average if box is allowed to be exceeded
if (p%FlowField%Grid3D%BoxExceedAllowF .and. p%FlowField%Grid3D%BoxExceedAllowIdx > 0) then
if (p%FlowField%Grid3D%BoxExceedAllowF) then
call IfW_Grid3DField_CalcVelAvgProfile(p%FlowField%Grid3D, p%FlowField%AccFieldValid, TmpErrStat, TmpErrMsg)
call SetErrStat(TmpErrStat, TmpErrMsg, ErrStat, ErrMsg, RoutineName)
if (ErrStat >= AbortErrLev) return
Expand Down

0 comments on commit 1ee714a

Please sign in to comment.