anchor.diff:  #ifdef NO_LibLoad
      CALL SetErrStat( ErrID_Warn,'   -->  Skipping OrcaDLL_End call',ErrStat,ErrMsg,RoutineName )
   #else
  -      ! Release the DLL
  -   CALL C_F_PROCPOINTER( p%DLL_Orca%ProcAddr(3), OrcaDLL_End )
  -   CALL OrcaDLL_End        ! No error handling here.  Just have to assume it worked.
  -
  -
  -   CALL FreeDynamicLib( p%DLL_Orca, ErrStatTmp, ErrMsgTmp )
  -   CALL SetErrStat( ErrStatTmp,ErrMsgTmp,ErrStat,ErrMsg,RoutineName )
  +   if (OtherState%Initialized) then
  +         ! Release the DLL
  +      CALL C_F_PROCPOINTER( p%DLL_Orca%ProcAddr(3), OrcaDLL_End )
  +      CALL OrcaDLL_End        ! No error handling here.  Just have to assume it worked.
  +
  +
  +      CALL FreeDynamicLib( p%DLL_Orca, ErrStatTmp, ErrMsgTmp )
  +      CALL SetErrStat( ErrStatTmp,ErrMsgTmp,ErrStat,ErrMsg,RoutineName )
  +   end if
  +   
   #endif
   
   
  
positive.code:    OtherState%PtfmAM       =  0.0_ReKi
     OtherState%PtfmFt       =  0.0_ReKi
     OtherState%LastTimeStep =  -1.0_DbKi
     OtherState%Initialized  =  .TRUE.
  
     InitOut%Ver =  Orca_Ver
  
  
negative.code:    CALL Orca_DestroyOutput( y, ErrStatTmp, ErrMsgTmp )
     CALL SetErrStat( ErrStatTmp,ErrMsgTmp,ErrStat,ErrMsg,RoutineName )
  
     OtherState%Initialized = .FALSE.
  
  
  END SUBROUTINE Orca_End
  