1 | % initialisation
|
---|
2 | clear; close all;
|
---|
3 | % 122 9 64 128
|
---|
4 |
|
---|
5 | cd('GEOPOT_TROP');
|
---|
6 |
|
---|
7 | hgt500=zeros(122,29,64,128);
|
---|
8 |
|
---|
9 | ncload('zg_d.TrNQIVIV.197106-09.nc','zg');
|
---|
10 | vm(:,:,:)=zg(:,6,:,:); clear zg;
|
---|
11 | hgt500(:,1,:,:)=vm; clear vm;
|
---|
12 |
|
---|
13 | ncload('zg_d.TrNQIVIV.197206-09.nc','zg');
|
---|
14 | vm(:,:,:)=zg(:,6,:,:); clear zg;
|
---|
15 | hgt500(:,2,:,:)=vm; clear vm;
|
---|
16 |
|
---|
17 | ncload('zg_d.TrNQIVIV.197306-09.nc','zg');
|
---|
18 | vm(:,:,:)=zg(:,6,:,:); clear zg;
|
---|
19 | hgt500(:,3,:,:)=vm; clear vm;
|
---|
20 |
|
---|
21 | ncload('zg_d.TrNQIVIV.197406-09.nc','zg');
|
---|
22 | vm(:,:,:)=zg(:,6,:,:); clear zg;
|
---|
23 | hgt500(:,4,:,:)=vm; clear vm;
|
---|
24 |
|
---|
25 | ncload('zg_d.TrNQIVIV.197506-09.nc','zg');
|
---|
26 | vm(:,:,:)=zg(:,6,:,:); clear zg;
|
---|
27 | hgt500(:,5,:,:)=vm; clear vm;
|
---|
28 |
|
---|
29 | ncload('zg_d.TrNQIVIV.197606-09.nc','zg');
|
---|
30 | vm(:,:,:)=zg(:,6,:,:); clear zg;
|
---|
31 | hgt500(:,6,:,:)=vm; clear vm;
|
---|
32 |
|
---|
33 | ncload('zg_d.TrNQIVIV.197706-09.nc','zg');
|
---|
34 | vm(:,:,:)=zg(:,6,:,:); clear zg;
|
---|
35 | hgt500(:,7,:,:)=vm; clear vm;
|
---|
36 |
|
---|
37 | ncload('zg_d.TrNQIVIV.197806-09.nc','zg');
|
---|
38 | vm(:,:,:)=zg(:,6,:,:); clear zg;
|
---|
39 | hgt500(:,8,:,:)=vm; clear vm;
|
---|
40 |
|
---|
41 | ncload('zg_d.TrNQIVIV.197906-09.nc','zg');
|
---|
42 | vm(:,:,:)=zg(:,6,:,:); clear zg;
|
---|
43 | hgt500(:,9,:,:)=vm; clear vm;
|
---|
44 |
|
---|
45 | ncload('zg_d.TrNQIVIV.198006-09.nc','zg');
|
---|
46 | vm(:,:,:)=zg(:,6,:,:); clear zg;
|
---|
47 | hgt500(:,10,:,:)=vm; clear vm;
|
---|
48 |
|
---|
49 | ncload('zg_d.TrNQIVIV.198106-09.nc','zg');
|
---|
50 | vm(:,:,:)=zg(:,6,:,:); clear zg;
|
---|
51 | hgt500(:,11,:,:)=vm; clear vm;
|
---|
52 |
|
---|
53 | ncload('zg_d.TrNQIVIV.198206-09.nc','zg');
|
---|
54 | vm(:,:,:)=zg(:,6,:,:); clear zg;
|
---|
55 | hgt500(:,12,:,:)=vm; clear vm;
|
---|
56 |
|
---|
57 | ncload('zg_d.TrNQIVIV.198306-09.nc','zg');
|
---|
58 | vm(:,:,:)=zg(:,6,:,:); clear zg;
|
---|
59 | hgt500(:,13,:,:)=vm; clear vm;
|
---|
60 |
|
---|
61 | ncload('zg_d.TrNQIVIV.198406-09.nc','zg');
|
---|
62 | vm(:,:,:)=zg(:,6,:,:); clear zg;
|
---|
63 | hgt500(:,14,:,:)=vm; clear vm;
|
---|
64 |
|
---|
65 | ncload('zg_d.TrNQIVIV.198506-09.nc','zg');
|
---|
66 | vm(:,:,:)=zg(:,6,:,:); clear zg;
|
---|
67 | hgt500(:,15,:,:)=vm; clear vm;
|
---|
68 |
|
---|
69 | ncload('zg_d.TrNQIVIV.198606-09.nc','zg');
|
---|
70 | vm(:,:,:)=zg(:,6,:,:); clear zg;
|
---|
71 | hgt500(:,16,:,:)=vm; clear vm;
|
---|
72 |
|
---|
73 | ncload('zg_d.TrNQIVIV.198706-09.nc','zg');
|
---|
74 | vm(:,:,:)=zg(:,6,:,:); clear zg;
|
---|
75 | hgt500(:,17,:,:)=vm; clear vm;
|
---|
76 |
|
---|
77 | ncload('zg_d.TrNQIVIV.198806-09.nc','zg');
|
---|
78 | vm(:,:,:)=zg(:,6,:,:); clear zg;
|
---|
79 | hgt500(:,18,:,:)=vm; clear vm;
|
---|
80 |
|
---|
81 | ncload('zg_d.TrNQIVIV.198906-09.nc','zg');
|
---|
82 | vm(:,:,:)=zg(:,6,:,:); clear zg;
|
---|
83 | hgt500(:,19,:,:)=vm; clear vm;
|
---|
84 |
|
---|
85 | ncload('zg_d.TrNQIVIV.199106-09.nc','zg');
|
---|
86 | vm(:,:,:)=zg(:,6,:,:); clear zg;
|
---|
87 | hgt500(:,20,:,:)=vm; clear vm;
|
---|
88 |
|
---|
89 | ncload('zg_d.TrNQIVIV.199206-09.nc','zg');
|
---|
90 | vm(:,:,:)=zg(:,6,:,:); clear zg;
|
---|
91 | hgt500(:,21,:,:)=vm; clear vm;
|
---|
92 |
|
---|
93 | ncload('zg_d.TrNQIVIV.199306-09.nc','zg');
|
---|
94 | vm(:,:,:)=zg(:,6,:,:); clear zg;
|
---|
95 | hgt500(:,22,:,:)=vm; clear vm;
|
---|
96 |
|
---|
97 | ncload('zg_d.TrNQIVIV.199406-09.nc','zg');
|
---|
98 | vm(:,:,:)=zg(:,6,:,:); clear zg;
|
---|
99 | hgt500(:,23,:,:)=vm; clear vm;
|
---|
100 |
|
---|
101 | ncload('zg_d.TrNQIVIV.199506-09.nc','zg');
|
---|
102 | vm(:,:,:)=zg(:,6,:,:); clear zg;
|
---|
103 | hgt500(:,24,:,:)=vm; clear vm;
|
---|
104 |
|
---|
105 | ncload('zg_d.TrNQIVIV.199606-09.nc','zg');
|
---|
106 | vm(:,:,:)=zg(:,6,:,:); clear zg;
|
---|
107 | hgt500(:,25,:,:)=vm; clear vm;
|
---|
108 |
|
---|
109 | ncload('zg_d.TrNQIVIV.199706-09.nc','zg');
|
---|
110 | vm(:,:,:)=zg(:,6,:,:); clear zg;
|
---|
111 | hgt500(:,26,:,:)=vm; clear vm;
|
---|
112 |
|
---|
113 | ncload('zg_d.TrNQIVIV.199806-09.nc','zg');
|
---|
114 | vm(:,:,:)=zg(:,6,:,:); clear zg;
|
---|
115 | hgt500(:,27,:,:)=vm; clear vm;
|
---|
116 |
|
---|
117 | ncload('zg_d.TrNQIVIV.199906-09.nc','zg');
|
---|
118 | vm(:,:,:)=zg(:,6,:,:); clear zg;
|
---|
119 | hgt500(:,28,:,:)=vm; clear vm;
|
---|
120 |
|
---|
121 | ncload('zg_d.TrNQIVIV.200006-09.nc','zg','lat','lon');
|
---|
122 | vm(:,:,:)=zg(:,6,:,:); clear zg;
|
---|
123 | hgt500(:,29,:,:)=vm; clear vm;
|
---|
124 |
|
---|
125 | cd('..');
|
---|
126 | save hgt500_trop.mat hgt500;
|
---|
127 |
|
---|
128 |
|
---|
129 |
|
---|
130 |
|
---|