Read out Fortran unformatted file in C

[msz59]

fseek(fp, 4L, SEEK_SET); // <== add this line to skip record length
for (ir=0; ir<50001; ir++) {

[1000KnightsANight]

@msz59 Thanks. It worked now.