Index: /issm/trunk-jpl/src/m/mesh/roundmesh.m
===================================================================
--- /issm/trunk-jpl/src/m/mesh/roundmesh.m	(revision 26952)
+++ /issm/trunk-jpl/src/m/mesh/roundmesh.m	(revision 26953)
@@ -1,3 +1,3 @@
-function md=roundmesh(md,radius,resolution)
+function md=roundmesh(md,radius,resolution,varargin)
 %ROUNDMESH - create an unstructured round mesh 
 %
@@ -8,7 +8,12 @@
 %   Usage:
 %      md=roundmesh(md,radius,resolution)
+%      md=roundmesh(md,radius,resolution,'domain.exp')
 
 %First we have to create the domain outline 
-expname = [tempname() '.exp'];
+if nargin<4
+	expname = [tempname() '.exp'];
+else
+	expname = varargin{1};
+end
 
 %Get number of points on the circle
@@ -32,5 +37,7 @@
 
 %delete domain
-delete(expname);
+if nargin<4
+	delete(expname);
+end
 end