https://gcc.gnu.org/bugzilla/show_bug.cgi?id=124631
--- Comment #3 from David Binderman <dcb314 at hotmail dot com> --- There is a flag --not-c for creduce. It produces: real, parameter::a(8) = 0 integer, parameter::b = 4 real, parameter::c = 3.0 integer, parameter::d = 1 real::e(8) = eoshift(a,b,c,d) end which is seemingly legal F90 code.
