
export uniform int width() { return programCount; }

void update(float<2> * varying vp) {
    vp->y = 0;
}

export void f_f(uniform float RET[], uniform float aFOO[]) {
    float<2> v[programCount];
    for (uniform int i = 0; i < programCount; ++i) {
        v[i].x = 2*i;
        v[i].y = 2*i+1;
    }
    
    int index = aFOO[programIndex] - 1;
    update(&v[programIndex]);
//CO    for (uniform int i = 0; i < programCount; ++i) 
//CO        print("%: % %\n", i, v[i].x, v[i].y);
    RET[programIndex] = v[programIndex].x;
}

export void result(uniform float RET[]) {
    RET[programIndex] = 2*programIndex;
}
