Index: ../trunk-jpl/test/NightlyRun/test4001.m
===================================================================
--- ../trunk-jpl/test/NightlyRun/test4001.m	(revision 18547)
+++ ../trunk-jpl/test/NightlyRun/test4001.m	(revision 18548)
@@ -6,7 +6,7 @@
 
 %Organizer
 mkdir Models
-org=organizer('repository','Models/','prefix','IceOcean.2013#','steps',steps);
+org=organizer('repository','Models/','prefix','IceOcean_','steps',steps);
 
 presentdirectory=pwd; 
 addpath(recursivepath([pwd '/../MITgcm']));
@@ -378,7 +378,6 @@
 	[x,y]=ll2xy(lat,long,-1);
 
 	index=[];
-
 	%  C  D
 	%  A  B 
 	for j=1:Ny-1,
@@ -476,7 +475,6 @@
 	md.friction.coefficient=30*ones(md.mesh.numberofvertices,1);
 	pos=find(md.mask.groundedice_levelset<=0);
 	md.friction.coefficient(pos)=0;
-	
 	md.friction.p=ones(md.mesh.numberofelements,1);
 	md.friction.q=ones(md.mesh.numberofelements,1);
 
@@ -491,9 +489,7 @@
 	md.damage.D=zeros(md.mesh.numberofvertices,1);
 	md.damage.spcdamage=NaN*ones(md.mesh.numberofvertices,1);
 	
-	% {{{ Deal with boundary conditions: we have the level sets right, just a matter of getting
-
-	%the spcs going.  
+	%the spcs going
 	md.stressbalance.spcvx=NaN*ones(md.mesh.numberofvertices,1);
 	md.stressbalance.spcvy=NaN*ones(md.mesh.numberofvertices,1);
 	md.stressbalance.spcvz=NaN*ones(md.mesh.numberofvertices,1);
@@ -520,7 +516,6 @@
 	md.stressbalance.spcvy(pos)=md.initialization.vy(pos);
 	md.stressbalance.spcvz(pos)=md.initialization.vz(pos);
 	md.masstransport.spcthickness(pos)=md.geometry.thickness(pos);
-	% }}}
 
 	md.basalforcings.groundedice_melting_rate=zeros(md.mesh.numberofvertices,1);
 	md.basalforcings.floatingice_melting_rate=zeros(md.mesh.numberofvertices,1);
