anchor.diff:     TYPE(SD_MiscVarType),         INTENT(INOUT)  :: m           !< Misc/optimization variables
      LOGICAL,                      INTENT(IN   )  :: bGuyan      !< include Guyan Contribution
      LOGICAL,                      INTENT(IN   )  :: bElastic    !< include Elastic contribution
  -   REAL(ReKi), DIMENSION(:),     INTENT(  OUT)  :: DU_full      !< LeverArm in full system
  +   REAL(ReKi), DIMENSION(:),     INTENT(  OUT)  :: DU_full     !< LeverArm in full system
      REAL(ReKi), DIMENSION(:), OPTIONAL,   INTENT(IN   )  :: U_full  !< Displacements in full system
      !locals
      INTEGER(IntKi)               :: iSDNode
      REAL(ReKi)                   :: rotations(3)
      INTEGER(IntKi), pointer      :: DOFList(:)
  -   ! Variables for Guayn rigid body motion
  +   ! Variables for Guyan rigid body motion
      real(ReKi), dimension(3)   ::  rIP  ! Vector from TP to rotated Node
      real(ReKi), dimension(3)   ::  rIP0 ! Vector from TP to Node (undeflected)
      real(ReKi), dimension(3)   ::  duP  ! Displacement of node due to rigid rotation
  
positive.code:       endif
  
        ! Compute external force on internal (F_L) and interface nodes (F_I)
        call GetExtForceOnInternalDOF(u, p, x, m, m%F_L, ErrStat2, ErrMsg2, ExtraMoment=(p%ExtraMoment), RotateLoads=.False., U_full=m%U_full); if(Failed()) return
        call GetExtForceOnInterfaceDOF(p, m%Fext, F_I)
  
        ! Compute reaction/coupling force at TP
  
negative.code: 
     if (ExtraMoment) then
        ! Compute node displacements "DU_full" for lever arm
        call LeverArm(u, p, x, m, m%DU_full, bGuyan=.True., bElastic=.False.)!, U_full=U_full)
     endif
  
     ! --- Build vector of external forces (including gravity) (Moment done below)  
  