void hypre_F90_IFACE(hypre_structsmggettol, HYPRE_STRUCTSMGGETTOL) ( hypre_F90_Obj *solver, hypre_F90_Real *tol, hypre_F90_Int *ierr ) { *ierr = (hypre_F90_Int) ( HYPRE_StructSMGGetTol( hypre_F90_PassObj (HYPRE_StructSolver, solver), hypre_F90_PassRealRef (tol) ) ); }
void hypre_F90_IFACE(hypre_structsmggetfinalrelative, HYPRE_STRUCTSMGGETFINALRELATIVE) ( hypre_F90_Obj *solver, hypre_F90_Real *norm, hypre_F90_Int *ierr ) { *ierr = (hypre_F90_Int) ( HYPRE_StructSMGGetFinalRelativeResidualNorm( hypre_F90_PassObj (HYPRE_StructSolver, solver), hypre_F90_PassRealRef (norm) ) ); }
void hypre_F90_IFACE(hypre_sstructmaxwellgetfinalrel, HYPRE_SSTRUCTMAXWELLGETFINALREL) (hypre_F90_Obj *solver, hypre_F90_Real *norm, hypre_F90_Int *ierr) { *ierr = (hypre_F90_Int) ( HYPRE_SStructMaxwellGetFinalRelativeResidualNorm( hypre_F90_PassObj (HYPRE_SStructSolver, solver), hypre_F90_PassRealRef (norm) )); }
void hypre_F90_IFACE(hypre_structhybridgetfinalrelat, HYPRE_STRUCTHYBRIDGETFINALRELAT) ( hypre_F90_Obj *solver, hypre_F90_Real *norm, hypre_F90_Int *ierr ) { *ierr = (hypre_F90_Int) ( HYPRE_StructHybridGetFinalRelativeResidualNorm( hypre_F90_PassObj (HYPRE_StructSolver, solver), hypre_F90_PassRealRef (norm) ) ); }
void hypre_F90_IFACE(hypre_structjacobigettol, HYPRE_STRUCTJACOBIGETTOL) ( hypre_F90_Obj *solver, hypre_F90_Real *tol, hypre_F90_Int *ierr ) { *ierr = (hypre_F90_Int) ( HYPRE_StructJacobiGetTol( hypre_F90_PassObj (HYPRE_StructSolver, solver), hypre_F90_PassRealRef (tol) ) ); }
void hypre_F90_IFACE(hypre_structjacobigetfinalrelat, HYPRE_STRUCTJACOBIGETFINALRELAT) ( hypre_F90_Obj *solver, hypre_F90_Real *norm, hypre_F90_Int *ierr ) { *ierr = (hypre_F90_Int) ( HYPRE_StructJacobiGetFinalRelativeResidualNorm( hypre_F90_PassObj (HYPRE_StructSolver, solver), hypre_F90_PassRealRef (norm) ) ); }
void hypre_F90_IFACE(hypre_structbicgstabgetfinalrel, HYPRE_STRUCTBICGSTABGETFINALREL) ( hypre_F90_Obj *solver, hypre_F90_Real *norm, hypre_F90_Int *ierr ) { *ierr = (hypre_F90_Int) ( HYPRE_StructBiCGSTABGetFinalRelativeResidualNorm( hypre_F90_PassObj (HYPRE_StructSolver, solver), hypre_F90_PassRealRef (norm) ) ); }
void hypre_F90_IFACE(hypre_parcsrhybridgetfinalrelat, HYPRE_PARCSRHYBRIDGETFINALRELAT) (hypre_F90_Obj *solver, hypre_F90_Real *norm, hypre_F90_Int *ierr) { *ierr = (hypre_F90_Int) (HYPRE_ParCSRHybridGetFinalRelativeResidualNorm( hypre_F90_PassObj (HYPRE_Solver, solver), hypre_F90_PassRealRef (norm) )); }
void hypre_F90_IFACE(hypre_amsgetfinalrelativeresidualnorm, HYPRE_AMSGETFINALRELATIVERESIDUALNORM) ( hypre_F90_Obj *solver, hypre_F90_Real *rel_resid_norm, hypre_F90_Int *ierr) { *ierr = (hypre_F90_Int) ( HYPRE_AMSGetFinalRelativeResidualNorm( hypre_F90_PassObj (HYPRE_Solver, solver), hypre_F90_PassRealRef (rel_resid_norm) ) ); }
void hypre_F90_IFACE(hypre_parcsrbicgstabgetfinalrel, HYPRE_PARCSRBICGSTABGETFINALREL) ( hypre_F90_Obj *solver, hypre_F90_Real *norm, hypre_F90_Int *ierr ) { *ierr = (hypre_F90_Int) ( HYPRE_ParCSRBiCGSTABGetFinalRelativeResidualNorm( hypre_F90_PassObj (HYPRE_Solver, solver), hypre_F90_PassRealRef (norm) ) ); }
void hypre_F90_IFACE(hypre_parcsrgmresgetfinalrelati, HYPRE_PARCSRGMRESGETFINALRELATI) ( hypre_F90_Obj *solver, hypre_F90_Real *norm, hypre_F90_Int *ierr ) { *ierr = (hypre_F90_Int) ( HYPRE_ParCSRGMRESGetFinalRelativeResidualNorm( hypre_F90_PassObj (HYPRE_Solver, solver), hypre_F90_PassRealRef (norm) ) ); }
void hypre_F90_IFACE(hypre_structgmresgetfinalrelati, HYPRE_STRUCTGMRESGETFINALRELATI) ( hypre_F90_Obj *solver, hypre_F90_Real *norm, hypre_F90_Int *ierr ) { *ierr = (hypre_F90_Int) ( HYPRE_StructGMRESGetFinalRelativeResidualNorm( hypre_F90_PassObj (HYPRE_StructSolver, solver), hypre_F90_PassRealRef (norm) ) ); }
void hypre_F90_IFACE(hypre_parvectorinnerprod, HYPRE_PARVECTORINNERPROD) (hypre_F90_Obj *x, hypre_F90_Obj *y, hypre_F90_Complex *prod, hypre_F90_Int *ierr ) { *ierr = (hypre_F90_Int) ( HYPRE_ParVectorInnerProd( hypre_F90_PassObj (HYPRE_ParVector, x), hypre_F90_PassObj (HYPRE_ParVector, y), hypre_F90_PassRealRef (prod) ) ); }