void hypre_F90_IFACE(hypre_amssetsmoothingoptions, HYPRE_AMSSETSMOOTHINGOPTIONS) ( hypre_F90_Obj *solver, hypre_F90_Int *relax_type, hypre_F90_Int *relax_times, hypre_F90_Real *relax_weight, hypre_F90_Real *omega, hypre_F90_Int *ierr) { *ierr = (hypre_F90_Int) ( HYPRE_AMSSetSmoothingOptions( hypre_F90_PassObj (HYPRE_Solver, solver), hypre_F90_PassInt (relax_type), hypre_F90_PassInt (relax_times), hypre_F90_PassReal (relax_weight), hypre_F90_PassReal (omega) ) ); }
void hypre_F90_IFACE(hypre_euclidsetsparsea, HYPRE_EUCLIDSETSPARSEA) (hypre_F90_Obj *solver, hypre_F90_Real *spa, hypre_F90_Int *ierr) { *ierr = (hypre_F90_Int) HYPRE_EuclidSetSparseA( hypre_F90_PassObj (HYPRE_Solver, solver), hypre_F90_PassReal (spa) ); }
void hypre_F90_IFACE(hypre_euclidsetilut, HYPRE_EUCLIDSETILUT) (hypre_F90_Obj *solver, hypre_F90_Real *drop_tol, hypre_F90_Int *ierr) { *ierr = (hypre_F90_Int) HYPRE_EuclidSetILUT( hypre_F90_PassObj (HYPRE_Solver, solver), hypre_F90_PassReal (drop_tol) ); }
void hypre_F90_IFACE(hypre_parcsrhybridsetrelaxwt, HYPRE_PARCSRHYBRIDSETRELAXWT) (hypre_F90_Obj *solver, hypre_F90_Real *relax_wt, hypre_F90_Int *ierr) { *ierr = (hypre_F90_Int) (HYPRE_ParCSRHybridSetRelaxWt( hypre_F90_PassObj (HYPRE_Solver, solver), hypre_F90_PassReal (relax_wt) )); }
void hypre_F90_IFACE(hypre_parcsrpcgsetatol, HYPRE_PARCSRPCGSETATOL) ( hypre_F90_Obj *solver, hypre_F90_Real *tol, hypre_F90_Int *ierr ) { *ierr = (hypre_F90_Int) ( HYPRE_ParCSRPCGSetAbsoluteTol( hypre_F90_PassObj (HYPRE_Solver, solver), hypre_F90_PassReal (tol) ) ); }
void hypre_F90_IFACE(hypre_parcsrhybridsetmaxrowsum, HYPRE_PARCSRHYBRIDSETMAXROWSUM) (hypre_F90_Obj *solver, hypre_F90_Real *max_row_sum, hypre_F90_Int *ierr) { *ierr = (hypre_F90_Int) (HYPRE_ParCSRHybridSetMaxRowSum( hypre_F90_PassObj (HYPRE_Solver, solver), hypre_F90_PassReal (max_row_sum) )); }
void hypre_F90_IFACE(hypre_parcsrhybridsetstrongthre, HYPRE_PARCSRHYBRIDSETSTRONGTHRE) (hypre_F90_Obj *solver, hypre_F90_Real *strong_threshold, hypre_F90_Int *ierr) { *ierr = (hypre_F90_Int) (HYPRE_ParCSRHybridSetStrongThreshold( hypre_F90_PassObj (HYPRE_Solver, solver), hypre_F90_PassReal (strong_threshold) )); }
void hypre_F90_IFACE(hypre_parcsrhybridsetconvergenc, HYPRE_PARCSRHYBRIDSETCONVERGENC) (hypre_F90_Obj *solver, hypre_F90_Real *cf_tol, hypre_F90_Int *ierr) { *ierr = (hypre_F90_Int) (HYPRE_ParCSRHybridSetConvergenceTol( hypre_F90_PassObj (HYPRE_Solver, solver), hypre_F90_PassReal (cf_tol) ) ); }
void hypre_F90_IFACE(hypre_structbicgstabsettol, HYPRE_STRUCTBICGSTABSETTOL) ( hypre_F90_Obj *solver, hypre_F90_Real *tol, hypre_F90_Int *ierr ) { *ierr = (hypre_F90_Int) ( HYPRE_StructBiCGSTABSetTol( hypre_F90_PassObj (HYPRE_StructSolver, solver), hypre_F90_PassReal (tol) ) ); }
void hypre_F90_IFACE(hypre_parcsrbicgstabsettol, HYPRE_PARCSRBICGSTABSETTOL) ( hypre_F90_Obj *solver, hypre_F90_Real *tol, hypre_F90_Int *ierr ) { *ierr = (hypre_F90_Int) ( HYPRE_ParCSRBiCGSTABSetTol( hypre_F90_PassObj (HYPRE_Solver, solver), hypre_F90_PassReal (tol) ) ); }
void hypre_F90_IFACE(hypre_amssettol, HYPRE_AMSSETTOL) ( hypre_F90_Obj *solver, hypre_F90_Real *tol, hypre_F90_Int *ierr) { *ierr = (hypre_F90_Int) ( HYPRE_AMSSetTol( hypre_F90_PassObj (HYPRE_Solver, solver), hypre_F90_PassReal (tol) ) ); }
void hypre_F90_IFACE(hypre_structpcgsetabstol, HYPRE_STRUCTPCGSETABSTOL) ( hypre_F90_Obj *solver, hypre_F90_Real *tol, hypre_F90_Int *ierr ) { *ierr = (hypre_F90_Int) ( HYPRE_StructPCGSetAbsoluteTol( hypre_F90_PassObj (HYPRE_StructSolver, solver), hypre_F90_PassReal (tol) ) ); }
void hypre_F90_IFACE(hypre_parcsrgmressetabsolutetol, HYPRE_PARCSRGMRESSETABSOLUTETOL) ( hypre_F90_Obj *solver, hypre_F90_Real *tol, hypre_F90_Int *ierr ) { *ierr = (hypre_F90_Int) ( HYPRE_ParCSRGMRESSetAbsoluteTol( hypre_F90_PassObj (HYPRE_Solver, solver), hypre_F90_PassReal (tol) ) ); }
void hypre_F90_IFACE(hypre_parcsrpilutsetdroptoleran, HYPRE_PARCSRPILUTSETDROPTOLERAN) ( hypre_F90_Obj *solver, hypre_F90_Real *tol, hypre_F90_Int *ierr ) { *ierr = (hypre_F90_Int) ( HYPRE_ParCSRPilutSetDropTolerance( hypre_F90_PassObj (HYPRE_Solver, solver), hypre_F90_PassReal (tol) ) ); }
void hypre_F90_IFACE(hypre_parcsrhybridsetouterwt, HYPRE_PARCSRHYBRIDSETOUTERWT) (hypre_F90_Obj *solver, hypre_F90_Real *outer_wt, hypre_F90_Int *ierr) { *ierr = (hypre_F90_Int) (HYPRE_ParCSRHybridSetOuterWt( hypre_F90_PassObj (HYPRE_Solver, solver), hypre_F90_PassReal (outer_wt) )); }
void hypre_F90_IFACE(hypre_parcsrhybridsettruncfacto, HYPRE_PARCSRHYBRIDSETTRUNCFACTO) (hypre_F90_Obj *solver, hypre_F90_Real *trunc_factor, hypre_F90_Int *ierr) { *ierr = (hypre_F90_Int) (HYPRE_ParCSRHybridSetTruncFactor( hypre_F90_PassObj (HYPRE_Solver, solver), hypre_F90_PassReal (trunc_factor) )); }
void hypre_F90_IFACE(hypre_structsmgsettol, HYPRE_STRUCTSMGSETTOL) ( hypre_F90_Obj *solver, hypre_F90_Real *tol, hypre_F90_Int *ierr ) { *ierr = (hypre_F90_Int) ( HYPRE_StructSMGSetTol( hypre_F90_PassObj (HYPRE_StructSolver, solver), hypre_F90_PassReal (tol) ) ); }
void hypre_F90_IFACE(hypre_sstructgmressetabsolutetol, HYPRE_SSTRUCTGMRESSETABSOLUTETOL) (hypre_F90_Obj *solver, hypre_F90_Real *tol, hypre_F90_Int *ierr) { *ierr = (hypre_F90_Int) (HYPRE_SStructGMRESSetAbsoluteTol( hypre_F90_PassObj (HYPRE_SStructSolver, solver), hypre_F90_PassReal (tol) ) ); }
void hypre_F90_IFACE(hypre_structhybridsetpcgabsolut, HYPRE_STRUCTHYBRIDSETPCGABSOLUT) ( hypre_F90_Obj *solver, hypre_F90_Real *pcg_atolf, hypre_F90_Int *ierr ) { *ierr = (hypre_F90_Int) ( HYPRE_StructHybridSetPCGAbsoluteTolFactor( hypre_F90_PassObj (HYPRE_StructSolver, solver), hypre_F90_PassReal (pcg_atolf) ) ); }
void hypre_F90_IFACE(hypre_structhybridsettol, HYPRE_STRUCTHYBRIDSETTOL) ( hypre_F90_Obj *solver, hypre_F90_Real *tol, hypre_F90_Int *ierr ) { *ierr = (hypre_F90_Int) ( HYPRE_StructHybridSetTol( hypre_F90_PassObj (HYPRE_StructSolver, solver), hypre_F90_PassReal (tol) ) ); }
void hypre_F90_IFACE(hypre_sstructmaxwellsettol, HYPRE_SSTRUCTMAXWELLSETTOL) (hypre_F90_Obj *solver, hypre_F90_Real *tol, hypre_F90_Int *ierr) { *ierr = (hypre_F90_Int) ( HYPRE_SStructMaxwellSetTol( hypre_F90_PassObj (HYPRE_SStructSolver, solver), hypre_F90_PassReal (tol) )); }
void hypre_F90_IFACE(hypre_structhybridsetconvergenc, HYPRE_STRUCTHYBRIDSETCONVERGENC) ( hypre_F90_Obj *solver, hypre_F90_Real *cf_tol, hypre_F90_Int *ierr ) { *ierr = (hypre_F90_Int) ( HYPRE_StructHybridSetConvergenceTol( hypre_F90_PassObj (HYPRE_StructSolver, solver), hypre_F90_PassReal (cf_tol) ) ); }
void hypre_F90_IFACE(hypre_structjacobisettol, HYPRE_STRUCTJACOBISETTOL) ( hypre_F90_Obj *solver, hypre_F90_Real *tol, hypre_F90_Int *ierr ) { *ierr = (hypre_F90_Int) ( HYPRE_StructJacobiSetTol( hypre_F90_PassObj (HYPRE_StructSolver, solver), hypre_F90_PassReal (tol) ) ); }
void hypre_F90_IFACE(hypre_parcsrhybridsettol, HYPRE_PARCSRHYBRIDSETTOL) (hypre_F90_Obj *solver, hypre_F90_Real *tol, hypre_F90_Int *ierr) { *ierr = (hypre_F90_Int) (HYPRE_ParCSRHybridSetTol( hypre_F90_PassObj (HYPRE_Solver, solver), hypre_F90_PassReal (tol) ) ); }
void hypre_F90_IFACE(hypre_parcsrhybridsetlevelrelax, HYPRE_PARCSRHYBRIDSETLEVELRELAX) (hypre_F90_Obj *solver, hypre_F90_Real *relax_wt, hypre_F90_Int *level, hypre_F90_Int *ierr) { *ierr = (hypre_F90_Int) (HYPRE_ParCSRHybridSetLevelRelaxWt( hypre_F90_PassObj (HYPRE_Solver, solver), hypre_F90_PassReal (relax_wt), hypre_F90_PassInt (level) )); }
void hypre_F90_IFACE(hypre_parcsrhybridsetlevelouter, HYPRE_PARCSRHYBRIDSETLEVELOUTER) (hypre_F90_Obj *solver, hypre_F90_Real *outer_wt, hypre_F90_Int *level, hypre_F90_Int *ierr) { *ierr = (hypre_F90_Int) (HYPRE_ParCSRHybridSetLevelOuterWt( hypre_F90_PassObj (HYPRE_Solver, solver), hypre_F90_PassReal (outer_wt), hypre_F90_PassInt (level) )); }
void hypre_F90_IFACE(hypre_amssetbetaamgoptions, HYPRE_AMSSETBETAAMGOPTIONS) ( hypre_F90_Obj *solver, hypre_F90_Int *beta_coarsen_type, hypre_F90_Int *beta_agg_levels, hypre_F90_Int *beta_relax_type, hypre_F90_Real *beta_strength_threshold, hypre_F90_Int *beta_interp_type, hypre_F90_Int *beta_Pmax, hypre_F90_Int *ierr) { *ierr = (hypre_F90_Int) ( HYPRE_AMSSetBetaAMGOptions( hypre_F90_PassObj (HYPRE_Solver, solver), hypre_F90_PassInt (beta_coarsen_type), hypre_F90_PassInt (beta_agg_levels), hypre_F90_PassInt (beta_relax_type), hypre_F90_PassReal (beta_strength_threshold), hypre_F90_PassInt (beta_interp_type), hypre_F90_PassInt (beta_Pmax) ) ); }