Changeset 6581 for issm/trunk/src/m/solvers/solver_thermal_nonlinear.m

Timestamp:

11/15/10 13:55:35 (14 years ago)

Author:

Mathieu Morlighem

Message:

Some cleaning: parameters not needed for verbose

File:

• issm/trunk/src/m/solvers/solver_thermal_nonlinear.m (modified) (1 diff)

issm/trunk/src/m/solvers/solver_thermal_nonlinear.m

@@ -25 +25 @@
                 if kffpartitioning,
                         [K_gg,K_ff,K_fs,p_g,p_f,melting_offset]=SystemMatrices(femmodel.elements,femmodel.nodes,femmodel.vertices,femmodel.loads,femmodel.materials,femmodel.parameters);
-                        p_f = Reduceload( p_f, K_fs, femmodel.ys,femmodel.parameters);
+                        p_f = Reduceload( p_f, K_fs, femmodel.ys);
                 else
                         [K_gg,K_ff,K_fs,p_g,p_f,melting_offset]=SystemMatrices(femmodel.elements,femmodel.nodes,femmodel.vertices,femmodel.loads,femmodel.materials,femmodel.parameters);
-                        [K_ff, K_fs] = Reducematrixfromgtof( K_gg, femmodel.nodesets,femmodel.parameters); 
-                        p_f = Reduceloadfromgtof( p_g, K_fs, femmodel.ys, femmodel.nodesets,femmodel.parameters);
+                        [K_ff, K_fs] = Reducematrixfromgtof( K_gg, femmodel.nodesets); 
+                        p_f = Reduceloadfromgtof( p_g, K_fs, femmodel.ys, femmodel.nodesets);
                 end
 
                 issmprintf(VerboseSolver(),'%s%g','   condition number of stiffness matrix: ',condest(K_ff));
                 t_f=Solver(K_ff,p_f,[],femmodel.parameters);
-                t_g= Mergesolutionfromftog( t_f, femmodel.ys, femmodel.nodesets,femmodel.parameters); 
+                t_g= Mergesolutionfromftog( t_f, femmodel.ys, femmodel.nodesets); 
 
                 [femmodel.elements,femmodel.materials]=InputUpdateFromSolution(femmodel.elements,femmodel.nodes,femmodel.vertices,femmodel.loads,femmodel.materials,femmodel.parameters,t_g);