[Bug fortran/79382] DTIO ICE

[dominiq at lps dot ens.fr]

https://gcc.gnu.org/bugzilla/show_bug.cgi?id=79382

--- Comment #2 from Dominique d'Humieres <dominiq at lps dot ens.fr> ---
The test compiles and executes if I remove the line

   public :: write (formatted)