anchor.diff:        ED_Out_Start = Indx_y_ED_Platform_Start(y_ED, y_FAST) ! start of y_ED%PlatformPtMesh%TranslationDisp field
         
         call Linearize_Point_to_Point( y_ED%PlatformPtMesh, u_MAP%PtFairDisplacement, MeshMapData%ED_P_2_Mooring_P, ErrStat2, ErrMsg2 )
  -      call Assemble_MAP_dUdy_Motions(y_ED%PlatformPtMesh, u_MAP%PtFairDisplacement, MeshMapData%ED_P_2_Mooring_P, MAP_Start, ED_Out_Start, dUdy, .true.)
  +      call Assemble_dUdy_Motions(y_ED%PlatformPtMesh, u_MAP%PtFairDisplacement, MeshMapData%ED_P_2_Mooring_P, MAP_Start, ED_Out_Start, dUdy, onlyTranslationDisp=.true.)
         
      END IF
      
  
positive.code: !!      \vec{a}^S \\
  !!      \vec{\alpha}^S \\
  !! \end{matrix} \right\} \f$
  SUBROUTINE Assemble_dUdy_Motions(y, u, MeshMap, BlockRowStart, BlockColStart, dUdy, skipRotVel)
     TYPE(MeshType),    INTENT(IN)     :: y             !< the output (source) mesh that is transfering motions
     TYPE(MeshType),    INTENT(IN)     :: u             !< the input (destination) mesh that is receiving motions
     TYPE(MeshMapType), INTENT(IN)     :: MeshMap       !< the mesh mapping from y to u
  
negative.code:       col = BlockColStart + y%NNodes*3       ! start of y%Orientation field [skip 1 field with 3 components]
        call SetBlockMatrix( dUdy, MeshMap%dM%fx_p, row, col )
  
  
        if (PRESENT(onlyTranslationDisp)) then
           if (onlyTranslationDisp) return ! destination includes only the translational displacement field, so we'll just return
        end if
  
  
        !*** row for orientation ***
           ! source orientation to destination orientation:
        row = BlockRowStart + u%NNodes*3       ! start of u%Orientation field [skip 1 field with 3 components]
  