Index: /issm/trunk-jpl/src/c/analyses/SealevelchangeAnalysis.cpp
===================================================================
--- /issm/trunk-jpl/src/c/analyses/SealevelchangeAnalysis.cpp	(revision 27100)
+++ /issm/trunk-jpl/src/c/analyses/SealevelchangeAnalysis.cpp	(revision 27101)
@@ -9,6 +9,14 @@
 
 /*Model processing*/
-SealevelchangeAnalysis::~SealevelchangeAnalysis(){/*{{{*/
-
+void SealevelchangeAnalysis::CreateConstraints(Constraints* constraints,IoModel* iomodel){/*{{{*/
+	/*No constraints*/
+}/*}}}*/
+void SealevelchangeAnalysis::CreateLoads(Loads* loads, IoModel* iomodel){/*{{{*/
+	/*No loads*/
+}/*}}}*/
+void SealevelchangeAnalysis::CreateNodes(Nodes* nodes,IoModel* iomodel,bool isamr){/*{{{*/
+	::CreateNodes(nodes,iomodel,SealevelchangeAnalysisEnum,P1Enum);
+}/*}}}*/
+void SealevelchangeAnalysis::DeleteBarystaticContributionsParam(FemModel* femmodel){/*{{{*/
 	BarystaticContributions* barycontrib=NULL;
 	GenericParam<BarystaticContributions*>* barycontribparam=NULL;
@@ -18,13 +26,4 @@
 
 	delete barycontrib;
-}/*}}}*/
-void SealevelchangeAnalysis::CreateConstraints(Constraints* constraints,IoModel* iomodel){/*{{{*/
-	/*No constraints*/
-}/*}}}*/
-void SealevelchangeAnalysis::CreateLoads(Loads* loads, IoModel* iomodel){/*{{{*/
-	/*No loads*/
-}/*}}}*/
-void SealevelchangeAnalysis::CreateNodes(Nodes* nodes,IoModel* iomodel,bool isamr){/*{{{*/
-	::CreateNodes(nodes,iomodel,SealevelchangeAnalysisEnum,P1Enum);
 }/*}}}*/
 int  SealevelchangeAnalysis::DofsPerNode(int** doflist,int domaintype,int approximation){/*{{{*/
Index: /issm/trunk-jpl/src/c/analyses/SealevelchangeAnalysis.h
===================================================================
--- /issm/trunk-jpl/src/c/analyses/SealevelchangeAnalysis.h	(revision 27100)
+++ /issm/trunk-jpl/src/c/analyses/SealevelchangeAnalysis.h	(revision 27101)
@@ -13,8 +13,8 @@
 	public:
 		/*Model processing*/
-		~SealevelchangeAnalysis();
 		void CreateConstraints(Constraints* constraints,IoModel* iomodel);
 		void CreateLoads(Loads* loads, IoModel* iomodel);
 		void CreateNodes(Nodes* nodes,IoModel* iomodel,bool isamr=false);
+		static void DeleteBarystaticContributionsParam(FemModel* femmodel);
 		int  DofsPerNode(int** doflist,int domaintype,int approximation);
 		void UpdateElements(Elements* elements,Inputs* inputs,IoModel* iomodel,int analysis_counter,int analysis_type);
Index: /issm/trunk-jpl/src/c/cores/sealevelchange_core.cpp
===================================================================
--- /issm/trunk-jpl/src/c/cores/sealevelchange_core.cpp	(revision 27100)
+++ /issm/trunk-jpl/src/c/cores/sealevelchange_core.cpp	(revision 27101)
@@ -82,7 +82,7 @@
 	femmodel->profiler->Stop(SLRCORE);
 
-	/*Free ressources:*/
+	/*Free resources:*/
+	SealevelchangeAnalysis::DeleteBarystaticContributionsParam(femmodel);
 	delete slgeom;
-
 }
 /*}}}*/
@@ -147,5 +147,5 @@
 	}
 
-	/*Free ressources:*/	
+	/*Free resources:*/	
 	delete bedrock; delete bedrock_rate;
 	delete geoid; delete geoid_rate;
@@ -439,5 +439,5 @@
 	}
 
-	/*Free ressources:*/
+	/*Free resources:*/
 	delete loads;
 	delete subelementoceanareas;
@@ -502,5 +502,5 @@
 	InputUpdateFromVectorx(femmodel,sealevel,SealevelEnum,VertexSIdEnum);	
 
-	/*Free ressources:*/	
+	/*Free resources:*/	
 	delete sealevel;
 	delete deltadsl;
@@ -572,5 +572,5 @@
 	femmodel->inputs->AXPY(1,BedGRDEnum,BedEnum);
 
-	/*Free ressources: */
+	/*Free resources: */
 	xDelete<IssmDouble>(xx);
 	xDelete<IssmDouble>(yy);
@@ -693,5 +693,5 @@
 	femmodel->parameters->AddObject(new DoubleVecParam(AreaeEnum,areae,nel));
 
-	/*Free ressources:*/
+	/*Free resources:*/
 	xDelete<IssmDouble>(xxe);
 	xDelete<IssmDouble>(yye);
@@ -1128,5 +1128,5 @@
 	/*}}}*/
 
-	/*Free ressources:{{{*/
+	/*Free resources:{{{*/
 	if(forcings){
 		for(int i=0;i<nummodels-1;i++){
@@ -1240,5 +1240,5 @@
 	/*}}}*/
 
-	/*Free ressources:{{{*/
+	/*Free resources:{{{*/
 	if(forcingglobal)xDelete<IssmDouble>(forcingglobal);
 	if(forcing)xDelete<IssmDouble>(forcing);