source: altifloat/matlab_toolbox/arrange_fwd.m~ @ 199

Last change on this file since 199 was 129, checked in by jbrlod, 10 years ago

last version of Varanth

File size: 889 bytes
Line 
1function [ output_args ] = arrange_bck(neededtime )
2
3outfile='../obs_float/generated_fwd.dat';
4load ../obs_float/r_float_obs.dat;
5[d,f]=size(r_float_obs)
6floater1=zeros(d,f);
7
8
9fid = fopen('../obs_float/r_float_obs.dat', 'rb');
10fseek(fid, 0, 'eof');
11fileSize = ftell(fid);
12frewind(fid);
13data = fread(fid, fileSize, 'uint8');
14numLines = sum(data == 10) + 1;
15fclose(fid);
16m=numLines-1;
17n=m/nboffloater;
18count1=1;
19count2=1;
20nboff=3;
21K=neededtime*2
22for i=1:
23    if r_float_obs(i,3)==1
24        floater(count1,:)=r_float_obs(i,:);
25        count1=count1+1;
26    end
27end
28
29for i=1:nboff*K
30    if r_float_obs(i,3)==2
31        floater(count1,:)=r_float_obs(i,:);
32        count1=count1+1;
33    end
34end
35for i=1:nboff*K
36    if r_float_obs(i,3)==3
37        floater(count1,:)=r_float_obs(i,:);
38        count1=count1+1;
39    end
40end
41
42
43
44fid=fopen(outfile,'w');
45fprintf(fid,'%d %d %d %f\n',floater');
46fclose(fid);
Note: See TracBrowser for help on using the repository browser.