Index: /issm/trunk-jpl/src/m/exp/expcreateprofile.m
===================================================================
--- /issm/trunk-jpl/src/m/exp/expcreateprofile.m	(revision 14535)
+++ /issm/trunk-jpl/src/m/exp/expcreateprofile.m	(revision 14536)
@@ -12,5 +12,5 @@
 
 %Get root of filename
-[path root ext ver]=fileparts(filename);
+[path root ext]=fileparts(filename);
 
 %Get profile
Index: /issm/trunk-jpl/src/m/exp/expflip.m
===================================================================
--- /issm/trunk-jpl/src/m/exp/expflip.m	(revision 14535)
+++ /issm/trunk-jpl/src/m/exp/expflip.m	(revision 14536)
@@ -6,5 +6,5 @@
 %
 
-a=expread(domainname,1);
+a=expread(domainname);
 
 for i=1:length(a),
Index: /issm/trunk-jpl/src/m/morphological/vectorialize.m
===================================================================
--- /issm/trunk-jpl/src/m/morphological/vectorialize.m	(revision 14536)
+++ /issm/trunk-jpl/src/m/morphological/vectorialize.m	(revision 14536)
@@ -0,0 +1,11 @@
+function contours=vectorialize(mask,connectivity);
+
+	vec=bwboundaries(mask,8);
+	
+	contours=struct([]);
+	for i=1:length(vec),
+		contours(end+1).x=vec{i}(:,2);
+		contours(end).y=vec{i}(:,1);
+		contours(end).density=1;
+	end
+	contours(1).name='';