seriously broken fortran multi-dimensional arrays

[Michael Snyder]

Mathew Yeates wrote:
> At a place in my code I do
> (gdb) p Tau_mask(itau,imix)
> $9 = .TRUE.
> 
> but if I print the value at the address corresponding to this I get
> x/d 0x2850a40 + 4*(15*74 + 35)
> 0x2851c24:      0
> 
> .FALSE. is the correct value but .TRUE. gets printed.

Can you provide a small test case?