--- MITgcm_contrib/osse/utils/dispens.m	2004/06/16 21:13:32	1.2
+++ MITgcm_contrib/osse/utils/dispens.m	2004/06/18 16:23:52	1.3
@@ -3,11 +3,13 @@
 
 xframe=6;
 yframe=5;
-var=reshape(mem(:,V,:),[nx ny nz nens]);
 
-for i=1:nens
-  subplot(yframe,xframe,i);
-  imagesc(var(:,:,z,i));colorbar;
-  title(sprintf('%s%i','member ',i));
+for j=1:varnum
+  var=reshape(mem(:,j,:),[nx ny nz nens]);
+  figure(j);
+  for i=1:nens
+    subplot(yframe,xframe,i);
+    imagesc(var(:,:,z,i));colorbar;
+    title(sprintf('%s%i','member ',i));
+  end
 end
-