anchor.diff:      CALL MeshCopy ( SrcMesh  = u%PtFairleadDisplacement , &            !          |
                       DestMesh = y%PtFairleadLoad         , &            !          |
                       CtrlCode = MESH_SIBLING             , &            !          |
  +                    IOS      = COMPONENT_OUTPUT         , &            !          |
                       Force    = .TRUE.                   , &            !          |
                       ErrStat  = ErrStat                  , &            !          |
                       ErrMess  = ErrMsg                     )            !          |
       IF (ErrStat /= ErrID_None) CALL WrScr(TRIM(ErrMsg))                !          |
                                                                          !          |
  -    y%PtFairleadLoad%IOS = COMPONENT_OUTPUT                            !          |
       ! End mesh initialization                                          !   -------+
       !==============================================================================
   
  
positive.code:        RETURN
      END IF
  
      WRITE(*,*) y%writeOutput ! @bonnie : remove
  
      ! Copy the MAP C output types to the native Fortran mesh output types
      DO i = 1,y%PtFairleadLoad%NNodes
  
negative.code:     !           called...
      !CALL DispNVD( InitOut%Ver ) 
      
      ! WRITE(*,*) InitOut%WriteOutputHdr ! @bonnie : this is artificial. Remove.
      ! WRITE(*,*) InitOut%WriteOutputUnt ! @bonnie : this is artificial. Remove.
  
    END SUBROUTINE MAP_Init                                                                        !   -------+
    !==========================================================================================================
  