set Initial refinement = 2
set Refinement criterion = { global | true error | estimated error }
set Refinement fraction = 0.3
+set Coarsening fraction = 0.03
set Maximum cells = 10000
set Output base filename = data-gauss/
set Output format = ucd
set Initial refinement = 1
set Refinement criterion = { global | estimated error }
set Refinement fraction = 0.1
+set Coarsening fraction = 0.02
set Maximum cells = 100000
set Output base filename = data-kink/
set Output format = ucd
set Initial refinement = 1
set Refinement criterion = { global | estimated error }
set Refinement fraction = 0.1
+set Coarsening fraction = 0.02
set Maximum cells = 100000
set Output base filename = data-singular/
set Output format = ucd
Patterns::Sequence("global|true error|estimated error"));
prm.declare_entry ("Refinement fraction", "0.3",
Patterns::Double());
+ prm.declare_entry ("Coarsening fraction", "0.1",
+ Patterns::Double());
prm.declare_entry ("Maximum cells", "3000",
Patterns::Integer());
prm.declare_entry ("Output base filename", "");
case true_error:
tria->refine_and_coarsen_fixed_number (h1_error_per_cell,
prm.get_double("Refinement fraction"),
- 0);
+ prm.get_double("Coarsening fraction"));
tria->execute_coarsening_and_refinement ();
break;
case error_estimator:
tria->refine_and_coarsen_fixed_number (estimated_error_per_cell,
prm.get_double("Refinement fraction"),
- 0);
+ prm.get_double("Coarsening fraction"));
tria->execute_coarsening_and_refinement ();
break;
};
set Initial refinement = 2
set Refinement criterion = { global | true error | estimated error }
set Refinement fraction = 0.3
+set Coarsening fraction = 0.03
set Maximum cells = 10000
set Output base filename = data-gauss/
set Output format = ucd
set Initial refinement = 1
set Refinement criterion = { global | estimated error }
set Refinement fraction = 0.1
+set Coarsening fraction = 0.02
set Maximum cells = 100000
set Output base filename = data-kink/
set Output format = ucd
set Initial refinement = 1
set Refinement criterion = { global | estimated error }
set Refinement fraction = 0.1
+set Coarsening fraction = 0.02
set Maximum cells = 100000
set Output base filename = data-singular/
set Output format = ucd
Patterns::Sequence("global|true error|estimated error"));
prm.declare_entry ("Refinement fraction", "0.3",
Patterns::Double());
+ prm.declare_entry ("Coarsening fraction", "0.1",
+ Patterns::Double());
prm.declare_entry ("Maximum cells", "3000",
Patterns::Integer());
prm.declare_entry ("Output base filename", "");
case true_error:
tria->refine_and_coarsen_fixed_number (h1_error_per_cell,
prm.get_double("Refinement fraction"),
- 0);
+ prm.get_double("Coarsening fraction"));
tria->execute_coarsening_and_refinement ();
break;
case error_estimator:
tria->refine_and_coarsen_fixed_number (estimated_error_per_cell,
prm.get_double("Refinement fraction"),
- 0);
+ prm.get_double("Coarsening fraction"));
tria->execute_coarsening_and_refinement ();
break;
};