diff --git a/lib/hint65.f90 b/lib/hint65.f90 index adbfcdd96..48e1f1847 100644 --- a/lib/hint65.f90 +++ b/lib/hint65.f90 @@ -147,9 +147,9 @@ subroutine hint65(s3,mrs,mrs2,nadd,nflip,mycall,hiscall,hisgrid,qual,decoded) enddo !### Just in case ??? - rewind 77 - write(77,*) u1,u2,ipk,ipk2 - call flush(77) +! rewind 77 +! write(77,*) u1,u2,ipk,ipk2 +! call flush(77) !### decoded=' '