Index: /issm/trunk/src/c/objects/Loads/Pengrid.cpp
===================================================================
--- /issm/trunk/src/c/objects/Loads/Pengrid.cpp	(revision 5430)
+++ /issm/trunk/src/c/objects/Loads/Pengrid.cpp	(revision 5431)
@@ -283,5 +283,5 @@
 	this->parameters->FindParam(&analysis_type,AnalysisTypeEnum);
 
-	if (analysis_type==DiagnosticStokesAnalysisEnum){
+	if (analysis_type==DiagnosticStokesAnalysisEnum || analysis_type==AdjointStokesAnalysisEnum){
 		PenaltyCreateKMatrixDiagnosticStokes( Kgg,kmax);
 	}
@@ -312,5 +312,5 @@
 		PenaltyCreatePVectorMelting( pg,kmax);
 	}
-	else if (analysis_type==DiagnosticStokesAnalysisEnum){
+	else if (analysis_type==DiagnosticStokesAnalysisEnum || analysis_type==AdjointStokesAnalysisEnum){
 
 		/*No loads applied, do nothing: */