Documentation of global_latlon


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


Function Synopsis

global_latlon(lat, lon, frme, iswrp);

Help text


   global_latlon(lat, lon, frame, wrap_grenw);

   Sets YAX = lat; 
        XAX = lon;
        FRAME = [lon(1) lon(end) lat(1) lat(end)];


Cross-Reference Information

This function calls This function is called by

Listing of function global_latlon

function global_latlon(lat, lon, frme, iswrp);
global XAX YAX XAX2 YAX2 FRAME XAX3 YAX3 

if ~isvector(lat) | ~isvector(lon);
    size(lat), size(lon)
    error('lat and lon must be vectors');
end

%  Make column vectors
XAX = lon(:);
YAX = lat(:);

if nargin < 3;
    if isempty(FRAME);
        FRAME = [XAX(1) XAX(end) YAX(1) YAX(end)];
    end
else
  FRAME = frme;
end

ind = find(FRAME(1:2) == (FRAME(1)+360));
FRAME(1:2) = eastof(FRAME(1:2), FRAME(1));
FRAME(ind) = FRAME(ind)+360;

XAX = eastof(XAX, FRAME(1));

[XAX2, YAX2] = meshgrid(XAX, YAX);

if diff(FRAME(1:2)) == 360;
  XAX3 = [XAX2 XAX2(:,1)+360];
  YAX3 = [YAX2 YAX2(:,1)];
end