Skip to content

Commit

Permalink
Clean up open loop yaw control
Browse files Browse the repository at this point in the history
  • Loading branch information
dzalkind committed Jul 24, 2023
1 parent 547c40d commit 8ec395c
Showing 1 changed file with 1 addition and 9 deletions.
10 changes: 1 addition & 9 deletions ROSCO/src/Controllers.f90
Original file line number Diff line number Diff line change
Expand Up @@ -403,19 +403,11 @@ SUBROUTINE YawRateControl(avrSWAP, CntrPar, LocalVar, objInst, zmqVar, DebugVar,
YawRateCom = 0.0 ! if YawState is not 0, start yawing on the next time step
ENDIF

! If using open loop yaw rate control, overwrite controlled output
! Open loop torque control
IF ((CntrPar%OL_Mode > 0) .AND. (CntrPar%Ind_YawRate > 0)) THEN
IF (LocalVar%Time >= CntrPar%OL_Breakpoints(1)) THEN
avrSWAP(48) = interp1d(CntrPar%OL_Breakpoints,CntrPar%OL_YawRate,LocalVar%Time, ErrVar)
ENDIF
ENDIF

! Output yaw rate command in rad/s
avrSWAP(48) = YawRateCom * D2R

! If using open loop yaw rate control, overwrite controlled output
! Open loop torque control
! Open loop yaw rated control - control input in rad/s
IF ((CntrPar%OL_Mode == 1) .AND. (CntrPar%Ind_YawRate > 0)) THEN
IF (LocalVar%Time >= CntrPar%OL_Breakpoints(1)) THEN
avrSWAP(48) = interp1d(CntrPar%OL_Breakpoints,CntrPar%OL_YawRate,LocalVar%Time, ErrVar)
Expand Down

0 comments on commit 8ec395c

Please sign in to comment.