diff --git a/src/modules/solver/moduleSolver.f90 b/src/modules/solver/moduleSolver.f90 index e557495..da2c9c4 100644 --- a/src/modules/solver/moduleSolver.f90 +++ b/src/modules/solver/moduleSolver.f90 @@ -518,6 +518,11 @@ MODULE moduleSolver INTEGER, INTENT(in):: t + IF (t == tInitial) THEN + CALL SYSTEM('git rev-parse HEAD > ' // path // folder // '/' // 'fpack_commit.txt') + + END IF + counterOutput = counterOutput + 1 IF (counterOutput >= triggerOutput .OR. & t == tFinal .OR. t == tInitial) THEN