Index: /issm/branches/trunk-larour-NatGeoScience2016/src/m/shp/shpfromxy.m
===================================================================
--- /issm/branches/trunk-larour-NatGeoScience2016/src/m/shp/shpfromxy.m	(revision 22219)
+++ /issm/branches/trunk-larour-NatGeoScience2016/src/m/shp/shpfromxy.m	(revision 22219)
@@ -0,0 +1,15 @@
+function shpinput(x,y)
+
+
+%create shape file and open it: 
+geom.x=x;
+geom.y=y;
+geom.density=1;
+geom.name='Point';
+geom.Geometry='Point';
+name=[tempname '.shp'];
+
+shpwrite(geom,name);
+system(['open ' name]);
+
+
Index: /issm/branches/trunk-larour-NatGeoScience2016/src/m/shp/shpinput.m
===================================================================
--- /issm/branches/trunk-larour-NatGeoScience2016/src/m/shp/shpinput.m	(revision 22219)
+++ /issm/branches/trunk-larour-NatGeoScience2016/src/m/shp/shpinput.m	(revision 22219)
@@ -0,0 +1,17 @@
+function shpinput(num)
+
+a=ginput(num);
+
+
+%create shape file and open it: 
+geom.x=a(1); 
+geom.y=a(2);
+geom.density=1;
+geom.name='Point';
+geom.Geometry='Point';
+name=[tempname '.shp'];
+
+shpwrite(geom,name);
+system(['open ' name]);
+
+