anchor.diff:  
     !==========   MAP_CalcOutput   ======     <---------------------------------------------------------------+  
     SUBROUTINE MAP_CalcOutput( t, u, p, x, xd, z, O, y, ErrStat, ErrMsg )    
  -    REAL(DbKi)                      , INTENT(INOUT) :: t
  +    REAL(DbKi)                      , INTENT(IN   ) :: t
       TYPE( MAP_InputType )           , INTENT(INOUT) :: u       ! INTENT(IN   )
       TYPE( MAP_ParameterType )       , INTENT(INOUT) :: p       ! INTENT(IN   )
       TYPE( MAP_ContinuousStateType ) , INTENT(INOUT) :: x       ! INTENT(IN   )
  
positive.code:     !CALL CheckError(ErrStat2,ErrMsg2)
      !IF ( ErrStat >= AbortErrLev ) RETURN
              
      CALL MAP_Input_ExtrapInterp(u, utimes, u_interp, t, ErrStat, ErrMsg)
      !CALL CheckError(ErrStat2,ErrMsg2)
      !IF ( ErrStat >= AbortErrLev ) RETURN
  
  
negative.code:     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))                !          |
                                                                         !          |
      ! End mesh initialization                                          !   -------+
      !==============================================================================
  
  
      ! Give the program discription (name, version number, date)
      InitOut%MAP_version = InitOut%C_obj%MAP_version
      CALL RemoveNullChar( InitOut%MAP_version )
  
      InitOut%MAP_date = InitOut%C_obj%MAP_date
      CALL RemoveNullChar( InitOut%MAP_date )
  
      InitOut%Ver = ProgDesc('MAP',InitOut%MAP_version,InitOut%MAP_date)
  
  !@marco 9/28: add this when you add dt to your parameters:    
      !p%dt = interval
  
      ! @bonnie : everything below this line is just garbage. It will probably be removed from the source when final merging between 
      !           FAST and MAP occurs. This is only being printed to see evidence of these 'features'. I guess this is what they are 
  