Okay I changed the code around a bit. It compiles but the program itself is giving me an error: "STOP ***Input error***" I'm not sure how to fix this.
PROGRAM testx
IMPLICIT NONE
CHARACTER(20) :: FileName
INTEGER :: Count = 0, OpenStatus, InputStatus
REAL :: Y, M...