Changeset 7316

Timestamp:

02/03/11 16:22:59 (14 years ago)

Author:

Eric.Larour

Message:

improved basinzoom

File:

• issm/trunk/src/m/model/plot/applyoptions.m (modified) (3 diffs)

issm/trunk/src/m/model/plot/applyoptions.m

@@ -6 +6 @@
 %
 %   See also: PLOTMODEL, PARSE_OPTIONS
+                
+
+%some defaults
+if strcmpi(md.hemisphere,'n'), options=addfielddefault(options,'hemisphere','n'); 
+elseif strcmpi(md.hemisphere,'s'), options=addfielddefault(options,'hemisphere','s'); 
+else error('hemisphere field not present');
+end
 
 %fontsize
@@ -89 +96 @@
 %Basinzoom
 if exist(options,'basin');
-        if strcmpi(md.hemisphere,'n'), hemisphere=+1; else hemisphere=-1; end
-        basinzoom('basin',getfieldvalue(options,'basin'),'hemisphere',getfieldvalue(options,'hemisphere',hemisphere),'basindeltax',getfieldvalue(options,'basindeltax',300000),'basindeltay',getfieldvalue(options,'basindeltay',300000),'unit',getfieldvalue(options,'unit',1));
+        basinzoom(options);
 end
 
 %ShowBasins
 if strcmpi(getfieldvalue(options,'showbasins','off'),'on')
-        if strcmpi(md.hemisphere,'n'), hemisphere=+1; else hemisphere=-1; end
-        showbasins('hemisphere',getfieldvalue(options,'hemisphere',hemisphere),'fontsize',fontsize);
+        showbasins(options);
 end
 
@@ -364 +369 @@
         %if we are zooming on a basin, don't take the mesh for the boundaries!
         if exist(options,'basin'),
-                if strcmpi(md.hemisphere,'n'), hemisphere=+1; else hemisphere=-1; end
-                [mdx mdy]=basinzoom('basin',getfieldvalue(options,'basin'),'hemisphere',getfieldvalue(options,'hemisphere',hemisphere),'basindeltax',getfieldvalue(options,'basindeltax',300000),'basindeltay',getfieldvalue(options,'basindeltay',300000),'unit',getfieldvalue(options,'unit',1));
+                [mdx mdy]=basinzoom(options);
         else
                 mdx=[min(md.x) max(md.x)];