PR fortran/30073