I need help with making a FORTRAN module?

I have answered your other copy of this question. The issue is that you have two read statements, each targeting a different liens, hence you are trying to read 10 data lines where there are only 5.