Changeset 2819

Timestamp:

01/13/10 12:08:01 (15 years ago)

Author:

Eric.Larour

Message:

Introduced nlines and ncols options

Location:

issm/trunk/src/m/classes/public/plot

Files:

• applyoptions.m (modified) (1 diff)
• plot_manager.m (modified) (2 diffs)
• plot_mesh.m (modified) (2 diffs)
• plotmodel.m (modified) (2 diffs)

issm/trunk/src/m/classes/public/plot/applyoptions.m

@@ -87 +87 @@
 %Caxis
 if exist(options,'caxis'),
-        caxis(getfieldvalue(options,'caxis'));
+        if exist(options,'log'),
+                logvalue=getfieldvalue(options,'log');
+                caxis(log(getfieldvalue(options,'caxis'))/log(logvalue));
+        else
+                caxis(getfieldvalue(options,'caxis'));
+        end
 end
 

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

@@ -1 @@
-function plot_manager(md,options,width,i);
+function plot_manager(md,options,subplotwidth,nlines,ncols,i);
 %PLOT__MANAGER - distribute the plots, called by plotmodel
 %
@@ -122 +122 @@
 
 %standard plot:
-subplot(width,width,i);
+subplot(nlines,ncols,i);
 plot_unit(x,y,z,elements,data2,isongrid,is2d,isquiver,options);
 

issm/trunk/src/m/classes/public/plot/plot_mesh.m

@@ -1 @@
-function plot_mesh(md,options,width,i);
+function plot_mesh(md,options,nlines,ncols,i);
 %PLOT_MESH - plot model mesh
 %
@@ -11 +11 @@
 
 %plot mesh
-subplot(width,width,i); 
+subplot(nlines,ncols,i); 
 
 %plot mesh

issm/trunk/src/m/classes/public/plot/plotmodel.m

@@ -10 +10 @@
 options=plotoptions(varargin{:});
 
-%get numberof subplot
+%get number of subplots
 subplotwidth=ceil(sqrt(options.numberofplots));
+
+%if nlines and ncols specified, then bypass.
+if exist(options.list{1},'nlines'),
+        nlines=getfieldvalue(options.list{1},'nlines');
+else 
+        nlines=subplotwidth;
+end
+
+if exist(options.list{1},'ncols'),
+        ncols=getfieldvalue(options.list{1},'ncols');
+else 
+        ncols=subplotwidth;
+end
+
+%check that nlines and ncols were given at the same time!
+if ((exist(options.list{1},'ncols') & ~exist(options.list{1},'ncols')) | (~exist(options.list{1},'ncols') & exist(options.list{1},'ncols')))
+        error('plotmodel error message: nlines and ncols  need to be specified together, or not at all');
+end
 
 %Get figure number and number of plots
@@ -30 +48 @@
 
                 %call unit plot
-                plot_manager(md,options.list{i},subplotwidth,i);
+                plot_manager(md,options.list{i},subplotwidth,nlines,ncols,i);
 
         end