------- Comment #4 from terry at chem dot gu dot se 2008-05-28 02:00 ------- Somewhat reduced testcase that exhibits the same behaviour:
program distgeom implicit none real(kind=8),dimension(7,12)::B real(kind=8),dimension(7,7)::U real(kind=8),dimension(6,12)::dzeta call random_number(U) call random_number(B) write(*,*)'A',U(1,1) dzeta=matmul(U,B) write(*,*)'B',U(1,1) end -- http://gcc.gnu.org/bugzilla/show_bug.cgi?id=36341
