Changeset 5431

Timestamp:

08/19/10 15:50:31 (15 years ago)

Author:

Mathieu Morlighem

Message:

Fixed CM Stokes

File:

• issm/trunk/src/c/objects/Loads/Pengrid.cpp (modified) (2 diffs)

issm/trunk/src/c/objects/Loads/Pengrid.cpp

@@ -283 +283 @@
         this->parameters->FindParam(&analysis_type,AnalysisTypeEnum);
 
-        if (analysis_type==DiagnosticStokesAnalysisEnum){
+        if (analysis_type==DiagnosticStokesAnalysisEnum || analysis_type==AdjointStokesAnalysisEnum){
                 PenaltyCreateKMatrixDiagnosticStokes( Kgg,kmax);
         }
@@ -312 +312 @@
                 PenaltyCreatePVectorMelting( pg,kmax);
         }
-        else if (analysis_type==DiagnosticStokesAnalysisEnum){
+        else if (analysis_type==DiagnosticStokesAnalysisEnum || analysis_type==AdjointStokesAnalysisEnum){
 
                 /*No loads applied, do nothing: */