Index: /issm/trunk-jpl/src/m/array/allempty.m
===================================================================
--- /issm/trunk-jpl/src/m/array/allempty.m	(revision 22995)
+++ /issm/trunk-jpl/src/m/array/allempty.m	(revision 22996)
@@ -1,3 +1,2 @@
-%
 %  function to return an empty cell array if all array elements are empty
 %
Index: /issm/trunk-jpl/src/m/array/allequal.m
===================================================================
--- /issm/trunk-jpl/src/m/array/allequal.m	(revision 22995)
+++ /issm/trunk-jpl/src/m/array/allequal.m	(revision 22996)
@@ -1,3 +1,2 @@
-%
 %  function to return an empty array if all array elements are
 %  equal to the given value, which may also be empty but not nan.
Index: sm/trunk-jpl/src/m/array/allnan.m
===================================================================
--- /issm/trunk-jpl/src/m/array/allnan.m	(revision 22995)
+++ 	(revision )
@@ -1,22 +1,0 @@
-%
-%  function to return an empty double array if all array elements are NaN
-%
-%  function [dout]=allnan(din)
-%
-function [dout]=allnan(din)
-
-if ~nargin
-    help allnan
-    return
-end
-
-for i=1:numel(din)
-    if ~isnan(din(i))
-        dout=din;
-        return
-    end
-end
-dout=[];
-
-end
-