Skip to content

Commit

Permalink
Comment out negative time error in SetTimeIndex subroutine
Browse files Browse the repository at this point in the history
  • Loading branch information
hkross committed Dec 23, 2024
1 parent 0dfd571 commit 036d848
Showing 1 changed file with 4 additions and 4 deletions.
8 changes: 4 additions & 4 deletions modules/seastate/src/SeaSt_WaveField.f90
Original file line number Diff line number Diff line change
Expand Up @@ -836,10 +836,10 @@ subroutine SetTimeIndex(Time, deltaT, nMax, Indx_Lo, Indx_Hi, isopc, ErrStat, Er
isopc = -1.0
Indx_Lo = 0
Indx_Hi = 0
if ( Time < 0.0_DbKi ) then
CALL SetErrStat(ErrID_Fatal,'Time value must be greater than or equal to zero!',ErrStat,ErrMsg,'SetTimeIndex') !error out if time is outside the lower bounds
RETURN
end if
!if ( Time < 0.0_DbKi ) then
! CALL SetErrStat(ErrID_Fatal,'Time value must be greater than or equal to zero!',ErrStat,ErrMsg,'SetTimeIndex') !error out if time is outside the lower bounds
! RETURN
!end if

! if there are no timesteps, don't proceed
if (EqualRealNos(deltaT,0.0_ReKi) .or. deltaT < 0.0_ReKi) return;
Expand Down

0 comments on commit 036d848

Please sign in to comment.