https://gcc.gnu.org/bugzilla/show_bug.cgi?id=116254
--- Comment #5 from Paul Thomas <pault at gcc dot gnu.org> --- Created attachment 58857 --> https://gcc.gnu.org/bugzilla/attachment.cgi?id=58857&action=edit reduced testscase On x86_64, the attached gives: [pault@pc30 pr79685]$ ~/grun/bin/gfortran -O3 -m32 ../pr102689/class_transformational_2.f90;./a.out shape (c) = 4 2 2 a%i = 1 1 1 1 2 2 2 2 1 1 1 1 2 2 2 2 a%j = 10 10 10 10 20 20 20 20 10 10 10 10 20 20 20 20 What do you obtain? Paul