Index: /issm/trunk/src/m/utils/OS/clearall.m
===================================================================
--- /issm/trunk/src/m/utils/OS/clearall.m	(revision 2245)
+++ /issm/trunk/src/m/utils/OS/clearall.m	(revision 2245)
@@ -0,0 +1,10 @@
+%script that erases all variables except ISSM_DIR
+list=whos;
+for i=1:length(list),
+	if ~strcmpi(list(i).name,'ISSM_DIR'),
+		clear(list(i).name);
+	end
+end
+clear list;
+clear i;
+