// Doesn't compile without the --exec option.
// It's a problem with the input function for p
// Input seems to work for ints, but not reals or vecs.
//
// Fixed [jhr; 2012-04-20]


input vec3 x = [0.0, 0.0, 0.0];
input real p = 2.5;

strand R (int i, int j, int k)
{

    output vec3 t = [p * real(i), p * real(j), p * real(k)] + x;
    update
    {
        stabilize;
    }
}

initially [ R(i, j, k) | i in 0..60, j in 0..60 , k in 0..60];