clear all
s1 = RandStream('mt19937ar','Seed',1);
s2 = RandStream('mt19937ar','Seed',2);
dims = [40,30,20,10];
data = randn(s1,dims,'single')+1i*randn(s2,dims,'single');
x = data(:,:,:,2);
y = squeeze(x(2,:,:));
X = squeeze(x(2,:,:))*squeeze(x(2,:,:))';
Y = y*y';
spy(X == Y)
isequal(X,X')
isequal(Y,Y')