Changeset 392

Timestamp:

05/13/09 13:52:42 (16 years ago)

Author:

Mathieu Morlighem

Message:

comic bug

File:

• issm/trunk/src/m/solutions/ice/diagnostic_core_nonlinear.m (modified) (1 diff)

issm/trunk/src/m/solutions/ice/diagnostic_core_nonlinear.m

@@ -144 +144 @@
 if nout==2,
         %K_ff and K_fs are requested, for the case where we have no loads (ie basal drag)
-        inputs.drag=zeros(gridset.gsize,1); kflag=1;pflag=1; 
         inputs.velocity=soln(count).u_g;
+        kflag=1;pflag=0; 
 
         [K_gg,p_g]=SystemMatrices(elements,grids,loads,materials,kflag, pflag, sparsity,inputs,analysis_type);