Index: /issm/trunk/src/m/kml/kml_mesh_elem.m
===================================================================
--- /issm/trunk/src/m/kml/kml_mesh_elem.m	(revision 7127)
+++ /issm/trunk/src/m/kml/kml_mesh_elem.m	(revision 7128)
@@ -42,15 +42,26 @@
 while (iarg <= nargin-1)
     if ischar(varargin{iarg})
-        eval([varargin{iarg} '=varargin{iarg+1};']);
-        if (numel(varargin{iarg+1}) <= 20)
-            disp([varargin{iarg} '=' any2str(varargin{iarg+1}) ';']);
+        if ~isempty(strmatch(varargin{iarg},...
+                {'data','alt',...
+                 'cmin','cmax','cmap'},...
+                'exact'))
+            eval([varargin{iarg} '=varargin{iarg+1};']);
+            if (numel(varargin{iarg+1}) <= 20)
+                disp([varargin{iarg} '=' any2str(varargin{iarg+1}) ';']);
+            else
+                disp([varargin{iarg} '=' string_size(varargin{iarg+1}) ' ' class(varargin{iarg+1}) ';']);
+            end
         else
-            disp([varargin{iarg} '=' string_size(varargin{iarg+1}) ' ' class(varargin{iarg+1}) ';']);
-        end
-        if strcmpi(varargin{iarg},'data')
-            cdata=inputname(iarg+1);
+            if (numel(varargin{iarg+1}) <= 20)
+                warning([varargin{iarg} '=' any2str(varargin{iarg+1}) ' is not recognized.']);
+            else
+                warning([varargin{iarg} '=' string_size(varargin{iarg+1}) ' ' class(varargin{iarg+1}) ' is not recognized.']);
+            end
         end
     else
         error(['''' any2str(varargin{iarg}) ''' is not a parameter name.']);
+    end
+    if strcmpi(varargin{iarg},'data')
+        cdata=inputname(iarg+1);
     end
     iarg=iarg+2;
Index: /issm/trunk/src/m/kml/kml_mesh_write.m
===================================================================
--- /issm/trunk/src/m/kml/kml_mesh_write.m	(revision 7127)
+++ /issm/trunk/src/m/kml/kml_mesh_write.m	(revision 7128)
@@ -48,15 +48,26 @@
 while (iarg <= nargin-1)
     if ischar(varargin{iarg})
-        eval([varargin{iarg} '=varargin{iarg+1};']);
-        if (numel(varargin{iarg+1}) <= 20)
-            disp([varargin{iarg} '=' any2str(varargin{iarg+1}) ';']);
+        if ~isempty(strmatch(varargin{iarg},...
+                {'data','alt','lwidth','popac',...
+                 'cmin','cmax','cmap','prtplt'},...
+                'exact'))
+            eval([varargin{iarg} '=varargin{iarg+1};']);
+            if (numel(varargin{iarg+1}) <= 20)
+                disp([varargin{iarg} '=' any2str(varargin{iarg+1}) ';']);
+            else
+                disp([varargin{iarg} '=' string_size(varargin{iarg+1}) ' ' class(varargin{iarg+1}) ';']);
+            end
         else
-            disp([varargin{iarg} '=' string_size(varargin{iarg+1}) ' ' class(varargin{iarg+1}) ';']);
-        end
-        if strcmpi(varargin{iarg},'data')
-            cdata=inputname(iarg+1);
+            if (numel(varargin{iarg+1}) <= 20)
+                warning([varargin{iarg} '=' any2str(varargin{iarg+1}) ' is not recognized.']);
+            else
+                warning([varargin{iarg} '=' string_size(varargin{iarg+1}) ' ' class(varargin{iarg+1}) ' is not recognized.']);
+            end
         end
     else
         error(['''' any2str(varargin{iarg}) ''' is not a parameter name.']);
+    end
+    if strcmpi(varargin{iarg},'data')
+        cdata=inputname(iarg+1);
     end
     iarg=iarg+2;
Index: /issm/trunk/src/m/kml/kml_part_edges.m
===================================================================
--- /issm/trunk/src/m/kml/kml_part_edges.m	(revision 7127)
+++ /issm/trunk/src/m/kml/kml_part_edges.m	(revision 7128)
@@ -43,15 +43,26 @@
 while (iarg <= nargin-1)
     if ischar(varargin{iarg})
-        eval([varargin{iarg} '=varargin{iarg+1};']);
-        if (numel(varargin{iarg+1}) <= 20)
-            disp([varargin{iarg} '=' any2str(varargin{iarg+1}) ';']);
+        if ~isempty(strmatch(varargin{iarg},...
+                {'data','alt',...
+                 'cmin','cmax','cmap','prtplt'},...
+                'exact'))
+            eval([varargin{iarg} '=varargin{iarg+1};']);
+            if (numel(varargin{iarg+1}) <= 20)
+                disp([varargin{iarg} '=' any2str(varargin{iarg+1}) ';']);
+            else
+                disp([varargin{iarg} '=' string_size(varargin{iarg+1}) ' ' class(varargin{iarg+1}) ';']);
+            end
         else
-            disp([varargin{iarg} '=' string_size(varargin{iarg+1}) ' ' class(varargin{iarg+1}) ';']);
-        end
-        if strcmpi(varargin{iarg},'data')
-            cdata=inputname(iarg+1);
+            if (numel(varargin{iarg+1}) <= 20)
+                warning([varargin{iarg} '=' any2str(varargin{iarg+1}) ' is not recognized.']);
+            else
+                warning([varargin{iarg} '=' string_size(varargin{iarg+1}) ' ' class(varargin{iarg+1}) ' is not recognized.']);
+            end
         end
     else
         error(['''' any2str(varargin{iarg}) ''' is not a parameter name.']);
+    end
+    if strcmpi(varargin{iarg},'data')
+        cdata=inputname(iarg+1);
     end
     iarg=iarg+2;
Index: /issm/trunk/src/m/kml/kml_part_elems.m
===================================================================
--- /issm/trunk/src/m/kml/kml_part_elems.m	(revision 7127)
+++ /issm/trunk/src/m/kml/kml_part_elems.m	(revision 7128)
@@ -43,15 +43,26 @@
 while (iarg <= nargin-1)
     if ischar(varargin{iarg})
-        eval([varargin{iarg} '=varargin{iarg+1};']);
-        if (numel(varargin{iarg+1}) <= 20)
-            disp([varargin{iarg} '=' any2str(varargin{iarg+1}) ';']);
+        if ~isempty(strmatch(varargin{iarg},...
+                {'data','alt',...
+                 'cmin','cmax','cmap','prtplt'},...
+                'exact'))
+            eval([varargin{iarg} '=varargin{iarg+1};']);
+            if (numel(varargin{iarg+1}) <= 20)
+                disp([varargin{iarg} '=' any2str(varargin{iarg+1}) ';']);
+            else
+                disp([varargin{iarg} '=' string_size(varargin{iarg+1}) ' ' class(varargin{iarg+1}) ';']);
+            end
         else
-            disp([varargin{iarg} '=' string_size(varargin{iarg+1}) ' ' class(varargin{iarg+1}) ';']);
-        end
-        if strcmpi(varargin{iarg},'data')
-            cdata=inputname(iarg+1);
+            if (numel(varargin{iarg+1}) <= 20)
+                warning([varargin{iarg} '=' any2str(varargin{iarg+1}) ' is not recognized.']);
+            else
+                warning([varargin{iarg} '=' string_size(varargin{iarg+1}) ' ' class(varargin{iarg+1}) ' is not recognized.']);
+            end
         end
     else
         error(['''' any2str(varargin{iarg}) ''' is not a parameter name.']);
+    end
+    if strcmpi(varargin{iarg},'data')
+        cdata=inputname(iarg+1);
     end
     iarg=iarg+2;
Index: /issm/trunk/src/m/kml/kml_part_flagedges.m
===================================================================
--- /issm/trunk/src/m/kml/kml_part_flagedges.m	(revision 7127)
+++ /issm/trunk/src/m/kml/kml_part_flagedges.m	(revision 7128)
@@ -39,9 +39,19 @@
 while (iarg <= nargin-1)
     if ischar(varargin{iarg})
-        eval([varargin{iarg} '=varargin{iarg+1};']);
-        if (numel(varargin{iarg+1}) <= 20)
-            disp([varargin{iarg} '=' any2str(varargin{iarg+1}) ';']);
+        if ~isempty(strmatch(varargin{iarg},...
+                {'alt','prtplt'},...
+                'exact'))
+            eval([varargin{iarg} '=varargin{iarg+1};']);
+            if (numel(varargin{iarg+1}) <= 20)
+                disp([varargin{iarg} '=' any2str(varargin{iarg+1}) ';']);
+            else
+                disp([varargin{iarg} '=' string_size(varargin{iarg+1}) ' ' class(varargin{iarg+1}) ';']);
+            end
         else
-            disp([varargin{iarg} '=' string_size(varargin{iarg+1}) ' ' class(varargin{iarg+1}) ';']);
+            if (numel(varargin{iarg+1}) <= 20)
+                warning([varargin{iarg} '=' any2str(varargin{iarg+1}) ' is not recognized.']);
+            else
+                warning([varargin{iarg} '=' string_size(varargin{iarg+1}) ' ' class(varargin{iarg+1}) ' is not recognized.']);
+            end
         end
     else
Index: /issm/trunk/src/m/kml/kml_partitions.m
===================================================================
--- /issm/trunk/src/m/kml/kml_partitions.m	(revision 7127)
+++ /issm/trunk/src/m/kml/kml_partitions.m	(revision 7128)
@@ -44,15 +44,26 @@
 while (iarg <= nargin-1)
     if ischar(varargin{iarg})
-        eval([varargin{iarg} '=varargin{iarg+1};']);
-        if (numel(varargin{iarg+1}) <= 20)
-            disp([varargin{iarg} '=' any2str(varargin{iarg+1}) ';']);
+        if ~isempty(strmatch(varargin{iarg},...
+                {'data','alt',...
+                 'cmin','cmax','cmap','prtplt'},...
+                'exact'))
+            eval([varargin{iarg} '=varargin{iarg+1};']);
+            if (numel(varargin{iarg+1}) <= 20)
+                disp([varargin{iarg} '=' any2str(varargin{iarg+1}) ';']);
+            else
+                disp([varargin{iarg} '=' string_size(varargin{iarg+1}) ' ' class(varargin{iarg+1}) ';']);
+            end
         else
-            disp([varargin{iarg} '=' string_size(varargin{iarg+1}) ' ' class(varargin{iarg+1}) ';']);
-        end
-        if strcmpi(varargin{iarg},'data')
-            cdata=inputname(iarg+1);
+            if (numel(varargin{iarg+1}) <= 20)
+                warning([varargin{iarg} '=' any2str(varargin{iarg+1}) ' is not recognized.']);
+            else
+                warning([varargin{iarg} '=' string_size(varargin{iarg+1}) ' ' class(varargin{iarg+1}) ' is not recognized.']);
+            end
         end
     else
         error(['''' any2str(varargin{iarg}) ''' is not a parameter name.']);
+    end
+    if strcmpi(varargin{iarg},'data')
+        cdata=inputname(iarg+1);
     end
     iarg=iarg+2;
Index: /issm/trunk/src/m/kml/kml_unsh_edges.m
===================================================================
--- /issm/trunk/src/m/kml/kml_unsh_edges.m	(revision 7127)
+++ /issm/trunk/src/m/kml/kml_unsh_edges.m	(revision 7128)
@@ -39,9 +39,19 @@
 while (iarg <= nargin-1)
     if ischar(varargin{iarg})
-        eval([varargin{iarg} '=varargin{iarg+1};']);
-        if (numel(varargin{iarg+1}) <= 20)
-            disp([varargin{iarg} '=' any2str(varargin{iarg+1}) ';']);
+        if ~isempty(strmatch(varargin{iarg},...
+                {'alt','prtplt'},...
+                'exact'))
+            eval([varargin{iarg} '=varargin{iarg+1};']);
+            if (numel(varargin{iarg+1}) <= 20)
+                disp([varargin{iarg} '=' any2str(varargin{iarg+1}) ';']);
+            else
+                disp([varargin{iarg} '=' string_size(varargin{iarg+1}) ' ' class(varargin{iarg+1}) ';']);
+            end
         else
-            disp([varargin{iarg} '=' string_size(varargin{iarg+1}) ' ' class(varargin{iarg+1}) ';']);
+            if (numel(varargin{iarg+1}) <= 20)
+                warning([varargin{iarg} '=' any2str(varargin{iarg+1}) ' is not recognized.']);
+            else
+                warning([varargin{iarg} '=' string_size(varargin{iarg+1}) ' ' class(varargin{iarg+1}) ' is not recognized.']);
+            end
         end
     else