anchor.diff:     CHARACTER(*),  PARAMETER      :: NewLine     = ACHAR(10)                         ! The delimiter for New Lines [ Windows is CHAR(13)//CHAR(10); MAC is CHAR(13); Unix is CHAR(10) {CHAR(13)=\r is a line feed, CHAR(10)=\n is a new line}]
      CHARACTER(*),  PARAMETER      :: OS_Desc     = 'GNU Fortran for Windows'         ! Description of the language/OS
      CHARACTER( 1), PARAMETER      :: PathSep     = '\'                               ! The path separator.
  -   CHARACTER( 1), PARAMETER      :: SwChar      = '/'                               ! The switch character for command-line options.
  +   CHARACTER( 1), PARAMETER      :: SwChar      = '-'                               ! The switch character for command-line options.
      CHARACTER(11), PARAMETER      :: UnfForm     = 'UNFORMATTED'                     ! The string to specify unformatted I/O files.
   
   CONTAINS
  -
  -
   
   !=======================================================================
   FUNCTION FileSize( Unit )
  
positive.code:    RETURN
  END FUNCTION FileSize ! ( Unit )
  !=======================================================================
     FUNCTION Is_NaN( DblNum )
  
     ! This routine determines if a REAL(DbKi) variable holds a proper number.
     ! BJJ: this routine is used in CRUNCH.
  
negative.code:    !     SUBROUTINE  WriteScr ( Str, Frm )
     !     SUBROUTINE LoadDynamicLib( DLL, ErrStat, ErrMsg )
     !     SUBROUTINE FreeDynamicLib( DLL, ErrStat, ErrMsg )
  
     USE NWTC_Base
  
     IMPLICIT NONE
  