Changeset 9218 for issm/trunk/src/m/model/ismodelselfconsistent.m

Timestamp:

08/09/11 11:50:24 (14 years ago)

Author:

Mathieu Morlighem

Message:

removed balance velocities (not working) for code cleaning

File:

• issm/trunk/src/m/model/ismodelselfconsistent.m (modified) (1 diff)

issm/trunk/src/m/model/ismodelselfconsistent.m

@@ -573 +573 @@
                         if any(sum(abs(md.vx(md.elements)),2)==0 & sum(abs(md.vy(md.elements)),2)==0)
                                 message('model not consistent: at least one triangle has all its vertices with a zero velocity');
-                        end
-                        %}}}
-                case BalancevelocitiesAnalysisEnum,
-                        % {{{2
-                        %VELOCITIES MELTING AND ACCUMULATION
-                        fields={'vx','vy','basal_melting_rate'};
-                        checksize(md,fields,[md.numberofnodes 1]);
-                        checknan(md,fields);
-
-                        %SPC
-                        if any((~isnan(md.spcvx(find(md.nodeonboundary))))~=1),
-                                message(['model not consistent: model ' md.name ' should have all the nodes on boundary constrained in field spcvx']);
-                        end
-
-                        if any((~isnan(md.spcvy(find(md.nodeonboundary))))~=1),
-                                message(['model not consistent: model ' md.name ' should have all the nodes on boundary constrained in field spcvy']);
                         end
                         %}}}