Index: /issm/trunk/src/m/utils/Array/str2int.m
===================================================================
--- /issm/trunk/src/m/utils/Array/str2int.m	(revision 4026)
+++ /issm/trunk/src/m/utils/Array/str2int.m	(revision 4026)
@@ -0,0 +1,15 @@
+function aint=str2int(astr);
+
+i=1;
+aint=[];
+while (i <= length(astr))
+	if (astr(i) >= '0' && astr(i) <= '9')
+		aint=sscanf(astr(i:length(astr)),'%d',[1,1]);
+		break
+	else
+		i=i+1;
+	end
+end
+
+end
+