When n is huge, we need to not compute the total bytes in INTEGER precision, when it's the default of 32 bits. The fix is trivial:
- WRITE (*,FMT=9050) label(j),n*bytes(j)*nbpw/mintime(j)/1.0D6,
+ WRITE (*,FMT=9050) label(j),n/1.0D6*bytes(j)*nbpw/mintime(j),