s="keyword">end</span>
0036 fprintf(<span class="string">'%d traces\n'</span>,itrace);
0037 fclose(fid);
0038 pos=[];Shot.t=[];posxz=[];
0039 <span class="keyword">for</span> i=1:length(Shot.loc),
0040     pos=[pos;Shot.x{i}(:);Shot.loc(i)];
0041     posxz=[posxz;Shot.x{i}(:) Shot.z{i}(:)];
0042     Shot.t=[Shot.t;Shot.tt{i}(:)];
0043 <span class="keyword">end</span>
0044 <span class="comment">% pos=round(pos*1000)/1000;posxz=round(posxz*1000)/1000;</span>
0045 Shot.pos=unique(pos,<span class="string">'rows