anchor.diff:  !   GetVersion = TRIM(GetVersion)//' precision with '//OS_Desc
      GetVersion = TRIM(GetVersion)//' precision'
   
  +   ! add git info
  +   GetVersion = TRIM(GetVersion)//' at commit '//GIT_COMMIT_HASH//' on branch '//GIT_BRANCH
   
      RETURN
   END FUNCTION GetVersion
  
positive.code: end subroutine GetProgramMetadata
  
  !----------------------------------------------------------------------------------------------------------------------------------
  !> 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(GetVersion(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.
  
negative.code:    END SUBROUTINE Cleanup
  
  END SUBROUTINE FAST_InitializeAll
  
  !----------------------------------------------------------------------------------------------------------------------------------
  !> This function returns a string describing the glue code and some of the compilation options we're using.
  FUNCTION GetVersion(ThisProgVer)
  