source: altifloat/matlab_toolbox/twinexp4f.m @ 160

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

last version of Varanth

  • Property svn:executable set to *
File size: 5.9 KB
Line 
1% 1 floater 2 pts
2figure
3ls
4load obs_float_test.dat
5x1=obs_float_test (1:2:40,4)
6y1=obs_float_test (2:2:40,4)
7x1=x1+1;
8y1=y1+1;
9plot(x1(1),y1(1),'+')
10hold on
11plot(x1(20),y1(20),'>')
12hold on
13plot(x1(1:20),y1(1:20),'-r')
14hold on
15x2=obs_float_test (41:2:80,4)
16y2=obs_float_test (42:2:80,4)
17x2=x2+1;
18y2=y2+1;
19plot(x2(1),y2(1),'+')
20hold on
21plot(x2(20),y2(20),'>')
22hold on
23plot(x2(1:20),y2(1:20),'-r')
24hold on
25x3=obs_float_test (81:2:120,4)
26y3=obs_float_test (82:2:120,4)
27x3=x3+1;
28y3=y3+1;
29plot(x3(1),y3(1),'+')
30hold on
31plot(x3(20),y3(20),'>')
32hold on
33plot(x3(1:20),y3(1:20),'-r')
34hold on
35x4=obs_float_test (121:2:160,4)
36y4=obs_float_test (122:2:160,4)
37x4=x4+1;
38y4=y4+1;
39plot(x4(1),y4(1),'+')
40hold on
41plot(x4(20),y4(20),'>')
42hold on
43plot(x4(1:20),y4(1:20),'-r')
44hold on
45
46
47
48load rfloat_total.dat;
49whos;
50rfloat_total(:,:)
51x5=rfloat_total(1:20,4)
52y5=rfloat_total(1:20,3)
53x5=x5+1;
54y5=y5+1;
55plot(x5(2),y5(2),'+')
56hold on
57plot(x5(19),y5(19),'>')
58hold on
59plot(x5(2:19),y5(2:19),'-g')
60hold on
61x6=rfloat_total(21:40,4)
62y6=rfloat_total(21:40,3)
63x6=x6+1;
64y6=y6+1;
65plot(x6(2),y6(2),'+')
66hold on
67plot(x6(19),y6(19),'>')
68hold on
69plot(x6(2:19),y6(2:19),'-g')
70hold on
71ls;
72x7=rfloat_total(41:60,4)
73y7=rfloat_total(41:60,3)
74x7=x7+1;
75y7=y7+1;
76plot(x7(2),y7(2),'+')
77hold on
78plot(x7(19),y7(19),'>')
79hold on
80plot(x7(2:19),y7(2:19),'-g')
81hold on
82ls;
83x8=rfloat_total(61:80,4)
84y8=rfloat_total(61:80,3)
85x8=x8+1;
86y8=y8+1;
87plot(x8(2),y8(2),'+')
88hold on
89plot(x8(19),y8(19),'>')
90hold on
91plot(x8(2:19),y8(2:19),'-g')
92hold on
93ls;
94
95
96load uv_total.dat
97X=uv_total(:,end-3);
98Y=uv_total(:,end-2);
99X=X+1;
100Y=Y+1;
101U1=uv_total(:,end-1);
102V1=uv_total(:,end);
103quiver(X,Y,U1,V1,'r');
104
105
106load vel_bck_all.dat;
107whos;
108X=vel_bck_all(:,end-3);
109Y=vel_bck_all(:,end-2);
110U2=vel_bck_all(:,end-1);
111V2=vel_bck_all(:,end);
112quiver(X,Y,U2,V2,'b');
113
114load vel_next_all.dat;
115whos;
116X=vel_next_all(:,end-3);
117Y=vel_next_all(:,end-2);
118U3=vel_next_all(:,end-1);
119V3=vel_next_all(:,end);
120quiver(X,Y,U3,V3,'g');
121figure
122
123it=find(vel_next_all(:,1)==1);
124T1=reshape(vel_next_all(it,4),58,87);
125it=find(vel_next_all(:,1)==2);
126T2=reshape(vel_next_all(it,4),58,87);
127it=find(vel_next_all(:,1)==3);
128T3=reshape(vel_next_all(it,4),58,87);
129it=find(vel_next_all(:,1)==4);
130T4=reshape(vel_next_all(it,4),58,87);
131it=find(vel_next_all(:,1)==5);
132T5=reshape(vel_next_all(it,4),58,87);
133it=find(vel_next_all(:,1)==6);
134T6=reshape(vel_next_all(it,4),58,87);
135it=find(vel_next_all(:,1)==7);
136T7=reshape(vel_next_all(it,4),58,87);
137it=find(vel_next_all(:,1)==8);
138T8=reshape(vel_next_all(it,4),58,87);
139it=find(vel_next_all(:,1)==9);
140T9=reshape(vel_next_all(it,4),58,87);
141it=find(vel_next_all(:,1)==10);
142T10=reshape(vel_next_all(it,4),58,87);
143it=find(vel_next_all(:,1)==11);
144T11=reshape(vel_next_all(it,4),58,87);
145it=find(vel_next_all(:,1)==12);
146T12=reshape(vel_next_all(it,4),58,87);
147it=find(vel_next_all(:,1)==13);
148T13=reshape(vel_next_all(it,4),58,87);
149it=find(vel_next_all(:,1)==14);
150T14=reshape(vel_next_all(it,4),58,87);
151it=find(vel_next_all(:,1)==15);
152T15=reshape(vel_next_all(it,4),58,87);
153it=find(vel_next_all(:,1)==16);
154T16=reshape(vel_next_all(it,4),58,87);
155it=find(vel_next_all(:,1)==17);
156T17=reshape(vel_next_all(it,4),58,87);
157it=find(vel_next_all(:,1)==18);
158T18=reshape(vel_next_all(it,4),58,87);
159it=find(vel_next_all(:,1)==19);
160T19=reshape(vel_next_all(it,4),58,87);
161
162T=(T1+T2+T3+T4+T5+T6+T7+T8+T9+T10+T11+T12+T13+T14+T15+T16+T17+T18+T19)/19;
163
164it=find(vel_bck_all(:,1)==1);
165A1=reshape(vel_bck_all(it,4),58,87);
166it=find(vel_bck_all(:,1)==2);
167A2=reshape(vel_bck_all(it,4),58,87);
168it=find(vel_bck_all(:,1)==3);
169A3=reshape(vel_bck_all(it,4),58,87);
170it=find(vel_bck_all(:,1)==4);
171A4=reshape(vel_bck_all(it,4),58,87);
172it=find(vel_bck_all(:,1)==5);
173A5=reshape(vel_bck_all(it,4),58,87);
174it=find(vel_bck_all(:,1)==6);
175A6=reshape(vel_bck_all(it,4),58,87);
176it=find(vel_bck_all(:,1)==7);
177A7=reshape(vel_bck_all(it,4),58,87);
178it=find(vel_bck_all(:,1)==8);
179A8=reshape(vel_bck_all(it,4),58,87);
180it=find(vel_bck_all(:,1)==9);
181A9=reshape(vel_bck_all(it,4),58,87);
182it=find(vel_bck_all(:,1)==10);
183A10=reshape(vel_bck_all(it,4),58,87);
184it=find(vel_bck_all(:,1)==11);
185A11=reshape(vel_bck_all(it,4),58,87);
186it=find(vel_bck_all(:,1)==12);
187A12=reshape(vel_bck_all(it,4),58,87);
188it=find(vel_bck_all(:,1)==13);
189A13=reshape(vel_bck_all(it,4),58,87);
190it=find(vel_bck_all(:,1)==14);
191A14=reshape(vel_bck_all(it,4),58,87);
192it=find(vel_bck_all(:,1)==15);
193A15=reshape(vel_bck_all(it,4),58,87);
194it=find(vel_bck_all(:,1)==16);
195A16=reshape(vel_bck_all(it,4),58,87);
196it=find(vel_bck_all(:,1)==17);
197A17=reshape(vel_bck_all(it,4),58,87);
198it=find(vel_bck_all(:,1)==18);
199A18=reshape(vel_bck_all(it,4),58,87);
200it=find(vel_bck_all(:,1)==19);
201A19=reshape(vel_bck_all(it,4),58,87);
202
203A=(A1+A2+A3+A4+A5+A6+A7+A8+A9+A10+A11+A12+A13+A14+A15+A16+A17+A18+A19)/19;
204F=A.^2-T.^2
205imagesc(F)
206
207figure
208it=find(uv_total(:,1)==1);
209I1=reshape(uv_total(it,4),58,87);
210it=find(uv_total(:,1)==2);
211I2=reshape(uv_total(it,4),58,87);
212it=find(uv_total(:,1)==3);
213I3=reshape(uv_total(it,4),58,87);
214it=find(uv_total(:,1)==4);
215I4=reshape(uv_total(it,4),58,87);
216it=find(uv_total(:,1)==5);
217I5=reshape(uv_total(it,4),58,87);
218it=find(uv_total(:,1)==6);
219I6=reshape(uv_total(it,4),58,87);
220it=find(uv_total(:,1)==7);
221I7=reshape(uv_total(it,4),58,87);
222it=find(uv_total(:,1)==8);
223I8=reshape(uv_total(it,4),58,87);
224it=find(uv_total(:,1)==9);
225I9=reshape(uv_total(it,4),58,87);
226it=find(uv_total(:,1)==10);
227I10=reshape(uv_total(it,4),58,87);
228it=find(uv_total(:,1)==11);
229I11=reshape(uv_total(it,4),58,87);
230it=find(uv_total(:,1)==12);
231I12=reshape(uv_total(it,4),58,87);
232it=find(uv_total(:,1)==13);
233I13=reshape(uv_total(it,4),58,87);
234it=find(uv_total(:,1)==14);
235I14=reshape(uv_total(it,4),58,87);
236it=find(uv_total(:,1)==15);
237I15=reshape(uv_total(it,4),58,87);
238it=find(uv_total(:,1)==16);
239I16=reshape(uv_total(it,4),58,87);
240it=find(uv_total(:,1)==17);
241I17=reshape(uv_total(it,4),58,87);
242it=find(uv_total(:,1)==18)
243I18=reshape(uv_total(it,4),58,87);
244it=find(uv_total(:,1)==19)
245I19=reshape(uv_total(it,4),58,87);
246
247I=(I1+I2+I3+I4+I5+I6+I7+I8+I9+I10+I11+I12+I13+I14+I15+I16+I17+I18+I19)/19;
248F1=A.^2-I.^2;
249imagesc(F1)
250
251F2=I.^2-T.^2;
252figure
253imagesc(F2)
Note: See TracBrowser for help on using the repository browser.