"MODEL"  y  =  a * d  +  b * x  +  c * z;

"INPUT"  n, m, n * [ z, d, x, y, r ],
	 o, < (o+1) * o : 2 > * [ correl element ],
	 s, s * ( t, t * [ estimate ],
		  t, < (t+1) * t : 2 > * [ covar element ],
		  n, n * ( 6 * [ residual element ] ) );

"OPTIONS"  1, 2, 3, 5(1), 7;

"RUN"

"INPUT"  k, l, k * [ constant, inorganic, organic, available ],
	 l, < (l+1) * l : 2 > * [ correl element ],
	 r, r * ( u, u * [ estimate ],
		  u, < (u+1) * u : 2 > * [ covar element ],
		  k, k * ( 6 * [ residual element ] ) );

"MODEL"   available  =  beta0  +  beta1 * inorganic  +  beta2 * organic;

"OPTIONS" Transformed data matrix, Correlation matrix, Residual analysis;

"DATA"

"RUN"

"INPUT"	 n, m, n * [ const, rate, wheel, visco, surface ],
	 s, s * ( t, t * [ estimate ],
		  n, n * ( 6 * [ residual element ] ) );

"MODEL"  surface = alfa + beta * rate + gamma * wheel + delta * visco;

"DATA"

"RUN"

"EXIT"