anchor.diff:     ! LIN-TODO: Implement
      if ( p_FAST%CompMooring == Module_MAP ) then 
   
  -      ED_Start_mt = y_FAST%Lin%Modules(MODULE_ED)%Instance(1)%LinStartIndx(LIN_INPUT_COL)
  -      if (allocated(u_ED%BladePtLoads)) then
  -         do i=1,size(u_ED%BladePtLoads)
  -            ED_Start_mt = ED_Start_mt + u_ED%BladePtLoads(i)%NNodes * 6  ! 3 forces + 3 moments at each node on each blade
  -         end do      
  -      end if
  -      ED_Start_mt = ED_Start_mt + u_ED%PlatformPtMesh%NNodes * 3         ! 3 forces at each node (we're going to start at the moments)
  -            
  +      ED_Start_mt = Indx_u_ED_Platform_Start(u_ED, y_FAST) &
  +                     + u_ED%PlatformPtMesh%NNodes * 3         ! 3 forces at each node (we're going to start at the moments)
         
            ! Transfer MAP loads to ED PlatformPtmesh input:
            ! we're mapping loads, so we also need the sibling meshes' displacements:
  
positive.code:             ! we're just going to assume u_ED%PlatformPtMesh is committed
                 
           if ( HD%y%AllHdroOrigin%Committed  ) then ! meshes for floating
  
              ED_Start_mt = y_FAST%Lin%Modules(MODULE_ED)%Instance(1)%LinStartIndx(LIN_INPUT_COL)
              if (allocated(u_ED%BladePtLoads)) then
                 do i=1,size(u_ED%BladePtLoads)
                    ED_Start_mt = ED_Start_mt + u_ED%BladePtLoads(i)%NNodes * 6  ! 3 forces + 3 moments at each node on each blade
                 end do      
              end if
              ED_Start_mt = ED_Start_mt + u_ED%PlatformPtMesh%NNodes * 3         ! 3 forces at each node (we're going to start at the moments)
              
                 ! Transfer HD load outputs to ED PlatformPtMesh input:
                 ! we're mapping loads, so we also need the sibling meshes' displacements:
              if ( HD%Input(1)%Morison%DistribMesh%Committed ) then
                 HD_Start = y_FAST%Lin%Modules(MODULE_HD)%Instance(1)%LinStartIndx(LIN_INPUT_COL)
                 HD_Start = HD_Start + HD%Input(1)%Morison%DistribMesh%NNodes * 18      &      ! 3 TranslationDisp, Orientation, TranslationVel, RotationVel, TranslationAcc, and RotationAcc at each node     
                                     + HD%Input(1)%Morison%LumpedMesh%NNodes  * 18             ! 3 TranslationDisp, Orientation, TranslationVel, RotationVel, TranslationAcc, and RotationAcc at each node     
              end if
              
              call Linearize_Point_to_Point( HD%y%AllHdroOrigin, u_ED%PlatformPtMesh, MeshMapData%HD_W_P_2_ED_P, ErrStat2, ErrMsg2, HD%Input(1)%Mesh, y_ED%PlatformPtMesh) !HD%Input(1)%Mesh and y_ED%PlatformPtMesh contain the displaced positions for load calculations
                 call SetErrStat(ErrStat2,ErrMsg2, ErrStat, ErrMsg, RoutineName)
  
negative.code:       ! ED inputs on tower from AD:
        
        IF ( y_AD%TowerLoad%Committed ) THEN
           ED_Start_mt = Indx_u_ED_Tower_Start(u_ED, y_FAST) &
                         + u_ED%TowerPtLoads%NNodes   * 3             ! 3 forces at each node (we're going to start at the moments)
           
           CALL Linearize_Line2_to_Point( y_AD%TowerLoad, u_ED%TowerPtLoads, MeshMapData%AD_L_2_ED_P_T, ErrStat2, ErrMsg2, u_AD%TowerMotion, y_ED%TowerLn2Mesh )
              CALL SetErrStat(ErrStat2, ErrMsg2, ErrStat, ErrMsg, RoutineName)  
  