Changeset 14517


Ignore:
Timestamp:
04/05/13 15:53:51 (12 years ago)
Author:
Mathieu Morlighem
Message:

Added ibcao colormap

Location:
issm/trunk-jpl/src/m/plot/colormaps
Files:
1 added
1 edited

Legend:

Unmodified
Added
Removed
  • issm/trunk-jpl/src/m/plot/colormaps/demmap.m

    r14299 r14517  
    1 function cmap = demmap(ncolors,minZ,maxZ);
     1function cmap = demmap(ncolors,minZ,maxZ,varargin);
    22%DEMMAP - concatenate sea and land color depending on zmin and zmax
    33%
    44%   Usage:
    5 %      cmap = demmap(n,zmin,zmax)
     5%      cmap = demmap(n,zmin,zmax,varargin)
     6%
     7%   Example:
     8%      cmap = demmap(50,-300,1200);
     9%      cmap = demmap(50,-300,1200,'dem');
     10%      cmap = demmap(50,-300,1200,'ibcao');
    611
     12%Input checks
    713if nargin<3,
    814        help landseacolor
    9         error('3 arguments necessary');
     15        error('3 or 4 arguments necessary');
     16elseif nargin>4,
     17        help landseacolor
     18        error('3 or 4 arguments necessary');
    1019end
    1120
    12 if minZ == maxZ;
    13         maxZ = minZ+1;
     21if nargin==4,
     22        colorscheme = varargin{1};
     23        if ~ischar(colorscheme), error('color scheme should be a string'); end
     24else
     25        colorscheme = 'dem';
    1426end
    1527
     
    6072
    6173clim = [cmn cmx];
    62 cmap = [seacolor(nsea);landcolor(nland).^1.3];
     74
     75if strcmpi(colorscheme,'dem'),
     76        cmap = [seacolor(nsea);landcolor(nland).^1.3];
     77elseif strcmpi(colorscheme,'ibcao');
     78        cmap = ibcao(nsea,nland);
     79end
Note: See TracChangeset for help on using the changeset viewer.