Global Index (short | long) | Local contents | Local Index (short | long)
print -dps2 Oce_currents.ps
This script calls | |
---|---|
clear lims = [-0.1 360 -90 90]; tim = 101:1000; u1 = getheat(lims, 1:3, tim, 'u'); v1 = getheat(lims, 1:3, tim, 'v'); u2 = getheat(lims, 4:7, tim, 'u'); v2 = getheat(lims, 4:7, tim, 'v'); u1 = squeeze(mean(u1)); v1 = squeeze(mean(v1)); u2 = squeeze(mean(u2)); v2 = squeeze(mean(v2)); [lat, lon] = getll('u', lims); [lat1, lon1, depth, lm] = getll('temp', lims); default_global; FRAME = [0 360 -90 90]; figure(2); fo(1); clf; spthes(1); gquiv(u1, v1, -15, 1, 'cm s^-^1'); XAX = lon1; YAX = lat1; dc2(lm, 0.55, 1); XAX = lon; YAX = lat; title('0-80m Ocean Currents'); spthes(2); gquiv(u2, v2, -10, 1, 'cm s^-^1'); XAX = lon1; YAX = lat1; dc2(lm, 0.55, 1); XAX = lon; YAX = lat; title('80-270m Ocean Currents'); cd ~/Thesis/Clim