Changeset 760 for trunk/src/plot_field.m

Timestamp:

May 1, 2014, 8:26:46 AM (10 years ago)

Author:

sommeria

Message:

various improvements

File:

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

trunk/src/plot_field.m

@@ -167 +167 @@
     set(haxes,'YLimMode', 'auto')
 end
+
+if isfield(PlotParamOut.Axes,'CheckFixAspectRatio') && isequal(PlotParamOut.Axes.CheckFixAspectRatio,1)&&isfield(PlotParamOut.Axes,'AspectRatio')
+    set(haxes,'DataAspectRatioMode','manual')
+    set(haxes,'DataAspectRatio',[PlotParamOut.Axes.AspectRatio 1 1])
+else
+    set(haxes,'DataAspectRatioMode','auto')%automatic aspect ratio
+end
+
 errormsg='';
 AxeData=get(haxes,'UserData');
@@ -201 +209 @@
 end
 
+%% aspect ratio
+AspectRatio=get(haxes,'DataAspectRatio');
+PlotParamOut.Axes.AspectRatio=AspectRatio(1)/AspectRatio(2);
+
 %% text display
-
 htext=findobj(hfig,'Tag','TableDisplay');
 hchecktable=findobj(hfig,'Tag','CheckTable');
@@ -552 +563 @@
 
 %% determine plot aspect ratio
-if isfield(Coordinates,'CheckFixAspectRatio') && isequal(Coordinates.CheckFixAspectRatio,1)&&isfield(Coordinates,'AspectRatio')
-    set(haxes,'DataAspectRatioMode','manual')
-    set(haxes,'DataAspectRatio',[Coordinates.AspectRatio 1 1])
-else
-    set(haxes,'DataAspectRatioMode','auto')%automatic aspect ratio
-    AspectRatio=get(haxes,'DataAspectRatio');
-    CoordinatesOut.AspectRatio=AspectRatio(1)/AspectRatio(2);
-end
+% if isfield(Coordinates,'CheckFixAspectRatio') && isequal(Coordinates.CheckFixAspectRatio,1)&&isfield(Coordinates,'AspectRatio')
+%     set(haxes,'DataAspectRatioMode','manual')
+%     set(haxes,'DataAspectRatio',[Coordinates.AspectRatio 1 1])
+% else
+%     set(haxes,'DataAspectRatioMode','auto')%automatic aspect ratio
+%     AspectRatio=get(haxes,'DataAspectRatio');
+%     CoordinatesOut.AspectRatio=AspectRatio(1)/AspectRatio(2);
+% end
 
 %-------------------------------------------------------------------
@@ -1210 +1221 @@
     PlotParamOut.Axes.y_units=y_units;
 end
-if isfield(PlotParam,'Axes') && isfield(PlotParam.Axes,'CheckFixAspectRatio') && isequal(PlotParam.Axes.CheckFixAspectRatio,1)
-    set(haxes,'DataAspectRatioMode','manual')
-    if isfield(PlotParam.Axes,'AspectRatio')
-        set(haxes,'DataAspectRatio',[PlotParam.Axes.AspectRatio 1 1])
-    end
-else
-    set(haxes,'DataAspectRatioMode','auto')
-end
+% if isfield(PlotParam,'Axes') && isfield(PlotParam.Axes,'CheckFixAspectRatio') && isequal(PlotParam.Axes.CheckFixAspectRatio,1)
+%     set(haxes,'DataAspectRatioMode','manual')
+%     if isfield(PlotParam.Axes,'AspectRatio')
+%         set(haxes,'DataAspectRatio',[PlotParam.Axes.AspectRatio 1 1])
+%     end
+% else
+%     set(haxes,'DataAspectRatioMode','auto')
+% end
+
 %-------------------------------------------------------------------
 % --- function for plotting vectors