%fp=fopen('mystuff.asc','wt');
load nbp0103/nbp103_137;

%sv_1 = repmat(sv_1,13,1);  % test for tiling using repeat matrix

time=sv_1(:,1);

N=length(time);

imax=floor(  (N-1)/250  )  +  1;  % number of panels

for i=1:imax
    i1=(i-1)*250+1;
    i2=i1+249;
    if i2 > N, 
        i2=N;
    end
    
    img = sv_1(i1:i2,8:407)';                                                                                                                               
    
    yaxlab=(0:1.5:599);
    xaxlab=i1:i2;

    figure
    set(gcf,'units','normalized');

    imagesc(xaxlab,yaxlab,img);
    xlabel('time');
    ylabel('depth');
    
    
end    
    
