LTPDA_CSCALE Set the color range of the current figure %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% DESCRIPTION: LTPDA_CSCALE Set the color range of the current figure CALL: cscale(x1,x2) VERSION: $Id: ltpda_cscale.m,v 1.4 2007/07/16 12:52:20 ingo Exp $ HISTORY: 09-10-2001 M Hewitson Creation. %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
0001 function ltpda_cscale(y1,y2) 0002 % LTPDA_CSCALE Set the color range of the current figure 0003 % 0004 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 0005 % 0006 % DESCRIPTION: LTPDA_CSCALE Set the color range of the current figure 0007 % 0008 % CALL: cscale(x1,x2) 0009 % 0010 % VERSION: $Id: ltpda_cscale.m,v 1.4 2007/07/16 12:52:20 ingo Exp $ 0011 % 0012 % HISTORY: 09-10-2001 M Hewitson 0013 % Creation. 0014 % 0015 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 0016 0017 set(gca, 'CLim', [y1 y2]); 0018 0019 h = get(gcf, 'Children'); 0020 0021 for j=1:length(h) 0022 if strcmp(get(h(j), 'Tag'), 'Colorbar')==1 0023 colorbar; 0024 end 0025 end 0026 0027 % END