Skip to content

Commit

Permalink
Read avrswap pitch signal for numerical stability
Browse files Browse the repository at this point in the history
  • Loading branch information
nikhar-abbas committed Nov 6, 2019
1 parent 32ae97d commit 2f0f2fb
Showing 1 changed file with 7 additions and 11 deletions.
18 changes: 7 additions & 11 deletions src/ReadSetParameters.f90
Original file line number Diff line number Diff line change
Expand Up @@ -262,17 +262,13 @@ SUBROUTINE ReadAvrSWAP(avrSWAP, LocalVar)
LocalVar%FA_Acc = avrSWAP(53)
LocalVar%Azimuth = avrSWAP(60)
LocalVar%NumBl = NINT(avrSWAP(61))

! NJA: I think we need to feed back the previous pitch command, rather than use avrSWAP for numerical stability
IF (LocalVar%iStatus == 0) THEN
LocalVar%BlPitch(1) = avrSWAP(4)
LocalVar%BlPitch(2) = avrSWAP(33)
LocalVar%BlPitch(3) = avrSWAP(34)
ELSE
LocalVar%BlPitch(1) = LocalVar%PitCom(1)
LocalVar%BlPitch(2) = LocalVar%PitCom(2)
LocalVar%BlPitch(3) = LocalVar%PitCom(3)
ENDIF
LocalVar%BlPitch(1) = avrSWAP(4)
LocalVar%BlPitch(2) = avrSWAP(33)
LocalVar%BlPitch(3) = avrSWAP(34)
! --- NJA: sometimes feedback bath the previous pitch command helps for numerical stability, sometimes it does not...
! LocalVar%BlPitch(1) = LocalVar%PitCom(1)
! LocalVar%BlPitch(2) = LocalVar%PitCom(2)
! LocalVar%BlPitch(3) = LocalVar%PitCom(3)

END SUBROUTINE ReadAvrSWAP
! -----------------------------------------------------------------------------------
Expand Down

0 comments on commit 2f0f2fb

Please sign in to comment.