Documentation of plot_hctend_terms

Global Index (short | long) | Local contents | Local Index (short | long)

Cross-Reference Information

Listing of script plot_hctend_terms

clear
cd /home/disk/tao/dvimont/matlab/CSIRO/Thesis/Data
load LP9_hctend_ALL.mat
lm = getnc('temp', lims, 1, 1);
lag = 0;
ind = find(lags == lag);
[lat1, lon1] = getll('u', lims);
[lat2, lon2] = getll('wl', lims);
order =         ['ubtp'; 'uptb'; 'vbtp'; 'vptb'; 'wbtp'; 'wptb'];
lltag = num2str([     1;      1;      1;      1;      2;      2]);
for i = 1:6;
  eval([order(i,:) '47 = ' order(i,:) '17 - ' order(i,:) '13;']);
end
get_global;  FRAME = [105 300 -65 65];
cint = 0.5; clev = [-10:cint:-cint cint:cint:10];
levtag = '13';
for i = 1:6;
  eval(['XAX = lon' lltag(i) ';  YAX = lat' lltag(i) ';']);
  eval(['tem = ' order(i,:) levtag '(ind,:,:);']);
  subplot(4,2,i);
    gcont(tem, clev);
  XAX = lon1; YAX = lat1;
    dc2(lm);
end
subplot(4,2,7);
  tem = -hflx_reg(ind,:,:);
  gcont(tem, clev);
    XAX = lon1; YAX = lat1;
    dc2(lm);