src/fclaw2d_regrid.c
/* This is also called from fclaw2d_initialize, so is not made static */
This is also called from fclaw2d_initialize, so is not made static
This is also called from fclaw2d_initialize so is not made static
void cb_fclaw2d_regrid_tag4refinement(fclaw2d_domain_t *domain,
									  fclaw2d_patch_t *this_patch,
									  int this_block_idx,
									  int this_patch_idx,
									  void *user)
{
    int refine_patch, maxlevel, level;
    const fclaw_options_t* fclaw_opt;
    fclaw2d_global_iterate_t* g = (fclaw2d_global_iterate_t*) user;
    int domain_init = *((int*) g->user);
    fclaw_opt = fclaw2d_get_options(g->glob);
    maxlevel = fclaw_opt->maxlevel;
    level = this_patch->level;
    if (level < maxlevel)
    {
        refine_patch  =
            fclaw2d_patch_tag4refinement(g->glob,this_patch,this_block_idx,
                                         this_patch_idx, domain_init);
        if (refine_patch == 1)
        {
            fclaw2d_patch_mark_refine(domain, this_block_idx, this_patch_idx);
        }
    }
}
void cb_fclaw2d_regrid_tag4refinement ( fclaw2d_domain_t * domain , fclaw2d_patch_t * this_patch , int this_block_idx , int this_patch_idx , void * user ) { int refine_patch , maxlevel , level ; const fclaw_options_t * fclaw_opt ; fclaw2d_global_iterate_t * g = ( fclaw2d_global_iterate_t * ) user ; int domain_init = * ( ( int * ) g -> user ) ; fclaw_opt = fclaw2d_get_options ( g -> glob ) ; maxlevel = fclaw_opt -> maxlevel ; level = this_patch -> level ; if ( level < maxlevel ) { refine_patch = fclaw2d_patch_tag4refinement ( g -> glob , this_patch , this_block_idx , this_patch_idx , domain_init ) ; if ( refine_patch == 1 ) { fclaw2d_patch_mark_refine ( domain , this_block_idx , this_patch_idx ) ; } } }
This is also called from fclaw2d_initialize, so is not made static
This is also called from fclaw2d_initialize so is not made static