Changeset 61 for trunk/src/plot_field.m

Timestamp:

Mar 24, 2010, 12:51:51 AM (14 years ago)

Author:

sommeria

Message:

gestion of projection objects improved. Implementation of view_field.fig
introduction of a circle to mark vectors with the mouse
various cleaning and debugging

File:

• trunk/src/plot_field.m (modified) (6 diffs)

trunk/src/plot_field.m

@@ -121 +121 @@
     if ishandle(haxes)
         if isequal(get(haxes,'Type'),'axes')
-%             hfig=get(haxes,'Parent');
             axes(haxes)
             testnewfig=0;
@@ -204 +203 @@
     msgbox_uvmat('ERROR','volume plot not implemented yet')
     return
-    %plot_volume(haxes,Data,PlotParam)% A FAIRE
-    %PlotType='volume';
 else
     testnbdim=0;
@@ -309 +306 @@
 function [AxeData,haxes]=plot_profile(data,CellVarIndex,VarType,haxes,PlotParam)
 %-----------------------------------------------------------
-axes(haxes)
+%axes(haxes)
 hfig=get(haxes,'parent');
 AxeData=data;
@@ -316 +313 @@
 if isfield(PlotParam,'NextPlot')
     set(haxes,'NextPlot',PlotParam.NextPlot)
+end
+% adjust the size of the plot to include the whole field, except if KeepLim=1
+if isfield(PlotParam,'FixedLimits') && isequal(PlotParam.FixedLimits,1)  %adjust the graph limits*
+    set(haxes,'XLimMode', 'manual')
+    set(haxes,'YLimMode', 'manual')
+else
+    set(haxes,'XLimMode', 'auto')
+    set(haxes,'YLimMode', 'auto')
 end
 legend_str={};
@@ -372 +377 @@
           charplot_0='''-''';
     end
-%     if testcoordvar==0
-%         coord_x{icell}=[1:data.DimValue(DimIndices(1))];%abscissa by default if no coordinate variable
-%        % charplot_0='''-''';
-%     end
     if isfield(data,'VarAttribute')
         VarAttribute=data.VarAttribute;
@@ -415 +416 @@
 if ~isequal(plotstr,'plot(')
     plotstr(end)=')';
-                %execute plot (instruction  plotstr)
+                %execute plot (instruction  plotstr)   
     eval(plotstr)
                 %%%%%