void structRealTier :: v_scaleX (double xminfrom, double xmaxfrom, double xminto, double xmaxto) {
RealTier_Parent :: v_scaleX (xminfrom, xmaxfrom, xminto, xmaxto);
for (long i = 1; i <= our numberOfPoints (); i ++) {
RealPoint point = our point (i);
NUMscale (& point -> number, xminfrom, xmaxfrom, xminto, xmaxto);
}
}
void structAnyTier :: v_scaleX (double xminfrom, double xmaxfrom, double xminto, double xmaxto) {
AnyTier_Parent :: v_scaleX (xminfrom, xmaxfrom, xminto, xmaxto);
for (long i = 1; i <= our points.size; i ++) {
AnyPoint point = our points.at [i];
NUMscale (& point -> number, xminfrom, xmaxfrom, xminto, xmaxto);
}
}
static void scaleX (I, double xminfrom, double xmaxfrom, double xminto, double xmaxto) {
iam (RealTier);
inherited (RealTier) scaleX (me, xminfrom, xmaxfrom, xminto, xmaxto);
for (long i = 1; i <= my points -> size; i ++) {
RealPoint point = (structRealPoint *)my points -> item [i];
NUMscale (& point -> time, xminfrom, xmaxfrom, xminto, xmaxto);
}
}
void structFunction :: v_scaleX (double xminfrom, double xmaxfrom, double xminto, double xmaxto) {
NUMscale (& xmin, xminfrom, xmaxfrom, xminto, xmaxto);
NUMscale (& xmax, xminfrom, xmaxfrom, xminto, xmaxto);
}
void structSampled :: v_scaleX (double xminfrom, double xmaxfrom, double xminto, double xmaxto) {
Sampled_Parent :: v_scaleX (xminfrom, xmaxfrom, xminto, xmaxto);
NUMscale (& x1, xminfrom, xmaxfrom, xminto, xmaxto);
dx *= (xmaxto - xminto) / (xmaxfrom - xminfrom);
}
void structPointProcess :: v_scaleX (double xminfrom, double xmaxfrom, double xminto, double xmaxto) {
PointProcess_Parent :: v_scaleX (xminfrom, xmaxfrom, xminto, xmaxto);
for (long i = 1; i <= nt; i ++) {
NUMscale (& t [i], xminfrom, xmaxfrom, xminto, xmaxto);
}
}
static void scaleX (I, double xminfrom, double xmaxfrom, double xminto, double xmaxto) {
iam (Sampled);
inherited (Sampled) scaleX (me, xminfrom, xmaxfrom, xminto, xmaxto);
NUMscale (& my x1, xminfrom, xmaxfrom, xminto, xmaxto);
my dx *= (xmaxto - xminto) / (xmaxfrom - xminfrom);
}
