1 |
% |
2 |
% Ed Hill |
3 |
% Fri Dec 26 19:54:33 EST 2003 |
4 |
|
5 |
% Data from: |
6 |
% Charmaine King <king@ocean.mit.edu> |
7 |
% ocean.mit.edu:/data7/king/Topex_9yr_mean |
8 |
|
9 |
|
10 |
matlab -nojvm |
11 |
clear all |
12 |
|
13 |
cx = linspace(0,358,180); |
14 |
cy = linspace(-66,66,67); |
15 |
|
16 |
! cat av | awk '(NR>2){print $1}' > avd |
17 |
! cat sd | awk '(NR>2){print $1}' > sdd |
18 |
load avd; avd(find(avd==-9999.0)) = NaN; |
19 |
load sdd; sdd(find(sdd==-9999.0)) = NaN; |
20 |
av = reshape(avd,180,67)'; |
21 |
sd = reshape(sdd,180,67)'; |
22 |
|
23 |
surf(av), shading interp, view(2), grid on |
24 |
surf(sd), shading interp, view(2), grid on |
25 |
|
26 |
idav = 'SSH_average'; |
27 |
idsd = 'SSH_std_dev'; |
28 |
units = 'm'; |
29 |
|
30 |
desc = [ 'Filtered Topex SSH data from Charmaine King <king@ocean.mit.edu>.' ]; |
31 |
ncname = [ 'cking_topex_latlon.nc' ]; |
32 |
nc = netcdf(ncname, 'clobber'); |
33 |
nc.reference = desc; |
34 |
nc.author = 'Ed Hill <eh3@mit.edu>'; |
35 |
nc.date = 'Dec 26, 2003'; |
36 |
nc('lon') = length(cx); |
37 |
nc('lat') = length(cy); |
38 |
nc{'lon'} = 'lon'; |
39 |
nc{'lat'} = 'lat'; |
40 |
nc{ idav } = { 'lat', 'lon' }; |
41 |
nc{ idsd } = { 'lat', 'lon' }; |
42 |
nc{'lon'}.uniquename = 'lon'; |
43 |
nc{'lon'}.long_name = 'longitude'; |
44 |
nc{'lon'}.gridtype = ncint(1); |
45 |
nc{'lat'}.uniquename = 'lat'; |
46 |
nc{'lat'}.long_name = 'latitude'; |
47 |
nc{'lat'}.gridtype = ncint(0); |
48 |
nc{'lon'}.units = 'degree_east'; |
49 |
nc{'lat'}.units = 'degree_north'; |
50 |
nc{ idav }.units = units; |
51 |
nc{ idav }.long_name = idav; |
52 |
nc{ idav }.missing_value = ncdouble(NaN); |
53 |
nc{ idav }.FillValue_ = ncdouble(-9999.); |
54 |
nc{ idsd }.units = units; |
55 |
nc{ idsd }.long_name = idsd; |
56 |
nc{ idsd }.missing_value = ncdouble(NaN); |
57 |
nc{ idsd }.FillValue_ = ncdouble(-9999.); |
58 |
nc{'lon'}(:) = cx; |
59 |
nc{'lat'}(:) = cy; |
60 |
nc{ idav }(:) = av; |
61 |
nc{ idsd }(:) = sd; |
62 |
nc = close(nc); |
63 |
|
64 |
desc = [ 'Filtered Topex SSH data from Charmaine King <king@ocean.mit.edu>.' ]; |
65 |
ncname = [ 'cking_topex_xy.nc' ]; |
66 |
nc = netcdf(ncname, 'clobber'); |
67 |
nc.reference = desc; |
68 |
nc.author = 'Ed Hill <eh3@mit.edu>'; |
69 |
nc.date = 'Dec 26, 2003'; |
70 |
nc('X') = length(cx); |
71 |
nc('Y') = length(cy); |
72 |
nc{'X'} = 'X'; |
73 |
nc{'Y'} = 'Y'; |
74 |
nc{ idav } = { 'Y', 'X' }; |
75 |
nc{ idsd } = { 'Y', 'X' }; |
76 |
nc{'X'}.uniquename = 'X'; |
77 |
nc{'X'}.long_name = 'X'; |
78 |
nc{'X'}.gridtype = ncint(1); |
79 |
nc{'Y'}.uniquename = 'Y'; |
80 |
nc{'Y'}.long_name = 'Y'; |
81 |
nc{'Y'}.gridtype = ncint(0); |
82 |
nc{'X'}.units = 'degree_east'; |
83 |
nc{'Y'}.units = 'degree_north'; |
84 |
nc{ idav }.units = units; |
85 |
nc{ idav }.long_name = idav; |
86 |
nc{ idav }.missing_value = ncdouble(NaN); |
87 |
nc{ idav }.FillValue_ = ncdouble(-9999.); |
88 |
nc{ idsd }.units = units; |
89 |
nc{ idsd }.long_name = idsd; |
90 |
nc{ idsd }.missing_value = ncdouble(NaN); |
91 |
nc{ idsd }.FillValue_ = ncdouble(-9999.); |
92 |
nc{'X'}(:) = cx; |
93 |
nc{'Y'}(:) = cy; |
94 |
nc{ idav }(:) = av; |
95 |
nc{ idsd }(:) = sd; |
96 |
nc = close(nc); |
97 |
|
98 |
% AS edhill ON channel.mit.edu : |
99 |
cd /home/edhill |
100 |
mkdir cking_topex |
101 |
|
102 |
!scp cking_topex_latlon.nc channel.mit.edu:/home/edhill/cking_topex/ |
103 |
!scp cking_topex_xy.nc channel.mit.edu:/home/edhill/cking_topex/ |
104 |
|
105 |
% AS ROOT ON channel.mit.edu : |
106 |
cd /home/benno/ingrid/data/MIT/LOCAL/PEOPLE/EH3 |
107 |
mkdir cking_topex |
108 |
cd cking_topex |
109 |
ln -s /home/edhill/cking_topex/* . |
110 |
|
111 |
|
112 |
% ;;; Local Variables: *** |
113 |
% ;;; mode:matlab *** |
114 |
% ;;; End: *** |