Lines Matching refs:honee
15 PetscErrorCode CreateDM(Honee honee, ProblemData problem, MatType mat_type, VecType vec_type, DM *d… in CreateDM() argument
16 MPI_Comm comm = honee->comm; in CreateDM()
66 PetscCall(DMPlexSetScale(*dm, PETSC_UNIT_LENGTH, honee->units->meter)); in CreateDM()
67 PetscCall(DMPlexSetScale(*dm, PETSC_UNIT_MASS, honee->units->kilogram)); in CreateDM()
68 PetscCall(DMPlexSetScale(*dm, PETSC_UNIT_TIME, honee->units->second)); in CreateDM()
69 PetscCall(DMPlexSetScale(*dm, PETSC_UNIT_TEMPERATURE, honee->units->Kelvin)); in CreateDM()
123 PetscErrorCode VizRefineDM(DM dm, Honee honee, ProblemData problem, Physics phys) { in VizRefineDM() argument
124 DM dm_hierarchy[honee->app_ctx->viz_refine + 1]; in VizRefineDM()
131 for (PetscInt i = 0, d = honee->app_ctx->degree; i < honee->app_ctx->viz_refine; i++) { in VizRefineDM()
138 PetscInt q_order = d + honee->app_ctx->q_extra; in VizRefineDM()
139 if (i + 1 == honee->app_ctx->viz_refine) d = 1; in VizRefineDM()
144 if (!i) honee->interp_viz = interp_next; in VizRefineDM()
147 PetscCall(MatMatMult(interp_next, honee->interp_viz, MAT_INITIAL_MATRIX, PETSC_DECIDE, &C)); in VizRefineDM()
149 PetscCall(MatDestroy(&honee->interp_viz)); in VizRefineDM()
150 honee->interp_viz = C; in VizRefineDM()
153 for (PetscInt i = 1; i < honee->app_ctx->viz_refine; i++) { in VizRefineDM()
156 honee->dm_viz = dm_hierarchy[honee->app_ctx->viz_refine]; in VizRefineDM()