Index: /issm/trunk-jpl/src/m/exp/expcoarsen.m
===================================================================
--- /issm/trunk-jpl/src/m/exp/expcoarsen.m	(revision 21779)
+++ /issm/trunk-jpl/src/m/exp/expcoarsen.m	(revision 21780)
@@ -1,3 +1,3 @@
-function expcoarsen(newfile,oldfile,resolution)
+function expcoarsen(newfile,varargin)
 %EXPCOARSEN - coarsen an exp contour
 %
@@ -7,4 +7,5 @@
 %   Usage:
 %      expcoarsen(newfile,oldfile,resolution)
+%      expcoarsen(file,resolution)
 %
 %   Example:
@@ -12,8 +13,16 @@
 
 %Some checks
-if nargin~=3 | nargout
-	error('expcoarsen usage: expcoarsen(newfile,oldfile,resolution)')
-elseif ~exist(oldfile)
-	error(['expcut error message: the file ' oldfile ' does not exist'])
+if nargin==2,
+	resolution = varargin{1};
+	oldfile= newfile;
+elseif nargin==3,
+	oldfile = varargin{1};
+	resolution = varargin{2};
+else
+	error('bad usage');
+end
+
+if ~exist(oldfile)
+	error(['expcoarsen error message: file ''' oldfile ''' does not exist'])
 elseif exist(newfile),
 	choice=input(['A file ' newfile ' already exists, do you want to modify it? (y/n)'],'s');
Index: /issm/trunk-jpl/src/m/exp/expread.m
===================================================================
--- /issm/trunk-jpl/src/m/exp/expread.m	(revision 21779)
+++ /issm/trunk-jpl/src/m/exp/expread.m	(revision 21780)
@@ -65,4 +65,7 @@
 	Struct(count).x=A(1,:)';
 	Struct(count).y=A(2,:)';
+	if any(isnan(A))
+		warning('NaNs found in coordinates, note that some tools like exptool will not work properly with NaNs');
+	end
 
 	if(Struct(count).nods~=length(Struct(count).x))error(['Profile ' num2str(count) ' reports incorrect length']); end;
@@ -78,4 +81,5 @@
 end
 
+
 %close file
 fclose(fid);
Index: /issm/trunk-jpl/src/m/exp/exptool.m
===================================================================
--- /issm/trunk-jpl/src/m/exp/exptool.m	(revision 21779)
+++ /issm/trunk-jpl/src/m/exp/exptool.m	(revision 21780)
@@ -99,5 +99,5 @@
 
 %get current figure
-nofigurecopy=getfieldvalue(options,'nofigurecopy',1);
+nofigurecopy=getfieldvalue(options,'nofigurecopy',0);
 if ~nofigurecopy,
 	if ~isempty(get(0,'children')),%if there is already a figure (return the number of opened figures)