Changeset 2828


Ignore:
Timestamp:
01/14/10 08:15:59 (15 years ago)
Author:
Mathieu Morlighem
Message:

some bug fixing

Location:
issm/trunk/src/m/classes/public/plot
Files:
2 edited

Legend:

Unmodified
Added
Removed

  • issm/trunk/src/m/classes/public/plot/checkplotoptions.m

    r2827 r2828  
    7373       
    7474%text
    75 %1: textvalue
    7675if exist(options,'text'),
     76        %1: textvalue
    7777        textvalues=getfieldvalue(options,'text');
    7878        %ischar if only one expstyle -> create a cell
    … …  
    8585                error('plot error message: ''text'' option should be either a string or a cell');
    8686        end
    87 end
    88 %2: textweight
    89 if exist(options,'textweight'),
    90         textweightvalues=getfieldvalue(options,'textweight');
    91         %ischar if only one textweight -> create a cell
    92         if ischar(textweightvalues),
    93                 textweightvalues={textweightvalues};
    94         elseif ~iscell(textweightvalues);
    95                 error('plot error message: ''textweight'' option should be either a string or a cell');
    96         end
    97 else
    98         textweightvalues={'n'};
    99 end
    100 textweightvalues=repmat(textweightvalues,1,numtext); textweightvalues(numtext+1:end)=[];
    101 %3: textsize
    102 if exist(options,'textsize'),
    103         textsizevalues=getfieldvalue(options,'textsize');
    104         %ischar if only one textsize -> create a cell
    105         if isnumeric(textsizevalues),
    106                 textsizevalues={textsizevalues};
    107         elseif ~iscell(textsizevalues);
    108                 error('plot error message: ''textsize'' option should be either a number or a cell');
    109         end
    110 else
    111         textsizevalues={14};
    112 end
    113 textsizevalues=repmat(textsizevalues,1,numtext); textsizevalues(numtext+1:end)=[];
    114 %4: textcolor
    115 if exist(options,'textcolor'),
    116         textcolorvalues=getfieldvalue(options,'textcolor');
    117         %ischar if only one textcolor -> create a cell
    118         if ischar(textcolorvalues),
    119                 textcolorvalues={textcolorvalues};
    120         elseif ~iscell(textcolorvalues);
    121                 error('plot error message: ''textcolor'' option should be either a string or a cell');
    122         end
    123 else
    124         textcolorvalues={'k'};
    125 end
    126 textcolorvalues=repmat(textcolorvalues,1,numtext); textcolorvalues(numtext+1:end)=[];
    127 %4: textposition
    128 if exist(options,'textposition'),
    129         textpositionvalues=getfieldvalue(options,'textposition');
    130         %ischar if only one textposition -> create a cell
    131         if isnumeric(textpositionvalues),
    132                 textpositionvalues={textpositionvalues};
    133         elseif ~iscell(textpositionvalues);
    134                 error('plot error message: ''textposition'' option should be either a string or a cell');
    135         end
    136 else
    137         error('plot error message: ''textposition'' option is missing');
    138 end
    139 options=changefieldvalue(options,'text',textvalues);
    140 options=changefieldvalue(options,'textsize',textsizevalues);
    141 options=changefieldvalue(options,'textweight',textweightvalues);
    142 options=changefieldvalue(options,'textcolor',textcolorvalues);
    143 options=changefieldvalue(options,'textposition',textpositionvalues);
     87
     88        %2: textweight
     89        if exist(options,'textweight'),
     90                textweightvalues=getfieldvalue(options,'textweight');
     91                %ischar if only one textweight -> create a cell
     92                if ischar(textweightvalues),
     93                        textweightvalues={textweightvalues};
     94                elseif ~iscell(textweightvalues);
     95                        error('plot error message: ''textweight'' option should be either a string or a cell');
     96                end
     97        else
     98                textweightvalues={'n'};
     99        end
     100        textweightvalues=repmat(textweightvalues,1,numtext); textweightvalues(numtext+1:end)=[];
     101        %3: textsize
     102        if exist(options,'textsize'),
     103                textsizevalues=getfieldvalue(options,'textsize');
     104                %ischar if only one textsize -> create a cell
     105                if isnumeric(textsizevalues),
     106                        textsizevalues={textsizevalues};
     107                elseif ~iscell(textsizevalues);
     108                        error('plot error message: ''textsize'' option should be either a number or a cell');
     109                end
     110        else
     111                textsizevalues={14};
     112        end
     113        textsizevalues=repmat(textsizevalues,1,numtext); textsizevalues(numtext+1:end)=[];
     114        %4: textcolor
     115        if exist(options,'textcolor'),
     116                textcolorvalues=getfieldvalue(options,'textcolor');
     117                %ischar if only one textcolor -> create a cell
     118                if ischar(textcolorvalues),
     119                        textcolorvalues={textcolorvalues};
     120                elseif ~iscell(textcolorvalues);
     121                        error('plot error message: ''textcolor'' option should be either a string or a cell');
     122                end
     123        else
     124                textcolorvalues={'k'};
     125        end
     126        textcolorvalues=repmat(textcolorvalues,1,numtext); textcolorvalues(numtext+1:end)=[];
     127        %4: textposition
     128        if exist(options,'textposition'),
     129                textpositionvalues=getfieldvalue(options,'textposition');
     130                %ischar if only one textposition -> create a cell
     131                if isnumeric(textpositionvalues),
     132                        textpositionvalues={textpositionvalues};
     133                elseif ~iscell(textpositionvalues);
     134                        error('plot error message: ''textposition'' option should be either a string or a cell');
     135                end
     136        else
     137                error('plot error message: ''textposition'' option is missing');
     138        end
     139        options=changefieldvalue(options,'text',textvalues);
     140        options=changefieldvalue(options,'textsize',textsizevalues);
     141        options=changefieldvalue(options,'textweight',textweightvalues);
     142        options=changefieldvalue(options,'textcolor',textcolorvalues);
     143        options=changefieldvalue(options,'textposition',textpositionvalues);
     144end
    144145
    145146%expdisp

  • issm/trunk/src/m/classes/public/plot/plot_manager.m

    r2827 r2828  
    33%
    44%   Usage:
    5 %      plot_manager(md,options,width,i);
     5%      plot_manager(md,options,subplotwidth,i);
    66%
    77%   See also: PLOTMODEL, PLOT_UNIT
    … …  
    1919
    2020                case 'boundaries',
    21                         plot_boundaries(md,options,width,i);
     21                        plot_boundaries(md,options,subplotwidth,i);
    2222                        return;
    2323                case 'elementnumbering',
    24                         plot_elementnumbering(md,options,width,i);
     24                        plot_elementnumbering(md,options,subplotwidth,i);
    2525                        return;
    2626                case 'highlightelements',
    27                         plot_highlightelements(md,options,width,i);
     27                        plot_highlightelements(md,options,subplotwidth,i);
    2828                        return;
    2929                case 'segmentnumbering',
    30                         plot_segmentnumbering(md,options,width,i);
     30                        plot_segmentnumbering(md,options,subplotwidth,i);
    3131                        return;
    3232                case 'histnorm',
    33                         plot_qmuhistnorm(md,options,width,i);
     33                        plot_qmuhistnorm(md,options,subplotwidth,i);
    3434                        return;
    3535                case 'elements_type',
    36                         plot_elementstype(md,options,width,i);
     36                        plot_elementstype(md,options,subplotwidth,i);
    3737                        return;
    3838                case 'gridnumbering',
    39                         plot_gridnumbering(md,options,width,i);
     39                        plot_gridnumbering(md,options,subplotwidth,i);
    4040                        return;
    4141                case 'highlightgrids',
    42                         plot_highlightgrids(md,options,width,i);
     42                        plot_highlightgrids(md,options,subplotwidth,i);
    4343                        return;
    4444                case {'basal_drag','basal_dragx','basal_dragy'},
    45                         plot_basaldrag(md,options,width,i,data);
     45                        plot_basaldrag(md,options,subplotwidth,i,data);
    4646                        return;
    4747                case 'driving_stress',
    48                         plot_drivingstress(md,options,width,i);
     48                        plot_drivingstress(md,options,subplotwidth,i);
    4949                        return;
    5050                case 'mesh',
    51                         plot_mesh(md,options,width,i);
     51                        plot_mesh(md,options,subplotwidth,i);
    5252                        return;
    5353                case 'penalties',
    54                         plot_penalties(md,options,width,i);
     54                        plot_penalties(md,options,subplotwidth,i);
    5555                        return;
    5656                case 'riftvel',
    57                         plot_riftvel(md,options,width,i);
     57                        plot_riftvel(md,options,subplotwidth,i);
    5858                        return;
    5959                case 'rifts',
    60                         plot_rifts(md,options,width,i);
     60                        plot_rifts(md,options,subplotwidth,i);
    6161                        return;
    6262                case 'riftrelvel',
    63                         plot_riftrelvel(md,options,width,i);
     63                        plot_riftrelvel(md,options,subplotwidth,i);
    6464                        return;
    6565                case 'riftpenetration',
    66                         plot_riftpenetration(md,options,width,i);
     66                        plot_riftpenetration(md,options,subplotwidth,i);
    6767                        return;
    6868                case 'riftfraction',
    69                         plot_riftfraction(md,options,width,i);
     69                        plot_riftfraction(md,options,subplotwidth,i);
    7070                        return;
    7171                case 'sarpwr',
    72                         plot_sarpwr(md,options,width,i)
     72                        plot_sarpwr(md,options,subplotwidth,i)
    7373                        return
    7474                case 'pressureload'
    75                         plot_pressureload(md,options,width,i,data)
     75                        plot_pressureload(md,options,subplotwidth,i,data)
    7676                        return
    7777                case 'segments'
    78                         plot_segments(md,options,width,i,data)
     78                        plot_segments(md,options,subplotwidth,i,data)
    7979                        return
    8080                case {'strainrate_tensor','strainrate','strainrate_principal','strainrate_principalaxis1','strainrate_principalaxis2','strainrate_principalaxis3',...
    8181                                'stress_tensor','stress','stress_principal','stress_principalaxis1','stress_principalaxis2','stress_principalaxis3',...
    8282                                'deviatoricstress_tensor','deviatoricstress','deviatoricstress_principal','deviatoricstress_principalaxis1','deviatoricstress_principalaxis2','deviatoricstress_principalaxis3'},
    83                         plot_tensor(md,options,width,i,data);
     83                        plot_tensor(md,options,subplotwidth,i,data);
    8484                        return;
    8585                case 'thermaltransient_results',
    86                         plot_thermaltransient_results(md,options,width,i);
     86                        plot_thermaltransient_results(md,options,subplotwidth,i);
    8787                        return;
    8888                case 'transient_movie',
    89                         plot_transient_movie(md,options,width,i);
     89                        plot_transient_movie(md,options,subplotwidth,i);
    9090                        return;
    9191                case 'transient_results',
    92                         plot_transient_results(md,options,width,i);
     92                        plot_transient_results(md,options,subplotwidth,i);
    9393                case {'transient_thickness','transient_bed','transient_surface','transient_temperature','transient_melting','transient_vel','transient_vx','transient_vy','transient_vz','transient_pressure'}
    94                         plot_transient_field(md,options,width,i,data);
     94                        plot_transient_field(md,options,subplotwidth,i,data);
    9595                        return;
    9696
    … …  
    107107%Figure out if this is a semi-transparent plot.
    108108if exist(options,'overlay'),
    109         plot_overlay(md,data,options,width,i);
     109        plot_overlay(md,data,options,subplotwidth,i);
    110110        return;
    111111end
    … …  
    113113%Figure out if this is a Section plot
    114114if exist(options,'sectionvalue')
    115         plot_section(md,data,options,width,i);
     115        plot_section(md,data,options,subplotwidth,i);
    116116        return;
    117117end
Note: See TracChangeset for help on using the changeset viewer.