Index: /issm/trunk-jpl/src/m/plot/applyoptions.m
===================================================================
--- /issm/trunk-jpl/src/m/plot/applyoptions.m	(revision 14299)
+++ /issm/trunk-jpl/src/m/plot/applyoptions.m	(revision 14300)
@@ -331,50 +331,4 @@
 end
 
-%position of figure
-if exist(options,'figposition'),
-
-	figposition=getfieldvalue(options,'figposition');
-	if ischar(figposition),
-		if strcmpi(figposition,'larour'),
-			set(gcf,'Position',[1604 4 1594 1177]);
-		elseif strcmpi(figposition,'larour2'),
-			set(gcf,'Position',[756    62   827   504]);
-		elseif strcmpi(figposition,'mathieu'),
-			set(gcf,'Position',[300 1 1580 1150]);
-		elseif strcmpi(figposition,'fullscreen'),
-			set(gcf,'Position',get(0,'ScreenSize'));
-		elseif strcmpi(figposition,'halfright'),
-			screen=get(0,'ScreenSize');
-			left=screen(1); bott=screen(2); widt=screen(3); heig=screen(4)-25;
-			set(gcf,'Position',fix([left+widt/2 bott widt/2 heig]));
-		elseif strcmpi(figposition,'halfleft'),
-			screen=get(0,'ScreenSize');
-			left=screen(1); bott=screen(2); widt=screen(3); heig=screen(4)-25;
-			set(gcf,'Position',fix([left bott widt/2 heig]));
-		elseif strcmpi(figposition,'square'),
-			screen=get(0,'ScreenSize');
-			left=screen(1); bott=screen(2); widt=min(screen(3)-25,screen(4)-25);
-			set(gcf,'Position',fix([left+(screen(3)-widt) bott widt widt]));
-		elseif strcmpi(figposition,'portrait'),
-			%reformat with letter paper size (8.5" x 11")
-			screen=get(0,'ScreenSize');
-			left=screen(1); bott=screen(2); widt=screen(3); heig=screen(4)-25;
-			portrait=fix([left+widt-(heig*8.5/11) bott heig*8.5/11 heig]);
-			set(gcf,'Position',portrait)
-		elseif strcmpi(figposition,'landscape'),
-			%reformat with letter paper size (8.5" x 11")
-			screen=get(0,'ScreenSize');
-			left=screen(1); bott=screen(2); widt=screen(3); heig=screen(4)-25;
-			landscape=fix([left+widt-(heig*11/8.5) bott heig*11/8.5 heig]);
-			set(gcf,'Position',landscape)
-		else
-			disp('''figposition'' string not supported yet');
-		end
-	else
-		set(gcf,'Position',figposition);
-	end
-
-end
-
 %axes position
 if exist(options,'axesPosition')
@@ -446,7 +400,4 @@
 set(gca,'color',getfieldvalue(options,'backgroundcolor','none'));
 
-%figurebackgrounbcolor
-set(gcf,'color',getfieldvalue(options,'figurebackgroundcolor','w'));
-
 %lighting
 if strcmpi(getfieldvalue(options,'light','off'),'on'),
Index: /issm/trunk-jpl/src/m/plot/plotmodel.m
===================================================================
--- /issm/trunk-jpl/src/m/plot/plotmodel.m	(revision 14299)
+++ /issm/trunk-jpl/src/m/plot/plotmodel.m	(revision 14300)
@@ -34,13 +34,54 @@
 
 	%Create figure 
+	f=figure(figurenumber);clf;
 	if strcmpi(getfieldvalue(options.list{1},'visible','on'),'off'),
-		F=figure(figurenumber);clf;
-		set(F,'Visible','Off');
-	else
-		figure(figurenumber);clf;
+		set(f,'Visible','Off');
 	end
 
-	%Use zbuffer renderer (snoother colors)
-	set(gcf,'Renderer','zbuffer');
+	if exist(options.list{1},'figposition'), % {{{
+		figposition=getfieldvalue(options.list{1},'figposition');
+		if ischar(figposition),
+			if strcmpi(figposition,'larour'),
+				set(gcf,'Position',[1604 4 1594 1177]);
+			elseif strcmpi(figposition,'larour2'),
+				set(gcf,'Position',[756    62   827   504]);
+			elseif strcmpi(figposition,'mathieu'),
+				set(gcf,'Position',[300 1 1580 1150]);
+			elseif strcmpi(figposition,'fullscreen'),
+				set(gcf,'Position',get(0,'ScreenSize'));
+			elseif strcmpi(figposition,'halfright'),
+				screen=get(0,'ScreenSize');
+				left=screen(1); bott=screen(2); widt=screen(3); heig=screen(4)-25;
+				set(gcf,'Position',fix([left+widt/2 bott widt/2 heig]));
+			elseif strcmpi(figposition,'halfleft'),
+				screen=get(0,'ScreenSize');
+				left=screen(1); bott=screen(2); widt=screen(3); heig=screen(4)-25;
+				set(gcf,'Position',fix([left bott widt/2 heig]));
+			elseif strcmpi(figposition,'square'),
+				screen=get(0,'ScreenSize');
+				left=screen(1); bott=screen(2); widt=min(screen(3)-25,screen(4)-25);
+				set(gcf,'Position',fix([left+(screen(3)-widt) bott widt widt]));
+			elseif strcmpi(figposition,'portrait'),
+				%reformat with letter paper size (8.5" x 11")
+				screen=get(0,'ScreenSize');
+				left=screen(1); bott=screen(2); widt=screen(3); heig=screen(4)-25;
+				portrait=fix([left+widt-(heig*8.5/11) bott heig*8.5/11 heig]);
+				set(gcf,'Position',portrait)
+			elseif strcmpi(figposition,'landscape'),
+				%reformat with letter paper size (8.5" x 11")
+				screen=get(0,'ScreenSize');
+				left=screen(1); bott=screen(2); widt=screen(3); heig=screen(4)-25;
+				landscape=fix([left+widt-(heig*11/8.5) bott heig*11/8.5 heig]);
+				set(gcf,'Position',landscape)
+			else
+				disp('''figposition'' string not supported yet');
+			end
+		else
+			set(gcf,'Position',figposition);
+		end
+	end % }}}
+
+	%Use zbuffer renderer (snoother colors) and white background
+	set(f,'Renderer','zbuffer','color',getfieldvalue(options.list{1},'figurebackgroundcolor','w'));
 
 	%Go through all data plottable and close window if an error occurs