osse/utils/dispens.m

z=15;
ensvar=memu;
%ensvar=memv;
%ensvar=memw;
%ensvar=memp;


xframe=6;
yframe=5;
var=reshape(ensvar,[nx ny nz nens]);

for i=1:nens
  subplot(yframe,xframe,i);
  imagesc(var(:,:,z,i));colorbar;
  title(sprintf('%s%i','member ',i));
end

1	z=15;
2	ensvar=memu;
3	%ensvar=memv;
4	%ensvar=memw;
5	%ensvar=memp;
6
7
8	xframe=6;
9	yframe=5;
10	var=reshape(ensvar,[nx ny nz nens]);
11
12	for i=1:nens
13	subplot(yframe,xframe,i);
14	imagesc(var(:,:,z,i));colorbar;
15	title(sprintf('%s%i','member ',i));
16	end
17