Changeset 1663 for issm/trunk/src/m/solutions/ice/ModelProcessorDiagnosticStokes.m

Timestamp:

08/13/09 07:13:44 (16 years ago)

Author:

seroussi

Message:

fixed icefront when no icefront

File:

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

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

@@ -107 +107 @@
 
 %icefront
-segmentonneumann_diag_stokes=md.segmentonneumann_diag_stokes;
+if isnan(md.segmentonneumann_diag_stokes),
+        segmentonneumann_diag_stokes=[];
+else
+        segmentonneumann_diag_stokes=md.segmentonneumann_diag_stokes;
+end
 length_segmentonneumann_diag_stokes= size(segmentonneumann_diag_stokes,1);
 loads=struct('load',cell(length_segmentonneumann_diag_stokes,1));