Skip to content

Commit

Permalink
Merge Pull Request #9843 from jwillenbring/Trilinos/ifpackHyprexSDKdepr
Browse files Browse the repository at this point in the history
Automatically Merged using Trilinos Pull Request AutoTester rel 13.02
PR Title: Apply Hypre deprecation fix to 13.2 release branch for xSDK release
PR Author: jwillenbring
  • Loading branch information
trilinos-autotester committed Oct 29, 2021
2 parents a11efbb + 1c56c8a commit 4a5f790
Showing 1 changed file with 4 additions and 0 deletions.
4 changes: 4 additions & 0 deletions packages/ifpack/src/Ifpack_Hypre.cpp
Original file line number Diff line number Diff line change
Expand Up @@ -798,7 +798,9 @@ int Ifpack_Hypre::Compute(){
hypre_ParAMGData *amg_data = (hypre_ParAMGData*) Preconditioner_;
hypre_ParCSRMatrix **A_array = hypre_ParAMGDataAArray(amg_data);
hypre_ParCSRMatrix **P_array = hypre_ParAMGDataPArray(amg_data);
#if 0
HYPRE_Int **CF_marker_array = hypre_ParAMGDataCFMarkerArray(amg_data);
#endif
HYPRE_Int num_levels = hypre_ParAMGDataNumLevels(amg_data);

char ofs[80];
Expand All @@ -811,6 +813,7 @@ int Ifpack_Hypre::Compute(){
sprintf(ofs,"P_matrix.bmg.%d.dat",k);
HYPRE_ParCSRMatrixPrint(P_array[k], ofs);

#if 0
// CF
// Note: Hypre outputs "-1" for F Points and "1" for C Points
HYPRE_Int local_size = hypre_CSRMatrixNumRows(hypre_ParCSRMatrixDiag(A_array[k]));
Expand All @@ -821,6 +824,7 @@ int Ifpack_Hypre::Compute(){
for(int i=0; i<local_size; i++)
fprintf(f,"%d\n",(int)CF_marker_array[k][i]);
fclose(f);
#endif
}

}
Expand Down

0 comments on commit 4a5f790

Please sign in to comment.