anchor.diff:        
         CALL WrScr(NewLine) !bjj: I'm printing two blank lines here because MAP seems to be writing over the last line on the screen.
         
  -      InitInData_MAP%filename     =  p_FAST%MooringFile        ! This needs to be set according to what is in the FAST input file. 
  -      InitInData_MAP%gravity      =  InitOutData_ED%Gravity    ! This need to be according to g used in ElastoDyn
  -      InitInData_MAP%sea_density  =  InitOutData_HD%WtrDens    ! This needs to be set according to seawater density in HydroDyn
  -      InitInData_MAP%depth        =  InitOutData_HD%WtrDpth    ! This need to be set according to the water depth in HydroDyn
  -      
  -      InitInData_MAP%C_obj%coupled_to_FAST = .TRUE.      
  +      InitInData_MAP%filename          =  p_FAST%MooringFile        ! This needs to be set according to what is in the FAST input file. 
  +      InitInData_MAP%gravity           =  InitOutData_ED%Gravity    ! This need to be according to g used in ElastoDyn
  +      InitInData_MAP%sea_density       =  InitOutData_HD%WtrDens    ! This needs to be set according to seawater density in HydroDyn
  +      InitInData_MAP%depth             =  InitOutData_HD%WtrDpth    ! This need to be set according to the water depth in HydroDyn
  +      
  +      InitInData_MAP%coupled_to_FAST   = .TRUE.      
         
         CALL MAP_Init( InitInData_MAP, MAP_Input(1), p_MAP,  x_MAP, xd_MAP, z_MAP, OtherSt_MAP, y_MAP, p_FAST%dt_module( MODULE_MAP ), InitOutData_MAP, ErrStat, ErrMsg )
         p_FAST%ModuleInitialized(Module_MAP) = .TRUE.
  
positive.code:       !           do not have direct feedthrough.
        !++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
              
        IF ( p_FAST%CompAero == Module_AD ) THEN
           CALL AD_InputSolve( AD_Input(1), ED_Output(1), MeshMapData, ErrStat, ErrMsg )
              CALL CheckError( ErrStat, 'Message from AD_InputSolve: '//NewLine//ErrMsg  )
           
  
negative.code:                   
        END IF
     
        
        
        IF ( p_FAST%CompHydro == Module_HD ) THEN ! HydroDyn-{ElastoDyn or SubDyn}
           
           
     !-------------------------
     !  HydroDyn <-> ElastoDyn
     !-------------------------            
           IF ( p_FAST%CompSub /= Module_SD ) THEN ! these get mapped to ElastoDyn
                                      
              CALL AllocAry( MeshMapData%Jacobian_ED_SD_HD, SizeJac_ED_HD, SizeJac_ED_HD, 'Jacobian for ED-HD coupling', ErrStat, ErrMsg )
  