Lines Matching refs:ex
2737 PC_PFMG *ex = (PC_PFMG *)pc->data; in PCDestroy_PFMG() local
2740 if (ex->hsolver) PetscCallHYPRE(HYPRE_StructPFMGDestroy(ex->hsolver)); in PCDestroy_PFMG()
2741 PetscCall(PetscCommRestoreComm(PetscObjectComm((PetscObject)pc), &ex->hcomm)); in PCDestroy_PFMG()
2752 PC_PFMG *ex = (PC_PFMG *)pc->data; in PCView_PFMG() local
2758 PetscCall(PetscViewerASCIIPrintf(viewer, " max iterations %" PetscInt_FMT "\n", ex->its)); in PCView_PFMG()
2759 PetscCall(PetscViewerASCIIPrintf(viewer, " tolerance %g\n", ex->tol)); in PCView_PFMG()
2760 PetscCall(PetscViewerASCIIPrintf(viewer, " relax type %s\n", PFMGRelaxType[ex->relax_type])); in PCView_PFMG()
2761 PetscCall(PetscViewerASCIIPrintf(viewer, " RAP type %s\n", PFMGRAPType[ex->rap_type])); in PCView_PFMG()
2762 …mber pre-relax %" PetscInt_FMT " post-relax %" PetscInt_FMT "\n", ex->num_pre_relax, ex->num_post_… in PCView_PFMG()
2763 PetscCall(PetscViewerASCIIPrintf(viewer, " max levels %" PetscInt_FMT "\n", ex->max_levels)); in PCView_PFMG()
2764 PetscCall(PetscViewerASCIIPrintf(viewer, " skip relax %" PetscInt_FMT "\n", ex->skip_relax)); in PCView_PFMG()
2771 PC_PFMG *ex = (PC_PFMG *)pc->data; in PCSetFromOptions_PFMG() local
2775 …atistics", "Print statistics", "HYPRE_StructPFMGSetPrintLevel", ex->print_statistics, &ex->print_s… in PCSetFromOptions_PFMG()
2776 …rations of PFMG to use as preconditioner", "HYPRE_StructPFMGSetMaxIter", ex->its, &ex->its, NULL)); in PCSetFromOptions_PFMG()
2777 PetscCallHYPRE(HYPRE_StructPFMGSetMaxIter(ex->hsolver, (HYPRE_Int)ex->its)); in PCSetFromOptions_PFMG()
2778 …ing steps before coarse grid", "HYPRE_StructPFMGSetNumPreRelax", ex->num_pre_relax, &ex->num_pre_r… in PCSetFromOptions_PFMG()
2779 PetscCallHYPRE(HYPRE_StructPFMGSetNumPreRelax(ex->hsolver, (HYPRE_Int)ex->num_pre_relax)); in PCSetFromOptions_PFMG()
2780 …ing steps after coarse grid", "HYPRE_StructPFMGSetNumPostRelax", ex->num_post_relax, &ex->num_post… in PCSetFromOptions_PFMG()
2781 PetscCallHYPRE(HYPRE_StructPFMGSetNumPostRelax(ex->hsolver, (HYPRE_Int)ex->num_post_relax)); in PCSetFromOptions_PFMG()
2783 …s", "Max Levels for MG hierarchy", "HYPRE_StructPFMGSetMaxLevels", ex->max_levels, &ex->max_levels… in PCSetFromOptions_PFMG()
2784 PetscCallHYPRE(HYPRE_StructPFMGSetMaxLevels(ex->hsolver, (HYPRE_Int)ex->max_levels)); in PCSetFromOptions_PFMG()
2786 …tionsReal("-pc_pfmg_tol", "Tolerance of PFMG", "HYPRE_StructPFMGSetTol", ex->tol, &ex->tol, NULL)); in PCSetFromOptions_PFMG()
2787 PetscCallHYPRE(HYPRE_StructPFMGSetTol(ex->hsolver, ex->tol)); in PCSetFromOptions_PFMG()
2788 …elaxType, PETSC_STATIC_ARRAY_LENGTH(PFMGRelaxType), PFMGRelaxType[ex->relax_type], &ex->relax_type… in PCSetFromOptions_PFMG()
2789 PetscCallHYPRE(HYPRE_StructPFMGSetRelaxType(ex->hsolver, (HYPRE_Int)ex->relax_type)); in PCSetFromOptions_PFMG()
2790 …, PFMGRAPType, PETSC_STATIC_ARRAY_LENGTH(PFMGRAPType), PFMGRAPType[ex->rap_type], &ex->rap_type, N… in PCSetFromOptions_PFMG()
2791 PetscCallHYPRE(HYPRE_StructPFMGSetRAPType(ex->hsolver, (HYPRE_Int)ex->rap_type)); in PCSetFromOptions_PFMG()
2792 … underlying problem is isotropic", "HYPRE_StructPFMGSetSkipRelax", ex->skip_relax, &ex->skip_relax… in PCSetFromOptions_PFMG()
2793 PetscCallHYPRE(HYPRE_StructPFMGSetSkipRelax(ex->hsolver, (HYPRE_Int)ex->skip_relax)); in PCSetFromOptions_PFMG()
2800 PC_PFMG *ex = (PC_PFMG *)pc->data; in PCApply_PFMG() local
2827 PetscCallHYPRE(HYPRE_StructPFMGSolve(ex->hsolver, mx->hmat, mx->hb, mx->hx)); in PCApply_PFMG()
2858 PC_PFMG *ex = (PC_PFMG *)pc->data; in PCSetUp_PFMG() local
2867 if (ex->hsolver) PetscCallHYPRE(HYPRE_StructPFMGDestroy(ex->hsolver)); in PCSetUp_PFMG()
2868 PetscCallHYPRE(HYPRE_StructPFMGCreate(ex->hcomm, &ex->hsolver)); in PCSetUp_PFMG()
2871 if (ex->print_statistics) PetscCallHYPRE(HYPRE_StructPFMGSetPrintLevel(ex->hsolver, 3)); in PCSetUp_PFMG()
2874 PetscCallHYPRE(HYPRE_StructPFMGSetMaxIter(ex->hsolver, (HYPRE_Int)ex->its)); in PCSetUp_PFMG()
2875 PetscCallHYPRE(HYPRE_StructPFMGSetNumPreRelax(ex->hsolver, (HYPRE_Int)ex->num_pre_relax)); in PCSetUp_PFMG()
2876 PetscCallHYPRE(HYPRE_StructPFMGSetNumPostRelax(ex->hsolver, (HYPRE_Int)ex->num_post_relax)); in PCSetUp_PFMG()
2877 PetscCallHYPRE(HYPRE_StructPFMGSetMaxLevels(ex->hsolver, (HYPRE_Int)ex->max_levels)); in PCSetUp_PFMG()
2878 PetscCallHYPRE(HYPRE_StructPFMGSetTol(ex->hsolver, ex->tol)); in PCSetUp_PFMG()
2879 PetscCallHYPRE(HYPRE_StructPFMGSetRelaxType(ex->hsolver, (HYPRE_Int)ex->relax_type)); in PCSetUp_PFMG()
2880 PetscCallHYPRE(HYPRE_StructPFMGSetRAPType(ex->hsolver, (HYPRE_Int)ex->rap_type)); in PCSetUp_PFMG()
2882 PetscCallHYPRE(HYPRE_StructPFMGSetup(ex->hsolver, mx->hmat, mx->hb, mx->hx)); in PCSetUp_PFMG()
2883 PetscCallHYPRE(HYPRE_StructPFMGSetZeroGuess(ex->hsolver)); in PCSetUp_PFMG()
2918 PC_PFMG *ex; in PCCreate_PFMG() local
2921 PetscCall(PetscNew(&ex)); in PCCreate_PFMG()
2922 pc->data = ex; in PCCreate_PFMG()
2924 ex->its = 1; in PCCreate_PFMG()
2925 ex->tol = 1.e-8; in PCCreate_PFMG()
2926 ex->relax_type = 1; in PCCreate_PFMG()
2927 ex->rap_type = 0; in PCCreate_PFMG()
2928 ex->num_pre_relax = 1; in PCCreate_PFMG()
2929 ex->num_post_relax = 1; in PCCreate_PFMG()
2930 ex->max_levels = 0; in PCCreate_PFMG()
2931 ex->skip_relax = 0; in PCCreate_PFMG()
2932 ex->print_statistics = PETSC_FALSE; in PCCreate_PFMG()
2941 PetscCall(PetscCommGetComm(PetscObjectComm((PetscObject)pc), &ex->hcomm)); in PCCreate_PFMG()
2943 PetscCallHYPRE(HYPRE_StructPFMGCreate(ex->hcomm, &ex->hsolver)); in PCCreate_PFMG()
2961 PC_SysPFMG *ex = (PC_SysPFMG *)pc->data; in PCDestroy_SysPFMG() local
2964 if (ex->ss_solver) PetscCallHYPRE(HYPRE_SStructSysPFMGDestroy(ex->ss_solver)); in PCDestroy_SysPFMG()
2965 PetscCall(PetscCommRestoreComm(PetscObjectComm((PetscObject)pc), &ex->hcomm)); in PCDestroy_SysPFMG()
2975 PC_SysPFMG *ex = (PC_SysPFMG *)pc->data; in PCView_SysPFMG() local
2981 PetscCall(PetscViewerASCIIPrintf(viewer, " max iterations %" PetscInt_FMT "\n", ex->its)); in PCView_SysPFMG()
2982 PetscCall(PetscViewerASCIIPrintf(viewer, " tolerance %g\n", ex->tol)); in PCView_SysPFMG()
2983 PetscCall(PetscViewerASCIIPrintf(viewer, " relax type %s\n", PFMGRelaxType[ex->relax_type])); in PCView_SysPFMG()
2984 …mber pre-relax %" PetscInt_FMT " post-relax %" PetscInt_FMT "\n", ex->num_pre_relax, ex->num_post_… in PCView_SysPFMG()
2991 PC_SysPFMG *ex = (PC_SysPFMG *)pc->data; in PCSetFromOptions_SysPFMG() local
2997 if (flg) PetscCallHYPRE(HYPRE_SStructSysPFMGSetPrintLevel(ex->ss_solver, 3)); in PCSetFromOptions_SysPFMG()
2998 … of SysPFMG to use as preconditioner", "HYPRE_SStructSysPFMGSetMaxIter", ex->its, &ex->its, NULL)); in PCSetFromOptions_SysPFMG()
2999 PetscCallHYPRE(HYPRE_SStructSysPFMGSetMaxIter(ex->ss_solver, (HYPRE_Int)ex->its)); in PCSetFromOptions_SysPFMG()
3000 …steps before coarse grid", "HYPRE_SStructSysPFMGSetNumPreRelax", ex->num_pre_relax, &ex->num_pre_r… in PCSetFromOptions_SysPFMG()
3001 PetscCallHYPRE(HYPRE_SStructSysPFMGSetNumPreRelax(ex->ss_solver, (HYPRE_Int)ex->num_pre_relax)); in PCSetFromOptions_SysPFMG()
3002 …steps after coarse grid", "HYPRE_SStructSysPFMGSetNumPostRelax", ex->num_post_relax, &ex->num_post… in PCSetFromOptions_SysPFMG()
3003 PetscCallHYPRE(HYPRE_SStructSysPFMGSetNumPostRelax(ex->ss_solver, (HYPRE_Int)ex->num_post_relax)); in PCSetFromOptions_SysPFMG()
3005 …"-pc_syspfmg_tol", "Tolerance of SysPFMG", "HYPRE_SStructSysPFMGSetTol", ex->tol, &ex->tol, NULL)); in PCSetFromOptions_SysPFMG()
3006 PetscCallHYPRE(HYPRE_SStructSysPFMGSetTol(ex->ss_solver, ex->tol)); in PCSetFromOptions_SysPFMG()
3007 …pe, PETSC_STATIC_ARRAY_LENGTH(SysPFMGRelaxType), SysPFMGRelaxType[ex->relax_type], &ex->relax_type… in PCSetFromOptions_SysPFMG()
3008 PetscCallHYPRE(HYPRE_SStructSysPFMGSetRelaxType(ex->ss_solver, (HYPRE_Int)ex->relax_type)); in PCSetFromOptions_SysPFMG()
3015 PC_SysPFMG *ex = (PC_SysPFMG *)pc->data; in PCApply_SysPFMG() local
3052 PetscCallHYPRE(HYPRE_SStructSysPFMGSolve(ex->ss_solver, mx->ss_mat, mx->ss_b, mx->ss_x)); in PCApply_SysPFMG()
3074 PetscCallHYPRE(HYPRE_SStructSysPFMGSolve(ex->ss_solver, mx->ss_mat, mx->ss_b, mx->ss_x)); in PCApply_SysPFMG()
3111 PC_SysPFMG *ex = (PC_SysPFMG *)pc->data; in PCSetUp_SysPFMG() local
3120 if (ex->ss_solver) PetscCallHYPRE(HYPRE_SStructSysPFMGDestroy(ex->ss_solver)); in PCSetUp_SysPFMG()
3121 PetscCallHYPRE(HYPRE_SStructSysPFMGCreate(ex->hcomm, &ex->ss_solver)); in PCSetUp_SysPFMG()
3122 PetscCallHYPRE(HYPRE_SStructSysPFMGSetZeroGuess(ex->ss_solver)); in PCSetUp_SysPFMG()
3123 PetscCallHYPRE(HYPRE_SStructSysPFMGSetup(ex->ss_solver, mx->ss_mat, mx->ss_b, mx->ss_x)); in PCSetUp_SysPFMG()
3155 PC_SysPFMG *ex; in PCCreate_SysPFMG() local
3158 PetscCall(PetscNew(&ex)); in PCCreate_SysPFMG()
3159 pc->data = ex; in PCCreate_SysPFMG()
3161 ex->its = 1; in PCCreate_SysPFMG()
3162 ex->tol = 1.e-8; in PCCreate_SysPFMG()
3163 ex->relax_type = 1; in PCCreate_SysPFMG()
3164 ex->num_pre_relax = 1; in PCCreate_SysPFMG()
3165 ex->num_post_relax = 1; in PCCreate_SysPFMG()
3174 PetscCall(PetscCommGetComm(PetscObjectComm((PetscObject)pc), &ex->hcomm)); in PCCreate_SysPFMG()
3176 PetscCallHYPRE(HYPRE_SStructSysPFMGCreate(ex->hcomm, &ex->ss_solver)); in PCCreate_SysPFMG()
3192 PC_SMG *ex = (PC_SMG *)pc->data; in PCDestroy_SMG() local
3195 if (ex->hsolver) PetscCallHYPRE(HYPRE_StructSMGDestroy(ex->hsolver)); in PCDestroy_SMG()
3196 PetscCall(PetscCommRestoreComm(PetscObjectComm((PetscObject)pc), &ex->hcomm)); in PCDestroy_SMG()
3204 PC_SMG *ex = (PC_SMG *)pc->data; in PCView_SMG() local
3210 PetscCall(PetscViewerASCIIPrintf(viewer, " max iterations %" PetscInt_FMT "\n", ex->its)); in PCView_SMG()
3211 PetscCall(PetscViewerASCIIPrintf(viewer, " tolerance %g\n", ex->tol)); in PCView_SMG()
3212 …mber pre-relax %" PetscInt_FMT " post-relax %" PetscInt_FMT "\n", ex->num_pre_relax, ex->num_post_… in PCView_SMG()
3219 PC_SMG *ex = (PC_SMG *)pc->data; in PCSetFromOptions_SMG() local
3224 …terations of SMG to use as preconditioner", "HYPRE_StructSMGSetMaxIter", ex->its, &ex->its, NULL)); in PCSetFromOptions_SMG()
3225 …hing steps before coarse grid", "HYPRE_StructSMGSetNumPreRelax", ex->num_pre_relax, &ex->num_pre_r… in PCSetFromOptions_SMG()
3226 …hing steps after coarse grid", "HYPRE_StructSMGSetNumPostRelax", ex->num_post_relax, &ex->num_post… in PCSetFromOptions_SMG()
3227 …cOptionsReal("-pc_smg_tol", "Tolerance of SMG", "HYPRE_StructSMGSetTol", ex->tol, &ex->tol, NULL)); in PCSetFromOptions_SMG()
3235 PC_SMG *ex = (PC_SMG *)pc->data; in PCApply_SMG() local
3262 PetscCallHYPRE(HYPRE_StructSMGSolve(ex->hsolver, mx->hmat, mx->hb, mx->hx)); in PCApply_SMG()
3294 PC_SMG *ex = (PC_SMG *)pc->data; in PCSetUp_SMG() local
3311 if (ex->hsolver) PetscCallHYPRE(HYPRE_StructSMGDestroy(ex->hsolver)); in PCSetUp_SMG()
3312 PetscCallHYPRE(HYPRE_StructSMGCreate(ex->hcomm, &ex->hsolver)); in PCSetUp_SMG()
3314 PetscCallHYPRE(HYPRE_StructSMGSetMaxIter(ex->hsolver, (HYPRE_Int)ex->its)); in PCSetUp_SMG()
3315 PetscCallHYPRE(HYPRE_StructSMGSetNumPreRelax(ex->hsolver, (HYPRE_Int)ex->num_pre_relax)); in PCSetUp_SMG()
3316 PetscCallHYPRE(HYPRE_StructSMGSetNumPostRelax(ex->hsolver, (HYPRE_Int)ex->num_post_relax)); in PCSetUp_SMG()
3317 PetscCallHYPRE(HYPRE_StructSMGSetTol(ex->hsolver, ex->tol)); in PCSetUp_SMG()
3319 PetscCallHYPRE(HYPRE_StructSMGSetup(ex->hsolver, mx->hmat, mx->hb, mx->hx)); in PCSetUp_SMG()
3320 PetscCallHYPRE(HYPRE_StructSMGSetZeroGuess(ex->hsolver)); in PCSetUp_SMG()
3349 PC_SMG *ex; in PCCreate_SMG() local
3352 PetscCall(PetscNew(&ex)); in PCCreate_SMG()
3353 pc->data = ex; in PCCreate_SMG()
3355 ex->its = 1; in PCCreate_SMG()
3356 ex->tol = 1.e-8; in PCCreate_SMG()
3357 ex->num_pre_relax = 1; in PCCreate_SMG()
3358 ex->num_post_relax = 1; in PCCreate_SMG()
3367 PetscCall(PetscCommGetComm(PetscObjectComm((PetscObject)pc), &ex->hcomm)); in PCCreate_SMG()
3369 PetscCallHYPRE(HYPRE_StructSMGCreate(ex->hcomm, &ex->hsolver)); in PCCreate_SMG()