anchor.diff:     ErrMsg  = ""
      Echo = .FALSE.
      UnEc = -1
  +   CALL GetPath( InputFile, PriPath )     ! Input files will be relative to the path where the primary input file is located.
   
      CALL GetNewUnit(UnIn,ErrStat2,ErrMsg2)
         CALL SetErrStat( ErrStat2, ErrMsg2, ErrStat, ErrMsg, RoutineName )
      CALL OpenFInpFile(UnIn,InputFile,ErrStat2,ErrMsg2)
         CALL SetErrStat( ErrStat2, ErrMsg2, ErrStat, ErrMsg, RoutineName )
  -
  +      IF (ErrStat >= AbortErrLev) RETURN
  +      
      !-------------------------- HEADER ---------------------------------------------
      CALL ReadCom(UnIn,InputFile,'File Header: Module Version (line 1)',ErrStat2,ErrMsg2,UnEc)
         CALL SetErrStat( ErrStat2, ErrMsg2, ErrStat, ErrMsg, RoutineName )
  
positive.code:    CALL MeshCopy ( SrcMesh  = u%PointLoad      &
                   , DestMesh = y%BldForce       &
                   , CtrlCode = MESH_SIBLING     &
                   , Force           = .TRUE.    &
                   , Moment          = .TRUE.    &
                   , ErrStat  = ErrStat          &
                   , ErrMess  = ErrMsg           )
     CALL MeshCommit ( Mesh    = y%ReactionForce &
                      ,ErrStat = ErrStat         &
                      ,ErrMess = ErrMsg          )
  
negative.code:                    ,ErrStat          = ErrStat            &
                     ,ErrMess          = ErrMsg             )
  
     CALL MeshConstructElement ( Mesh = u%RootMotion            &
                               , Xelement = ELEMENT_POINT      &
                               , P1       = 1                  &
  