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:    REAL(DbKi),                   INTENT(IN   )  :: t           ! Current simulation time in seconds
     TYPE(BD_InputType),           INTENT(INOUT)  :: u           ! Inputs at t
     TYPE(BD_ParameterType),       INTENT(IN   )  :: p           ! Parameters
     TYPE(BD_ContinuousStateType), INTENT(INOUT)  :: x           ! Continuous states at t
     TYPE(BD_DiscreteStateType),   INTENT(IN   )  :: xd          ! Discrete states at t
     TYPE(BD_ConstraintStateType), INTENT(IN   )  :: z           ! Constraint states at t
     TYPE(BD_OtherStateType),      INTENT(INOUT)  :: OtherState  ! Other/optimization states
  
negative.code:                          , ErrStat   = ErrStat      &
                           , ErrMess   = ErrMsg       )
  
  
     DO i=1,p%elem_total
         DO j=1,p%node_elem
  