function oms_watch(inFile);

infile=netcdf(inFile,'nowrite');
time=nctime(infile);
v=var(infile);

Es = 1;
LuMid = 1;
EdBot = 1;
LuBot =1;

   
   for i=1:length(v)

   	name=char(ncnames(infile{i}));
      if strcmp(name(1:2),'Lu')|strcmp(name(1:2),'Ed')
         depth=infile{i}.bank(:);
         switch depth
         case 0
            Es0M(:,Es)=infile{i}(:);
            h=plot(time,Es0M(:,Es),'b.');
      		axis([min(time),max(time),0,(max(Es0M(:,Es))*1.1)]);
            datetick('x')
            title(name)
      		screen2jpeg(name)
            Es=Es+1;
         case 1
            Lu1M(:,LuMid)=infile{i}(:);
            h=plot(time,Lu1M(:,LuMid),'b.');
      		axis([min(time),max(time),0,(max(Lu1M(:,LuMid))*1.1)]);
            datetick('x')
            title(name)
      		screen2jpeg(name)
            LuMid=LuMid+1;         
         case 2
            Ed20M(:,EdBot)=infile{i}(:);
            h=plot(time,Ed20M(:,EdBot),'r.');
      		axis([min(time),max(time),0,(max(Ed20M(:,EdBot))*1.1)]);
            datetick('x')
            title(name)
      		screen2jpeg(name)
            EdBot=EdBot+1;
         case 3
            Lu20M(:,LuBot)=infile{i}(:);
            h=plot(time,Lu20M(:,LuBot),'r.');
      		axis([min(time),max(time),0,(max(Lu20M(:,LuBot))*1.1)]);
            datetick('x')
            title(name)
      		screen2jpeg(name)
            LuBot=LuBot+1;
         end;
      end;
      
   end;
     
   
   
   
   
            
                  
         
      
   

