|
1 ;************************************************ |
|
2 ; Read ascii, Write nc |
|
3 ;************************************************ |
|
4 load "$NCARG_ROOT/lib/ncarg/nclscripts/csm/gsn_code.ncl" |
|
5 load "$NCARG_ROOT/lib/ncarg/nclscripts/csm/gsn_csm.ncl" |
|
6 load "$NCARG_ROOT/lib/ncarg/nclscripts/csm/contributed.ncl" |
|
7 ;************************************************ |
|
8 begin |
|
9 diri = "/fis/cgd/cseg/people/jeff/clamp_data/co2/globalView-C4Mip/seas/" |
|
10 b = (/ \ |
|
11 "aia005_02D2_seas.co2", \ |
|
12 "aia015_02D2_seas.co2", \ |
|
13 "aia025_02D2_seas.co2", \ |
|
14 "aia035_02D2_seas.co2", \ |
|
15 "aia045_02D2_seas.co2", \ |
|
16 "aia055_02D2_seas.co2", \ |
|
17 "aia065_02D2_seas.co2", \ |
|
18 "alt_01D0_seas.co2", \ |
|
19 "alt_02D0_seas.co2", \ |
|
20 "alt_04D0_seas.co2", \ |
|
21 "alt_06C0_seas.co2", \ |
|
22 "alt_06D0_seas.co2", \ |
|
23 "ams_01D0_seas.co2", \ |
|
24 "ams_11C0_seas.co2", \ |
|
25 "asc_01D0_seas.co2", \ |
|
26 "ask_01D0_seas.co2", \ |
|
27 "avi_01D0_seas.co2", \ |
|
28 "azr_01D0_seas.co2", \ |
|
29 "bal_01D1_seas.co2", \ |
|
30 "bgu_11D0_seas.co2", \ |
|
31 "bhd_15C0_seas.co2", \ |
|
32 "bme_01D0_seas.co2", \ |
|
33 "bmw_01D0_seas.co2", \ |
|
34 "brw_01C0_seas.co2", \ |
|
35 "brw_01D0_seas.co2", \ |
|
36 "bsc_01D0_seas.co2", \ |
|
37 "car030_01D2_seas.co2", \ |
|
38 "car040_01D2_seas.co2", \ |
|
39 "car050_01D2_seas.co2", \ |
|
40 "car060_01D2_seas.co2", \ |
|
41 "car070_01D2_seas.co2", \ |
|
42 "car080_01D2_seas.co2", \ |
|
43 "cba_01D0_seas.co2", \ |
|
44 "cba_04D0_seas.co2", \ |
|
45 "cfa_02D0_seas.co2", \ |
|
46 "cgo_01D0_seas.co2", \ |
|
47 "cgo_02D0_seas.co2", \ |
|
48 "cgo_04D0_seas.co2", \ |
|
49 "chr_01D0_seas.co2", \ |
|
50 "cmn_17C0_seas.co2", \ |
|
51 "cmo_01D0_seas.co2", \ |
|
52 "coi_20C0_seas.co2", \ |
|
53 "cpt_36C0_seas.co2", \ |
|
54 "cri_02D0_seas.co2", \ |
|
55 "crz_01D0_seas.co2", \ |
|
56 "csj_06D0_seas.co2", \ |
|
57 "daa_02D0_seas.co2", \ |
|
58 "eic_01D0_seas.co2", \ |
|
59 "esp005_01D2_seas.co2", \ |
|
60 "esp015_01D2_seas.co2", \ |
|
61 "esp025_01D2_seas.co2", \ |
|
62 "esp035_01D2_seas.co2", \ |
|
63 "esp045_01D2_seas.co2", \ |
|
64 "esp055_01D2_seas.co2", \ |
|
65 "esp_02D0_seas.co2", \ |
|
66 "esp_06D0_seas.co2", \ |
|
67 "frd040_06C3_seas.co2", \ |
|
68 "gmi_01D0_seas.co2", \ |
|
69 "goz_01D0_seas.co2", \ |
|
70 "gsn_24D0_seas.co2", \ |
|
71 "haa005_01D2_seas.co2", \ |
|
72 "haa015_01D2_seas.co2", \ |
|
73 "haa025_01D2_seas.co2", \ |
|
74 "haa035_01D2_seas.co2", \ |
|
75 "haa045_01D2_seas.co2", \ |
|
76 "haa055_01D2_seas.co2", \ |
|
77 "haa065_01D2_seas.co2", \ |
|
78 "haa075_01D2_seas.co2", \ |
|
79 "hat_20C0_seas.co2", \ |
|
80 "hba_01D0_seas.co2", \ |
|
81 "hfm005_01D2_seas.co2", \ |
|
82 "hfm015_01D2_seas.co2", \ |
|
83 "hfm025_01D2_seas.co2", \ |
|
84 "hfm035_01D2_seas.co2", \ |
|
85 "hfm045_01D2_seas.co2", \ |
|
86 "hfm055_01D2_seas.co2", \ |
|
87 "hfm065_01D2_seas.co2", \ |
|
88 "hfm075_01D2_seas.co2", \ |
|
89 "hun010_35C3_seas.co2", \ |
|
90 "hun048_35C3_seas.co2", \ |
|
91 "hun082_35C3_seas.co2", \ |
|
92 "hun115_35C3_seas.co2", \ |
|
93 "hun_01D0_seas.co2", \ |
|
94 "ice_01D0_seas.co2", \ |
|
95 "itn051_01C3_seas.co2", \ |
|
96 "itn123_01C3_seas.co2", \ |
|
97 "itn496_01C3_seas.co2", \ |
|
98 "itn_01D0_seas.co2", \ |
|
99 "izo_01D0_seas.co2", \ |
|
100 "izo_27C0_seas.co2", \ |
|
101 "jbn_29C0_seas.co2", \ |
|
102 "key_01D0_seas.co2", \ |
|
103 "kum_01D0_seas.co2", \ |
|
104 "kum_04D0_seas.co2", \ |
|
105 "kzd_01D0_seas.co2", \ |
|
106 "kzm_01D0_seas.co2", \ |
|
107 "lef011_01C3_seas.co2", \ |
|
108 "lef030_01C3_seas.co2", \ |
|
109 "lef076_01C3_seas.co2", \ |
|
110 "lef122_01C3_seas.co2", \ |
|
111 "lef244_01C3_seas.co2", \ |
|
112 "lef396_01C3_seas.co2", \ |
|
113 "lef_01D0_seas.co2", \ |
|
114 "ljo_04D0_seas.co2", \ |
|
115 "lmp_28D0_seas.co2", \ |
|
116 "maa_02D0_seas.co2", \ |
|
117 "mbc_01D0_seas.co2", \ |
|
118 "mhd_01D0_seas.co2", \ |
|
119 "mhdcbc_11C0_seas.co2", \ |
|
120 "mhdrbc_11C0_seas.co2", \ |
|
121 "mid_01D0_seas.co2", \ |
|
122 "mlo_01C0_seas.co2", \ |
|
123 "mlo_01D0_seas.co2", \ |
|
124 "mlo_02D0_seas.co2", \ |
|
125 "mlo_04D0_seas.co2", \ |
|
126 "mnm_19C0_seas.co2", \ |
|
127 "mqa_02D0_seas.co2", \ |
|
128 "nwr_01D0_seas.co2", \ |
|
129 "obs023_06C3_seas.co2", \ |
|
130 "opw_01D0_seas.co2", \ |
|
131 "orl005_11D2_seas.co2", \ |
|
132 "orl015_11D2_seas.co2", \ |
|
133 "orl025_11D2_seas.co2", \ |
|
134 "orl035_11D2_seas.co2", \ |
|
135 "palcbc_30C0_seas.co2", \ |
|
136 "palmbc_30C0_seas.co2", \ |
|
137 "pdm_11D0_seas.co2", \ |
|
138 "pfa015_01D2_seas.co2", \ |
|
139 "pfa025_01D2_seas.co2", \ |
|
140 "pfa035_01D2_seas.co2", \ |
|
141 "pfa045_01D2_seas.co2", \ |
|
142 "pfa055_01D2_seas.co2", \ |
|
143 "pfa065_01D2_seas.co2", \ |
|
144 "pfa075_01D2_seas.co2", \ |
|
145 "poc000_01D1_seas.co2", \ |
|
146 "pocn05_01D1_seas.co2", \ |
|
147 "pocn10_01D1_seas.co2", \ |
|
148 "pocn15_01D1_seas.co2", \ |
|
149 "pocn20_01D1_seas.co2", \ |
|
150 "pocn25_01D1_seas.co2", \ |
|
151 "pocn30_01D1_seas.co2", \ |
|
152 "pocn35_01D1_seas.co2", \ |
|
153 "pocn40_01D1_seas.co2", \ |
|
154 "pocn45_01D1_seas.co2", \ |
|
155 "pocs05_01D1_seas.co2", \ |
|
156 "pocs10_01D1_seas.co2", \ |
|
157 "pocs15_01D1_seas.co2", \ |
|
158 "pocs20_01D1_seas.co2", \ |
|
159 "pocs25_01D1_seas.co2", \ |
|
160 "pocs30_01D1_seas.co2", \ |
|
161 "pocs35_01D1_seas.co2", \ |
|
162 "prs_21C0_seas.co2", \ |
|
163 "prs_21D0_seas.co2", \ |
|
164 "psa_01D0_seas.co2", \ |
|
165 "psa_04D0_seas.co2", \ |
|
166 "rpb_01D0_seas.co2", \ |
|
167 "rta005_01D2_seas.co2", \ |
|
168 "rta015_01D2_seas.co2", \ |
|
169 "rta025_01D2_seas.co2", \ |
|
170 "rta035_01D2_seas.co2", \ |
|
171 "rta045_01D2_seas.co2", \ |
|
172 "ryo_19C0_seas.co2", \ |
|
173 "sbl_06C0_seas.co2", \ |
|
174 "sbl_06D0_seas.co2", \ |
|
175 "sch_23C0_seas.co2", \ |
|
176 "scsn03_01D1_seas.co2", \ |
|
177 "scsn06_01D1_seas.co2", \ |
|
178 "scsn09_01D1_seas.co2", \ |
|
179 "scsn12_01D1_seas.co2", \ |
|
180 "scsn15_01D1_seas.co2", \ |
|
181 "scsn18_01D1_seas.co2", \ |
|
182 "scsn21_01D1_seas.co2", \ |
|
183 "sey_01D0_seas.co2", \ |
|
184 "shm_01D0_seas.co2", \ |
|
185 "sis_02D0_seas.co2", \ |
|
186 "smo_01C0_seas.co2", \ |
|
187 "smo_01D0_seas.co2", \ |
|
188 "smo_04D0_seas.co2", \ |
|
189 "spo_01C0_seas.co2", \ |
|
190 "spo_01D0_seas.co2", \ |
|
191 "spo_02D0_seas.co2", \ |
|
192 "spo_04D0_seas.co2", \ |
|
193 "stm_01D0_seas.co2", \ |
|
194 "stmebc_01D0_seas.co2", \ |
|
195 "stp_12D0_seas.co2", \ |
|
196 "sum_01D0_seas.co2", \ |
|
197 "syo_01D0_seas.co2", \ |
|
198 "syo_09C0_seas.co2", \ |
|
199 "tap_01D0_seas.co2", \ |
|
200 "tdf_01D0_seas.co2", \ |
|
201 "trm_11D0_seas.co2", \ |
|
202 "uta_01D0_seas.co2", \ |
|
203 "uum_01D0_seas.co2", \ |
|
204 "wes_23C0_seas.co2", \ |
|
205 "wis_01D0_seas.co2", \ |
|
206 "wkt009_01C3_seas.co2", \ |
|
207 "wkt030_01C3_seas.co2", \ |
|
208 "wkt061_01C3_seas.co2", \ |
|
209 "wkt122_01C3_seas.co2", \ |
|
210 "wkt244_01C3_seas.co2", \ |
|
211 "wkt457_01C3_seas.co2", \ |
|
212 "wlg_01D0_seas.co2", \ |
|
213 "wlg_33C0_seas.co2", \ |
|
214 "wpo000_10D2_seas.co2", \ |
|
215 "wpon05_10D2_seas.co2", \ |
|
216 "wpon10_10D2_seas.co2", \ |
|
217 "wpon15_10D2_seas.co2", \ |
|
218 "wpon20_10D2_seas.co2", \ |
|
219 "wpon25_10D2_seas.co2", \ |
|
220 "wpon30_10D2_seas.co2", \ |
|
221 "wpos05_10D2_seas.co2", \ |
|
222 "wpos10_10D2_seas.co2", \ |
|
223 "wpos15_10D2_seas.co2", \ |
|
224 "wpos20_10D2_seas.co2", \ |
|
225 "wpos25_10D2_seas.co2", \ |
|
226 "yon_19C0_seas.co2", \ |
|
227 "zep_01D0_seas.co2", \ |
|
228 "zep_31C0_seas.co2", \ |
|
229 "zot005_45D2_seas.co2", \ |
|
230 "zot015_45D2_seas.co2", \ |
|
231 "zot025_45D2_seas.co2", \ |
|
232 "zot035_45D2_seas.co2"/) |
|
233 |
|
234 print (dimsizes(b)) |
|
235 exit |
|
236 do n = 0,dimsizes(b)-1 |
|
237 print (b(n)) |
|
238 end do |
|
239 exit |
|
240 ncol1 = 4 |
|
241 data1 = readAsciiTable(diri+b(n), ncol1, "float", (/10,17/)) |
|
242 print (data1) |
|
243 |
|
244 ncol2 = 5 |
|
245 data2 = readAsciiTable(diri+b(n), ncol2, "float", 16) |
|
246 print (data2) |
|
247 ; end do |
|
248 |
|
249 end |