re PR fortran/80741 ([Regression 7/8] DTIO wrong code causes incorrect behaviour...