extern SP::RangeInfo<UU> pretty(UU lo, UU up, int n){
const static double facts[] = {1.5, 0.5 + 1.5*1.5};
//double step = SK_prety0(*lo, *up, *n);
double step = R_pretty0(
&static_cast<double>(lo),
&static_cast<double>(up),
&n, n/3, 0.75, facts, 0, 1
);
return SP::RangeInfo<UU>(lo, up, step, n);
}
void R_pretty(double *lo, double *up, int *ndiv, int *min_n,
double *shrink_sml, double *high_u_fact, int *eps_correction)
{
R_pretty0(lo, up, ndiv,
*min_n, *shrink_sml, high_u_fact, *eps_correction, 1);
}