1 | #!/usr/bin/env python |
---|
2 | # -*- coding: utf-8 -*- |
---|
3 | import string |
---|
4 | import numpy as np |
---|
5 | import matplotlib.pyplot as plt |
---|
6 | from pylab import * |
---|
7 | from mpl_toolkits.basemap import Basemap |
---|
8 | from mpl_toolkits.basemap import shiftgrid, cm |
---|
9 | import netCDF4 |
---|
10 | |
---|
11 | |
---|
12 | fichier=open('/net/dedale/usr/dedale/surf/lelod/ANTARC/AMSUA_CH2_ANTARC_JUNE2010.DAT','r') |
---|
13 | numlines = 0 |
---|
14 | for line in fichier: numlines += 1 |
---|
15 | |
---|
16 | fichier.close |
---|
17 | |
---|
18 | |
---|
19 | fichier=open('/net/dedale/usr/dedale/surf/lelod/ANTARC/AMSUA_CH2_ANTARC_JUNE2010.DAT','r') |
---|
20 | nbtotal=numlines |
---|
21 | |
---|
22 | iligne=0 |
---|
23 | lat=np.zeros([nbtotal],float) |
---|
24 | lon=np.zeros([nbtotal],float) |
---|
25 | jjr=np.zeros([nbtotal],float) |
---|
26 | zen=np.zeros([nbtotal],float) |
---|
27 | fov=np.zeros([nbtotal],float) |
---|
28 | ts=np.zeros([nbtotal],float) |
---|
29 | emis=np.zeros([nbtotal],float) |
---|
30 | tb=np.zeros([nbtotal],float) |
---|
31 | tup=np.zeros([nbtotal],float) |
---|
32 | tdn=np.zeros([nbtotal],float) |
---|
33 | trans=np.zeros([nbtotal],float) |
---|
34 | orog=np.zeros([nbtotal],float) |
---|
35 | pos=np.zeros([nbtotal],float) |
---|
36 | |
---|
37 | while (iligne <= nbtotal-1) : |
---|
38 | line=fichier.readline() |
---|
39 | # exemple : line = "0.22 2.3 5.0 6" |
---|
40 | liste = line.split() |
---|
41 | # exemple : listeCoord ['0.22', '2.3', '5.0', '6'] (liste de chaine de |
---|
42 | # caractÚres) |
---|
43 | lat[iligne] = float(liste[1]) |
---|
44 | lon[iligne] = float(liste[0]) |
---|
45 | jjr[iligne] = float(liste[4]) |
---|
46 | ts[iligne] = float(liste[10]) |
---|
47 | tb[iligne] = float(liste[15]) |
---|
48 | emis[iligne] = float(liste[16]) |
---|
49 | orog[iligne] = float(liste[13]) |
---|
50 | pos[iligne] = float(liste[7]) |
---|
51 | iligne=iligne+1 |
---|
52 | |
---|
53 | |
---|
54 | fichier.close |
---|
55 | |
---|
56 | |
---|
57 | x=lon |
---|
58 | y=lat |
---|
59 | z=tb |
---|
60 | nscan = 3 |
---|
61 | |
---|
62 | zgrid, zzpgrid, ngrid, nngrid, sigma_grid, xvec, yvec = newgridns.newgridns(x, y, z, vnx, nscan, pos) |
---|
63 | |
---|
64 | zgrid_3n=zgrid |
---|
65 | zzpgrid_3n=zzpgrid |
---|
66 | ngrid_3n=ngrid |
---|
67 | nngrid_3n=nngrid |
---|
68 | sigma_grid_3n=sigma_grid |
---|
69 | dif_zzpgrid=sigma_grid_t-sigma_grid_2n |
---|
70 | |
---|
71 | del zgrid, zzpgrid, ngrid, nngrid, sigma_grid, xvec, yvec |
---|
72 | |
---|
73 | |
---|
74 | dx=0.1 |
---|
75 | dy=1.0 |
---|
76 | x0, x1 = -180, 180 |
---|
77 | y0, y1 = -90, 90 |
---|
78 | |
---|
79 | monthly_outz=np.zeros([40,3600],float) |
---|
80 | monthly_lon=np.zeros([3600]) |
---|
81 | monthly_lat=np.zeros([40]) |
---|
82 | xx = lon |
---|
83 | yy = lat |
---|
84 | zz = tb |
---|
85 | zz0 = 100 |
---|
86 | zz1= 300 |
---|
87 | outz, outx, outy, Nil = ffgrid3.ffgrid(xx, yy, zz, dx, dy, x0,x1,y0,y1,zz0, zz1) |
---|
88 | x=outx |
---|
89 | y=outy |
---|
90 | z = np.transpose(outz) |
---|
91 | z[Nil]=600 |
---|
92 | z=np.transpose(z) |
---|
93 | |
---|
94 | del outz, outx, outy, zz, xx, yy |
---|
95 | |
---|
96 | |
---|
97 | # ici je fais des cartes moyennes en melangeant les polars |
---|
98 | |
---|
99 | xx = lon_ssmis |
---|
100 | yy = lat_ssmis |
---|
101 | zz = 0.5*(emis_ssmis[1,:]+emis_ssmis[2,:]) |
---|
102 | outz, outx, outy = ffgrid2.ffgrid(xx, yy, zz, dx, dy, x0,x1,y0,y1,0.1, 1) |
---|
103 | monthly_outz_ssmis_polar[0,:,:]=outz |
---|
104 | del outz, outx, outy, zz |
---|
105 | |
---|
106 | zz = 0.5*(emis_ssmis[4,:]+emis_ssmis[5,:]) |
---|
107 | outz, outx, outy = ffgrid2.ffgrid(xx, yy, zz, dx, dy, x0,x1,y0,y1,0.1, 1) |
---|
108 | monthly_outz_ssmis_polar[1,:,:]=outz |
---|
109 | del outz, outx, outy, zz |
---|
110 | |
---|
111 | zz = 0.5*(emis_ssmis[6,:]+emis_ssmis[7,:]) |
---|
112 | outz, outx, outy = ffgrid2.ffgrid(xx, yy, zz, dx, dy, x0,x1,y0,y1,0.1, 1) |
---|
113 | monthly_outz_ssmis_polar[2,:,:]=outz |
---|
114 | del outz, outx, outy, zz, xx, yy |
---|
115 | |
---|
116 | # ici je fais des cartes moyennes des differences des polars |
---|
117 | xx = lon_ssmis |
---|
118 | yy = lat_ssmis |
---|
119 | zz = emis_ssmis[1,:]-emis_ssmis[2,:] |
---|
120 | outz, outx, outy = ffgrid2.ffgrid(xx, yy, zz, dx, dy, x0,x1,y0,y1,-0.05, 0.2) |
---|
121 | monthly_outz_ssmis_diff[0,:,:]=outz |
---|
122 | del outz, outx, outy, zz |
---|
123 | |
---|
124 | zz = emis_ssmis[4,:]-emis_ssmis[5,:] |
---|
125 | outz, outx, outy = ffgrid2.ffgrid(xx, yy, zz, dx, dy, x0,x1,y0,y1,-0.05, 0.2) |
---|
126 | monthly_outz_ssmis_diff[1,:,:]=outz |
---|
127 | del outz, outx, outy, zz |
---|
128 | |
---|
129 | zz = emis_ssmis[6,:]-emis_ssmis[7,:] |
---|
130 | outz, outx, outy = ffgrid2.ffgrid(xx, yy, zz, dx, dy, x0,x1,y0,y1,-0.05, 0.2) |
---|
131 | monthly_outz_ssmis_diff[2,:,:]=outz |
---|
132 | del outz, outx, outy, zz, xx, yy |
---|
133 | |
---|
134 | draw_map.draw(monthly_outz_ssmis_polar[0,:], monthly_lon_ssmis, monthly_lat_ssmis, '..\FIG\mean_ssmis_19GHzmpolar_HN_'+le_mois+'.png', '',0.6,1.01,0.002,cm.s3pcpn_l_r) |
---|
135 | draw_map.draw(monthly_outz_ssmis_polar[1,:], monthly_lon_ssmis, monthly_lat_ssmis, '..\FIG\mean_ssmis_37GHzmpolar_HN_'+le_mois+'.png', '',0.6,1.01,0.002,cm.s3pcpn_l_r) |
---|
136 | draw_map.draw(monthly_outz_ssmis_polar[2,:], monthly_lon_ssmis, monthly_lat_ssmis, '..\FIG\mean_ssmis_85GHzmpolar_HN_'+le_mois+'.png', '',0.6,1.01,0.002,cm.s3pcpn_l_r) |
---|
137 | |
---|
138 | draw_map.draw(monthly_outz_ssmis_diff[0,:], monthly_lon_ssmis, monthly_lat_ssmis, '..\FIG\mean_ssmis_19V-H_HN_'+le_mois+'.png', '',0,0.2,0.002,cm.s3pcpn_l_r) |
---|
139 | draw_map.draw(monthly_outz_ssmis_diff[1,:], monthly_lon_ssmis, monthly_lat_ssmis, '..\FIG\mean_ssmis_37V-H_HN_'+le_mois+'.png', '',0,0.2,0.002,cm.s3pcpn_l_r) |
---|
140 | draw_map.draw(monthly_outz_ssmis_diff[2,:], monthly_lon_ssmis, monthly_lat_ssmis, '..\FIG\mean_ssmis_85V-H_HN_'+le_mois+'.png', '',0,0.2,0.002,cm.s3pcpn_l_r) |
---|
141 | |
---|
142 | draw_map.draw(monthly_outz_ssmis[0,:], monthly_lon_ssmis, monthly_lat_ssmis, '..\FIG\mean_ssmis_50V_HN_'+le_mois+'.png', '',0.6,1.01,0.002,cm.s3pcpn_l_r) |
---|
143 | draw_map.draw(monthly_outz_ssmis[1,:], monthly_lon_ssmis, monthly_lat_ssmis, '..\FIG\mean_ssmis_19V_HN_'+le_mois+'.png', '',0.6,1.01,0.002,cm.s3pcpn_l_r) |
---|
144 | draw_map.draw(monthly_outz_ssmis[2,:], monthly_lon_ssmis, monthly_lat_ssmis, '..\FIG\mean_ssmis_19H_HN_'+le_mois+'.png', '',0.6,1.01,0.002,cm.s3pcpn_l_r) |
---|
145 | draw_map.draw(monthly_outz_ssmis[3,:], monthly_lon_ssmis, monthly_lat_ssmis, '..\FIG\mean_ssmis_22V_HN_'+le_mois+'.png', '',0.6,1.01,0.002,cm.s3pcpn_l_r) |
---|
146 | draw_map.draw(monthly_outz_ssmis[4,:], monthly_lon_ssmis, monthly_lat_ssmis, '..\FIG\mean_ssmis_37V_HN_'+le_mois+'.png', '',0.6,1.01,0.002,cm.s3pcpn_l_r) |
---|
147 | draw_map.draw(monthly_outz_ssmis[5,:], monthly_lon_ssmis, monthly_lat_ssmis, '..\FIG\mean_ssmis_37H_HN_'+le_mois+'.png', '',0.6,1.01,0.002,cm.s3pcpn_l_r) |
---|
148 | draw_map.draw(monthly_outz_ssmis[6,:], monthly_lon_ssmis, monthly_lat_ssmis, '..\FIG\mean_ssmis_85V_HN_'+le_mois+'.png', '',0.6,1.01,0.002,cm.s3pcpn_l_r) |
---|
149 | draw_map.draw(monthly_outz_ssmis[7,:], monthly_lon_ssmis, monthly_lat_ssmis, '..\FIG\mean_ssmis_85H_HN_'+le_mois+'.png', '',0.6,1.01,0.002,cm.s3pcpn_l_r) |
---|
150 | |
---|
151 | |
---|
152 | bins=arange(0.3,1,0.001) |
---|
153 | bb=(lat_ssmis >= 0) |
---|
154 | |
---|
155 | plt.hist(emis_ssmis[0,nonzero(bb)[0]], bins=bins,histtype='step', label='e50V',normed='True',color='#4BB5C1') |
---|
156 | plt.hist(emis_ssmis[1,nonzero(bb)[0]], bins=bins,histtype='step', label='e19V',normed='True',color='black') |
---|
157 | plt.hist(emis_ssmis[3,nonzero(bb)[0]], bins=bins,histtype='step', label='e22V',normed='True',color='#B9121B') |
---|
158 | plt.hist(emis_ssmis[4,nonzero(bb)[0]], bins=bins,histtype='step', label='e37V',normed='True',color='#9748D4') |
---|
159 | plt.hist(emis_ssmis[6,nonzero(bb)[0]], bins=bins,histtype='step', label='e91V',normed='True',color='#060DE5') |
---|
160 | plt.legend(loc='upper left') |
---|
161 | plt.show() |
---|
162 | plt.savefig('..\FIG\hist_ssmis_V_NH_'+le_mois+'.png') |
---|
163 | close() |
---|
164 | |
---|
165 | bins=arange(0.3,1,0.001) |
---|
166 | plt.hist(emis_ssmis[2,nonzero(bb)[0]], bins=bins,histtype='step', label='e19H',normed='True',color='black') |
---|
167 | plt.hist(emis_ssmis[5,nonzero(bb)[0]], bins=bins,histtype='step', label='e37H',normed='True',color='#9748D4') |
---|
168 | plt.hist(emis_ssmis[7,nonzero(bb)[0]], bins=bins,histtype='step', label='e91H',normed='True',color='#060DE5') |
---|
169 | plt.legend(loc='upper left') |
---|
170 | plt.show() |
---|
171 | plt.savefig('..\FIG\hist_ssmis_H_NH_'+le_mois+'.png') |
---|
172 | close() |
---|
173 | |
---|
174 | bins=arange(0.3,1,0.001) |
---|
175 | plt.hist(0.5*(emis_ssmis[1,nonzero(bb)[0]]+emis_ssmis[2,nonzero(bb)[0]]), bins=bins,histtype='step', label='e19',normed='True',color='black') |
---|
176 | plt.hist(0.5*(emis_ssmis[4,nonzero(bb)[0]]+emis_ssmis[5,nonzero(bb)[0]]), bins=bins,histtype='step', label='e37',normed='True',color='#9748D4') |
---|
177 | plt.hist(0.5*(emis_ssmis[6,nonzero(bb)[0]]+emis_ssmis[7,nonzero(bb)[0]]), bins=bins,histtype='step', label='e91',normed='True',color='#060DE5') |
---|
178 | plt.legend(loc='upper left') |
---|
179 | plt.show() |
---|
180 | plt.savefig('..\FIG\hist_ssmis_mpolar_NH_'+le_mois+'.png') |
---|
181 | close() |
---|
182 | |
---|
183 | |
---|
184 | # stats quotidienne autour de la station Thulé |
---|
185 | lat_stations=[76.32, 74.43, 78.13, 58.45, 68.6, 64.58] |
---|
186 | lon_stations=[-68.3, -94.59, 15.35, -78.08, 33.1, 40.5] |
---|
187 | nom_stations=['Thule', 'Resolute', 'Longyearbyen', 'Iqaluit', 'Murmansk', 'Arkhangelsk'] |
---|
188 | |
---|
189 | |
---|
190 | for sta in range(0,6): |
---|
191 | lat0=lat_stations[sta] |
---|
192 | lon0=lon_stations[sta] |
---|
193 | stat_jour=np.zeros([8,7,31],float) |
---|
194 | clear bb |
---|
195 | for canal in range(0,8): |
---|
196 | for jjr in range(0,31): |
---|
197 | jour_obs=jjr+1 |
---|
198 | bb=(jjr_ssmis == jour_obs) & (abs(lat_ssmis-lat0) < 2.) & (abs(lon_ssmis-lon0) < 2.) |
---|
199 | stat_jour[canal,0,jjr]=mean(emis_ssmis[canal,nonzero(bb)[0]]) |
---|
200 | stat_jour[canal,1,jjr]=std(emis_ssmis[canal,nonzero(bb)[0]]) |
---|
201 | stat_jour[canal,2,jjr]=size(nonzero(bb)) |
---|
202 | stat_jour[canal,3,jjr]=mean(ts_ssmis[nonzero(bb)[0]]) |
---|
203 | stat_jour[canal,4,jjr]=std(ts_ssmis[nonzero(bb)[0]]) |
---|
204 | stat_jour[canal,5,jjr]=mean(tb_ssmis[canal,nonzero(bb)[0]]) |
---|
205 | stat_jour[canal,6,jjr]=std(tb_ssmis[canal,nonzero(bb)[0]]) |
---|
206 | del bb |
---|
207 | np.save('STAT_SSMIS_'+nom_stations[sta]+'_'+le_mois+'.dat', stat_jour) |
---|
208 | del stat_jour |
---|
209 | |
---|
210 | mpolar_ssmis=np.zeros([3,nbtotal],float) |
---|
211 | mpolar_ssmis[0,:]=0.5*(emis_ssmis[1,:]+emis_ssmis[2,:]) |
---|
212 | mpolar_ssmis[1,:]=0.5*(emis_ssmis[4,:]+emis_ssmis[5,:]) |
---|
213 | mpolar_ssmis[2,:]=0.5*(emis_ssmis[6,:]+emis_ssmis[7,:]) |
---|
214 | |
---|
215 | mpolarTB_ssmis=np.zeros([3,nbtotal],float) |
---|
216 | mpolarTB_ssmis[0,:]=0.5*(tb_ssmis[1,:]+tb_ssmis[2,:]) |
---|
217 | mpolarTB_ssmis[1,:]=0.5*(tb_ssmis[4,:]+tb_ssmis[5,:]) |
---|
218 | mpolarTN_ssmis[2,:]=0.5*(tb_ssmis[6,:]+tb_ssmis[7,:]) |
---|
219 | |
---|
220 | for sta in range(0,6): |
---|
221 | lat0=lat_stations[sta] |
---|
222 | lon0=lon_stations[sta] |
---|
223 | stat2_jour=np.zeros([3,7,31],float) |
---|
224 | clear bb |
---|
225 | for canal in range(0,3): |
---|
226 | for jjr in range(0,31): |
---|
227 | jour_obs=jjr+1 |
---|
228 | bb=(jjr_ssmis == jour_obs) & (abs(lat_ssmis-lat0) < 2.) & (abs(lon_ssmis-lon0) < 2.) |
---|
229 | stat2_jour[canal,0,jjr]=mean(mpolar_ssmis[canal,nonzero(bb)[0]]) |
---|
230 | stat2_jour[canal,1,jjr]=std(mpolar_ssmis[canal,nonzero(bb)[0]]) |
---|
231 | stat2_jour[canal,2,jjr]=size(nonzero(bb)) |
---|
232 | stat2_jour[canal,3,jjr]=mean(ts_ssmis[nonzero(bb)[0]]) |
---|
233 | stat2_jour[canal,4,jjr]=std(ts_ssmis[nonzero(bb)[0]]) |
---|
234 | stat2_jour[canal,5,jjr]=mean(tb_ssmis[canal,nonzero(bb)[0]]) |
---|
235 | stat2_jour[canal,6,jjr]=std(tb_ssmis[canal,nonzero(bb)[0]]) |
---|
236 | del bb |
---|
237 | np.save('STAT_SSMIS-MPOLAR_'+nom_stations[sta]+'_'+le_mois+'.dat', stat_jour) |
---|
238 | del stat_jour |
---|
239 | |
---|
240 | # ecriture sous format nc |
---|
241 | from netCDF4 import Dataset |
---|
242 | rootgrp = Dataset('..\EMIS\EMIS_SSMIS_'+le_mois+'.nc', 'w', format='NETCDF4') |
---|
243 | |
---|
244 | rootgrp.createDimension('longitude', len(monthly_lon_ssmis)) |
---|
245 | rootgrp.createDimension('latitude', len(monthly_lat_ssmis)) |
---|
246 | rootgrp.createDimension('channels', 8) |
---|
247 | rootgrp.createDimension('bchannels', 3) |
---|
248 | |
---|
249 | # createVariable (nom de la variable, type, dimensions) |
---|
250 | # Si 1 dimension, ne pas oublier la virgule |
---|
251 | nclon = rootgrp.createVariable('longitude', 'f8', ('longitude',)) |
---|
252 | nclat = rootgrp.createVariable('latitude', 'f8', ('latitude',)) |
---|
253 | ncchan=rootgrp.createVariable('channels', 'f', ('channels',)) |
---|
254 | ncchan2=rootgrp.createVariable('bchannels', 'f', ('bchannels',)) |
---|
255 | nctemp = rootgrp.createVariable('emissivity', 'f8', ('channels','latitude', 'longitude')) |
---|
256 | nctemp2 = rootgrp.createVariable('emissivity melange polar', 'f8', ('bchannels','latitude', 'longitude')) |
---|
257 | |
---|
258 | nclon[:] = monthly_lon_ssmis |
---|
259 | nclat[:] = monthly_lat_ssmis |
---|
260 | ncchan[:]=[50,19.1,19.2,22,37.1,37.2,91.1,91.2] |
---|
261 | ncchan2[:]=[19,37,91] |
---|
262 | nctemp[:] = monthly_outz_ssmis |
---|
263 | nctemp2[:] = monthly_outz_ssmis_polar |
---|
264 | |
---|
265 | rootgrp.close() |
---|