Index: sm/trunk/src/m/solutions/balancedthickness2_core.m
===================================================================
--- /issm/trunk/src/m/solutions/balancedthickness2_core.m	(revision 4766)
+++ 	(revision )
@@ -1,30 +1,0 @@
-function femmodel=balancedthickness2_core(femmodel)
-%BALANCEDTHICKNESS_CORE - linear solution sequence
-%
-%   Usage:
-%      femmodel=balancedthickness2_core(femmodel)
-
-	%recover parameters common to all solutions
-	verbose=femmodel.parameters.Verbose;
-	dim=femmodel.parameters.Dim;
-	solution_type=femmodel.parameters.SolutionType;
-
-	%Activate formulation
-	femmodel=SetCurrentConfiguration(femmodel,Balancedthickness2AnalysisEnum);
-
-	displaystring(verbose,'\n%s',['depth averaging velocities...']);
-	[femmodel.elements,femmodel.nodes,femmodel.vertices,femmodel.loads,femmodel.materials,femmodel.parameters]=InputDepthAverage(femmodel.elements,femmodel.nodes,femmodel.vertices,femmodel.loads,femmodel.materials,femmodel.parameters,VxEnum,VxAverageEnum);
-	[femmodel.elements,femmodel.nodes,femmodel.vertices,femmodel.loads,femmodel.materials,femmodel.parameters]=InputDepthAverage(femmodel.elements,femmodel.nodes,femmodel.vertices,femmodel.loads,femmodel.materials,femmodel.parameters,VyEnum,VyAverageEnum);
-
-	displaystring(verbose,'\n%s',['call computational core...']);
-	femmodel=solver_linear(femmodel);
-	
-	displaystring(verbose,'\n%s',['extude computed thickness on all layers...']);
-	%femmodel.elements=InputExtrude(femmodel.elements,femmodel.nodes,femmodel.vertices,femmodel.loads,femmodel.materials,femmodel.parameters,ThicknessEnum);
-
-	if solution_type==Balancedthickness2SolutionEnum,
-		displaystring(verbose,'\n%s',['saving results...']);
-		femmodel.elements=InputToResult(femmodel.elements,femmodel.nodes,femmodel.vertices,femmodel.loads,femmodel.materials,femmodel.parameters,ThicknessEnum);
-	end
-	
-end %end function