CFD/hypre
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

added various new functions to AMG to make them accessible through babel

Browse Source
This commit is contained in:
ulrikey 2008-07-24 22:12:36 +00:00
parent a3b7c7739f
commit 6015f664f8
4 changed files with 112 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

21
babel/Interfaces.idl
View File

@ -1628,6 +1628,18 @@ package bHYPRE version 1.0.0
* \item[SchwarzRlxWeight] ({\tt Double}) - the smoothing parameter
* for additive Schwarz.
*
* \item[SchwarzUseNonSymm] ({\tt Int}) - defines whether to use a nonsymmetric
* Schwarz smoother. Default:0 (symmetric smoother)
*
* \item[EuLevel] ({\tt Int}) - defines number of levels for ILU(k) smoother.
* To be used with SmoothType 9 and SmoothNumLevels > 0. Default:0
*
* \item[EuSparseA] ({\tt Double}) - defines drop tolerance for ILU(k) smoother
* To be used with SmoothType 9 and SmoothNumLevels > 0. Default:0
*
* \item[EuBJ] ({\tt Int}) - defines use of block Jacobi ILUT smoother.
* To be used with SmoothType 9 and SmoothNumLevels > 0. Default:0
*
* \item[Tolerance] ({\tt Double}) - convergence tolerance, if this
* is used as a solver; ignored if this is used as a preconditioner
*
@ -1657,6 +1669,15 @@ package bHYPRE version 1.0.0
*
* The default is 0.
*
* \item[PMaxElmts] ({\tt Int}) - Defines the maximal number of nonzero entries
* allowed in interpolation. Default: 0 (i.e. no limit)
*
* \item[AggNumLevels] ({\tt Int}) - Defines the number of levels
* of aggressive coarsening performed. Default:0
*
* \item[NumPaths] ({\tt Int}) - Defines the number of paths used for
* aggressive coarsening. Default:1
*
* \item[NumSamples] ({\tt Int}) - Defines the number of sample vectors used
* in GSMG or LS interpolation.
*

21
babel/bHYPRE/bHYPRE_BoomerAMG.h
View File

@ -109,6 +109,18 @@
* \item[SchwarzRlxWeight] ({\tt Double}) - the smoothing parameter
* for additive Schwarz.
*
* \item[SchwarzUseNonSymm] ({\tt Int}) - defines whether to use a nonsymmetric
* Schwarz smoother. Default:0 (symmetric smoother)
*
* \item[EuLevel] ({\tt Int}) - defines number of levels for ILU(k) smoother.
* To be used with SmoothType 9 and SmoothNumLevels > 0. Default:0
*
* \item[EuSparseA] ({\tt Double}) - defines drop tolerance for ILU(k) smoother
* To be used with SmoothType 9 and SmoothNumLevels > 0. Default:0
*
* \item[EuBJ] ({\tt Int}) - defines use of block Jacobi ILUT smoother.
* To be used with SmoothType 9 and SmoothNumLevels > 0. Default:0
*
* \item[Tolerance] ({\tt Double}) - convergence tolerance, if this
* is used as a solver; ignored if this is used as a preconditioner
*
@ -138,6 +150,15 @@
*
* The default is 0.
*
* \item[PMaxElmts] ({\tt Int}) - Defines the maximal number of nonzero entries
* allowed in interpolation. Default: 0 (i.e. no limit)
*
* \item[AggNumLevels] ({\tt Int}) - Defines the number of levels
* of aggressive coarsening performed. Default:0
*
* \item[NumPaths] ({\tt Int}) - Defines the number of paths used for
* aggressive coarsening. Default:1
*
* \item[NumSamples] ({\tt Int}) - Defines the number of sample vectors used
* in GSMG or LS interpolation.
*

21
babel/bHYPRE/bHYPRE_BoomerAMG_IOR.h
View File

@ -127,6 +127,18 @@ extern "C" {
* \item[SchwarzRlxWeight] ({\tt Double}) - the smoothing parameter
* for additive Schwarz.
*
* \item[SchwarzUseNonSymm] ({\tt Int}) - defines whether to use a nonsymmetric
* Schwarz smoother. Default:0 (symmetric smoother)
*
* \item[EuLevel] ({\tt Int}) - defines number of levels for ILU(k) smoother.
* To be used with SmoothType 9 and SmoothNumLevels > 0. Default:0
*
* \item[EuSparseA] ({\tt Double}) - defines drop tolerance for ILU(k) smoother
* To be used with SmoothType 9 and SmoothNumLevels > 0. Default:0
*
* \item[EuBJ] ({\tt Int}) - defines use of block Jacobi ILUT smoother.
* To be used with SmoothType 9 and SmoothNumLevels > 0. Default:0
*
* \item[Tolerance] ({\tt Double}) - convergence tolerance, if this
* is used as a solver; ignored if this is used as a preconditioner
*
@ -156,6 +168,15 @@ extern "C" {
*
* The default is 0.
*
* \item[PMaxElmts] ({\tt Int}) - Defines the maximal number of nonzero entries
* allowed in interpolation. Default: 0 (i.e. no limit)
*
* \item[AggNumLevels] ({\tt Int}) - Defines the number of levels
* of aggressive coarsening performed. Default:0
*
* \item[NumPaths] ({\tt Int}) - Defines the number of paths used for
* aggressive coarsening. Default:1
*
* \item[NumSamples] ({\tt Int}) - Defines the number of sample vectors used
* in GSMG or LS interpolation.
*

49
babel/bHYPRE/bHYPRE_BoomerAMG_Impl.c
View File

@ -111,6 +111,18 @@
* \item[SchwarzRlxWeight] ({\tt Double}) - the smoothing parameter
* for additive Schwarz.
*
* \item[SchwarzUseNonSymm] ({\tt Int}) - defines whether to use a nonsymmetric
* Schwarz smoother. Default:0 (symmetric smoother)
*
* \item[EuLevel] ({\tt Int}) - defines number of levels for ILU(k) smoother.
* To be used with SmoothType 9 and SmoothNumLevels > 0. Default:0
*
* \item[EuSparseA] ({\tt Double}) - defines drop tolerance for ILU(k) smoother
* To be used with SmoothType 9 and SmoothNumLevels > 0. Default:0
*
* \item[EuBJ] ({\tt Int}) - defines use of block Jacobi ILUT smoother.
* To be used with SmoothType 9 and SmoothNumLevels > 0. Default:0
*
* \item[Tolerance] ({\tt Double}) - convergence tolerance, if this
* is used as a solver; ignored if this is used as a preconditioner
*
@ -140,6 +152,15 @@
*
* The default is 0.
*
* \item[PMaxElmts] ({\tt Int}) - Defines the maximal number of nonzero entries
* allowed in interpolation. Default: 0 (i.e. no limit)
*
* \item[AggNumLevels] ({\tt Int}) - Defines the number of levels
* of aggressive coarsening performed. Default:0
*
* \item[NumPaths] ({\tt Int}) - Defines the number of paths used for
* aggressive coarsening. Default:1
*
* \item[NumSamples] ({\tt Int}) - Defines the number of sample vectors used
* in GSMG or LS interpolation.
*
@ -891,6 +912,18 @@ impl_bHYPRE_BoomerAMG_SetIntParameter(
{
ierr += HYPRE_BoomerAMGSetInterpType( solver, value );
}
else if ( strcmp(name,"PMaxElmts")==0 )
{
ierr += HYPRE_BoomerAMGSetPMaxElmts( solver, value );
}
else if ( strcmp(name,"AggNumLevels")==0 )
{
ierr += HYPRE_BoomerAMGSetAggNumLevels( solver, value );
}
else if ( strcmp(name,"NumPaths")==0 )
{
ierr += HYPRE_BoomerAMGSetNumPaths( solver, value );
}
else if ( strcmp(name,"NumSamples")==0 )
{
ierr += HYPRE_BoomerAMGSetNumSamples( solver, value );
@ -907,6 +940,18 @@ impl_bHYPRE_BoomerAMG_SetIntParameter(
{
ierr += HYPRE_BoomerAMGSetDomainType( solver, value );
}
else if ( strcmp(name,"SchwarzUseNonSymm")==0 )
{
ierr += HYPRE_BoomerAMGSetSchwarzUseNonSymm( solver, value );
}
else if ( strcmp(name,"EuBJ")==0 )
{
ierr += HYPRE_BoomerAMGSetEuBJ( solver, value );
}
else if ( strcmp(name,"EuLevel")==0 )
{
ierr += HYPRE_BoomerAMGSetEuLevel( solver, value );
}
else if ( strcmp(name,"NumFunctions")==0 )
{
ierr += HYPRE_BoomerAMGSetNumFunctions( solver, value );
@ -987,6 +1032,10 @@ impl_bHYPRE_BoomerAMG_SetDoubleParameter(
{
ierr += HYPRE_BoomerAMGSetTol( solver, value );
}
else if ( strcmp(name,"EuSparseA")==0 )
{
ierr += HYPRE_BoomerAMGSetEuSparseA( solver, value );
}
else
{
ierr=1;