} 1
CCTK_INT prolongation_order "Prolongation order"
{
  0 :: "piecewise continuous"
  1 :: "linear"
  2 :: "quadratic"
  4 :: ""

#include "schedule.hxx"
#include "prolongate_3d_rf2.hxx"

#include "prolongate_3d_rf2.hxx"
#include "schedule.hxx"

Interpolater *get_interpolator() {
  DECLARE_CCTK_PARAMETERS;
  switch (prolongation_order) {
  case 0:
    return &pc_interp;
  case 1:
    return &cell_bilinear_interp;
  case 2:
    return &quadratic_interp;
  case 4:
    return &prolongate3d_cc_rf2_o4;
  }
  assert(0);
}

  Interpolater *const interpolator = get_interpolator();

            &prolongate3d_cc_rf2_o4, bcs, 0);

            interpolator, bcs, 0);

  Interpolater *const interpolator = get_interpolator();

                             0, reffact, &prolongate3d_cc_rf2_o4, bcs, 0);

                             0, reffact, interpolator, bcs, 0);