Home
last modified time | relevance | path

Searched refs:mg_s_info (Results 1 – 5 of 5) sorted by relevance

/dports/math/alberta/alberta3-920315ae1bbfd1b1fb6672d916619ac37a411e95/alberta/src/Common/
H A DMG_s1.c83 TEST_EXIT(mg_s_info && (mg_info = mg_s_info->mg_info), in MG_s_setup_levels()
134 mg_s_info->matrix = MEM_REALLOC(mg_s_info->matrix, in MG_s_setup_levels()
136 mg_s_info->f_h = MEM_REALLOC(mg_s_info->f_h, in MG_s_setup_levels()
138 mg_s_info->u_h = MEM_REALLOC(mg_s_info->u_h, in MG_s_setup_levels()
140 mg_s_info->r_h = MEM_REALLOC(mg_s_info->r_h, in MG_s_setup_levels()
278 TEST_EXIT(mg_s_info && mg_s_info->fe_space, in MG_s_setup_mat_b()
437 TEST_EXIT(mg_s_info && mg_s_info->fe_space, in MG_s_reset_mat()
468 TEST_EXIT(mg_s_info && mg_s_info->fe_space, in MG_s_sort_mat()
516 MEM_FREE(mg_s_info->r_h, mg_s_info->size, REAL *); in MG_s_free_mem()
517 MEM_FREE(mg_s_info->u_h, mg_s_info->size, REAL *); in MG_s_free_mem()
[all …]
H A DMG_s.c40 MG_S_INFO *mg_s_info; in init_multi_grid() local
47 MG_s_dof_copy_to_sparse(mg_s_info, mg_s_info->u, mg_s_info->u_h[level]); in init_multi_grid()
48 MG_s_dof_copy_to_sparse(mg_s_info, mg_s_info->f, mg_s_info->f_h[level]); in init_multi_grid()
58 MG_S_INFO *mg_s_info; in exit_multi_grid() local
65 MG_s_dof_copy_from_sparse(mg_s_info, mg_s_info->u_h[level], mg_s_info->u); in exit_multi_grid()
166 return(mg_s_info); in mg_s_init()
178 TEST_EXIT(mg_s_info && (mg_info = mg_s_info->mg_info), in mg_s_solve()
185 mg_s_info->u = u; in mg_s_solve()
186 mg_s_info->f = f; in mg_s_solve()
209 TEST_EXIT(mg_s_info && (mg_info = mg_s_info->mg_info), in mg_s_exit()
[all …]
H A DMG_s2.c259 TEST_EXIT(mg_s_info->r_h && (fg_fct = mg_s_info->r_h[mg_level]), in MG_s_restrict()
261 TEST_EXIT(mg_s_info->f_h && (cg_fct = mg_s_info->f_h[mg_level-1]), in MG_s_restrict()
331 TEST_EXIT(mg_s_info->u_h && (fg_fct = mg_s_info->u_h[mg_level]), in MG_s_prolongate()
333 TEST_EXIT(mg_s_info->u_h && (cg_fct = mg_s_info->u_h[mg_level-1]), in MG_s_prolongate()
383 MG_S_INFO *mg_s_info; in MG_s_resid() local
389 TEST_EXIT(mg_s_info->f_h && (f_h = mg_s_info->f_h[mg_level]),"no f_h\n"); in MG_s_resid()
390 TEST_EXIT(mg_s_info->r_h && (r_h = mg_s_info->r_h[mg_level]),"no r_h\n"); in MG_s_resid()
391 TEST_EXIT(mg_s_info->matrix && mg_s_info->matrix[mg_level],"no matrix\n"); in MG_s_resid()
442 TEST_EXIT(mg_s_info->f_h && (fvec = mg_s_info->f_h[mg_level]),"no f_h\n"); in sor_smoother()
443 TEST_EXIT(mg_s_info->u_h && (uvec = mg_s_info->u_h[mg_level]),"no u_h\n"); in sor_smoother()
[all …]
H A Dalberta.h3065 typedef struct mg_s_info MG_S_INFO;
3066 struct mg_s_info struct
3102 void MG_s_setup_levels(MG_S_INFO *mg_s_info); argument
3103 void MG_s_setup_mat_b(MG_S_INFO *mg_s_info,
3105 void MG_s_dof_copy_to_sparse(MG_S_INFO *mg_s_info,
3107 void MG_s_dof_copy_from_sparse(MG_S_INFO *mg_s_info,
3109 void MG_s_reset_mat(MG_S_INFO *mg_s_info);
3110 void MG_s_sort_mat(MG_S_INFO *mg_s_info);
3111 void MG_s_free_mem(MG_S_INFO *mg_s_info);
3130 int mg_s_solve(MG_S_INFO *mg_s_info,
[all …]
/dports/math/alberta/alberta3-920315ae1bbfd1b1fb6672d916619ac37a411e95/
H A DChangeLog15008 "mg_s_info->sort_bound" according to a suggestion by Robert