public class xVarARRAYTYPE {

        double pcopy  = 0.0;
        double padd   = 0.0;
        double pscale = 0.0;
        double ptriad = 0.0;

        public double copy()  { return pcopy;  } 
        public double add()   { return padd;   } 
        public double scale() { return pscale; } 
        public double triad() { return ptriad; }

	static void checkresult(ARRAYTYPE[.] a, ARRAYTYPE[.] b, ARRAYTYPE[.] c, int N, int rep) {
		double epsilon=1.0e-6;
		double d      = (double)1; // modified during timing tests
		double e      = (double)2;
		double f      = (double)0;
		double scalar = (double)3;
		double sa     = (double)0;
		double sb     = (double)0;
		double sc     = (double)0;
		for (int i=0; i<N; i++) {
			sa += (double)a[i];
			sb += (double)b[i];
			sc += (double)c[i];
		}
		for (int i=0; i<rep; i++) {
			e = scalar * d;
			f = (scalar + 1.0) * d;
			d = scalar * (scalar + 2.0) * d;
		}
		d = (double)(d) * (double)(N);
		e = (double)(e) * (double)(N);
		f = (double)(f) * (double)(N);
		if ( java.lang.Math.abs((double)(d-sa))/(double)sa > epsilon )
			System.out.println ("Validation Failure on a. Expected "+d+" got "+sa);
		if ( java.lang.Math.abs((double)(e-sb))/(double)sb > epsilon )
			System.out.println ("Validation Failure on b. Expected "+e+" got "+sb);
		if ( java.lang.Math.abs((double)(f-sc))/(double)sc > epsilon )
			System.out.println ("Validation Failure on c. Expected "+f+" got "+sc);
	}
}