diff --git a/src/fortran.cpp b/src/fortran.cpp
index e497ff1..679f409 100644
--- a/src/fortran.cpp
+++ b/src/fortran.cpp
@@ -79,6 +79,7 @@ int64_t UnformattedRead::position() const
 void UnformattedRead::seek(int64_t pos)
 {
   f->seekg(pos, istream::beg);
+  checkPointRef = checkPointAccum = 0;
 }
 
 // Todo implement primitive description