Index: /issm/branches/trunk-larour-NatGeoScience2016/src/m/shp/isshp.m
===================================================================
--- /issm/branches/trunk-larour-NatGeoScience2016/src/m/shp/isshp.m	(revision 21367)
+++ /issm/branches/trunk-larour-NatGeoScience2016/src/m/shp/isshp.m	(revision 21367)
@@ -0,0 +1,14 @@
+function bool=isshp(filename)
+%ISSHP - is a file an shpfile? 
+%
+%   Usage:
+%      isshp(filename);
+%
+%   See also SHPREAD, SHPDOC
+
+[path,name,ext]=fileparts(filename); 
+if strcmpi(ext,'.shp'),
+	bool=1;
+else 
+	bool=0;
+end