Documentation of getll

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

Function Synopsis

[lat, lon, depth, lm] = getllc(varname, ctlim);

Help text


  [lat, lon, depth, lm] = getllc(varname, ctlim);

Cross-Reference Information

This function calls This function is called by

Listing of function getll

function [lat, lon, depth, lm] = getllc(varname, ctlim);
cdtem = ['cd ' eval('pwd')];
cd /home/disk/hayes2/dvimont/csiro/data

if strcmp(varname, 'wl') | strcmp(varname, 'we');
  filin = [varname '_L2-10.nc'];
elseif strcmp(varname, 'heat');
  filin = 'heat_flux_A_1000_years.nc';
elseif strcmp(varname, 'taux');
  filin = 'taux_A_1000_years.nc';
elseif strcmp(varname, 'tauy');
  filin = 'tauy_A_1000_years.nc';
elseif strcmp(varname, 'z250');
  filin = 'z250_A_1000_years.nc';
else
  filin = [varname '_L1-10.nc'];
end
nc = netcdf(filin, 'nowrite');

  lat = nc{'latitude'}(:);
  lon = nc{'longitude'}(:);
  [xk, yk] = keep_var(ctlim, lon, lat);
  lat = lat(yk); lon = lon(xk);

  if ~strcmp(varname, 'heat') | ...
     ~strcmp(varname, 'taux') | ...
     ~strcmp(varname, 'tauy') | ...
     ~strcmp(varname, 'z250')
    depth = nc{'depth'}(:) / 100;
  end

nc = close(nc);

lm = getnc(varname, ctlim, 1, 1);

eval(cdtem);