anchor.diff:     !......................................................
      ! Set the description lines to be printed in the output file
      !......................................................
  -   y_FAST%FileDescLines(1)  = 'Predictions were generated on '//CurDate()//' at '//CurTime()//' using '//TRIM(GetVersion())
  +   y_FAST%FileDescLines(1)  = 'Predictions were generated on '//CurDate()//' at '//CurTime()//' using '//TRIM(GetVersion(FAST_Ver))
      y_FAST%FileDescLines(2)  = 'linked with ' //' '//TRIM(GetNVD(NWTC_Ver            ))  ! we'll get the rest of the linked modules in the section below
      y_FAST%FileDescLines(3)  = 'Description from the FAST input file: '//TRIM(p_FAST%FTitle)
      
  
positive.code: END SUBROUTINE FAST_InitializeAll
  !----------------------------------------------------------------------------------------------------------------------------------
  !> This function returns a string describing the glue code and some of the compilation options we're using.
  FUNCTION GetVersion()
  
     ! Passed Variables:
  
     CHARACTER(1024)  :: GetVersion                      !< String containing a description of the compiled precision.
  
     GetVersion = TRIM(GetNVD(FAST_Ver))//', compiled'
  
     IF ( Cmpl4SFun )  THEN     ! FAST has been compiled as an S-Function for Simulink
        GetVersion = TRIM(GetVersion)//' as a DLL S-Function for Simulink'
  
negative.code:    RETURN
  END FUNCTION GetVersion
  !----------------------------------------------------------------------------------------------------------------------------------
  !> This subroutine is called at the start (or restart) of a FAST program (or FAST.Farm). It initializes the NWTC subroutine library,
  !! displays the copyright notice, and displays some version information (including addressing scheme and precision).
  SUBROUTINE FAST_ProgStart(ThisProgVer)
     TYPE(ProgDesc), INTENT( IN    ) :: ThisProgVer     !< program name/date/version description
  
     
        ! ... Initialize NWTC Library (open console, set pi constants) ...
     CALL NWTC_Init( ProgNameIN=ThisProgVer%Name, EchoLibVer=.FALSE. )       ! sets the pi constants, open console for output, etc...
     
        ! Display the copyright notice
     CALL DispCopyrightLicense( ThisProgVer )
  
        ! Tell our users what they're running
     CALL WrScr( ' Running '//TRIM(GetNVD(ThisProgVer))//NewLine//' linked with '//TRIM( GetNVD( NWTC_Ver ))//NewLine )
     
  END SUBROUTINE FAST_ProgStart
  !----------------------------------------------------------------------------------------------------------------------------------
  !> This routine gets the name of the FAST input file from the command line. It also returns a logical indicating if this there
  !! was a "DWM" argument after the file name.
  SUBROUTINE GetInputFileName(InputFile,UseDWM,ErrStat,ErrMsg)
     CHARACTER(*),             INTENT(OUT)           :: InputFile         !< A CHARACTER string containing the name of the primary FAST input file (if not present, we'll get it from the command line)
     LOGICAL,                  INTENT(OUT)           :: UseDWM            !< whether the last argument from the command line is "DWM"
     INTEGER(IntKi),           INTENT(OUT)           :: ErrStat           !< Error status
     CHARACTER(*),             INTENT(OUT)           :: ErrMsg            !< Error message
     
     INTEGER(IntKi)                                  :: ErrStat2          ! local error stat
     CHARACTER(1024)                                 :: LastArg           ! A second command-line argument that will allow DWM module to be used in AeroDyn
     
     ErrStat = ErrID_None
     ErrMsg = ''
     
     UseDWM = .FALSE.  ! by default, we're not going to use the DWM module
     InputFile = ""  ! initialize to empty string to make sure it's input from the command line
     CALL CheckArgs( InputFile, ErrStat2, LastArg )  ! if ErrStat2 /= ErrID_None, we'll ignore and deal with the problem when we try to read the input file
        
     IF (LEN_TRIM(InputFile) == 0) THEN ! no input file was specified
        ErrStat = ErrID_Fatal
        ErrMsg  = 'The required input file was not specified on the command line.'
  
           !bjj:  if people have compiled themselves, they should be able to figure out the file name, right?         
        IF (BITS_IN_ADDR==32) THEN
           CALL NWTC_DisplaySyntax( InputFile, 'FAST_Win32.exe' )
        ELSEIF( BITS_IN_ADDR == 64) THEN
           CALL NWTC_DisplaySyntax( InputFile, 'FAST_x64.exe' )
        ELSE
           CALL NWTC_DisplaySyntax( InputFile, 'FAST.exe' )
        END IF
           
        RETURN
     END IF            
        
     IF (LEN_TRIM(LastArg) > 0) THEN ! see if DWM was specified as the second option
        CALL Conv2UC( LastArg )
        IF ( TRIM(LastArg) == "DWM" ) THEN
           UseDWM    = .TRUE.
        END IF
     END IF   
     
  END SUBROUTINE GetInputFileName
  !----------------------------------------------------------------------------------------------------------------------------------
  !> This subroutine checks for command-line arguments, gets the root name of the input files
  !! (including full path name), and creates the names of the output files.
  SUBROUTINE FAST_Init( p, y_FAST, t_initial, InputFile, ErrStat, ErrMsg, TMax, TurbID  )
  
        IMPLICIT                        NONE
  
  