diff options
Diffstat (limited to 'src/qms_solve.c')
-rw-r--r-- | src/qms_solve.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/qms_solve.c b/src/qms_solve.c index 0d74300..f1e6ee8 100644 --- a/src/qms_solve.c +++ b/src/qms_solve.c @@ -1093,7 +1093,7 @@ fail: int qms_solver_init(QMSSolver **pctx, cGH *cctkGH, int basis_order_r, int basis_order_z, - double sf, double filter_power, double input_filter_power) + double outer_bound, double filter_power, double input_filter_power) { QMSSolver *ctx; QMSSolverPriv *s; @@ -1136,7 +1136,7 @@ int qms_solver_init(QMSSolver **pctx, //FIXME scale_factor = 1.0; - scale_factor = (64.0 / ctx->basis[0]->colloc_point(s->colloc_grid_order[0], ctx->nb_colloc_points[0] - 1)); + scale_factor = (outer_bound / ctx->basis[0]->colloc_point(s->colloc_grid_order[0], ctx->nb_colloc_points[0] - 1)); fprintf(stderr, "scale factor %16.16g\n", scale_factor); init_opencl(ctx); |