#include "../test_static.isph"
// rule: skip on cpu=tgllp
// rule: skip on cpu=dg2
task void f_v(uniform float RET[]) {
#define width 3
//CO    const uniform int width = 4;
    uniform int64 a[width*programCount], r[width*programCount];
    for (uniform int i = 0; i < width*programCount; ++i)
        a[i] = -1;

    int64 x = width * programIndex;
    int64 y = 1 + width * programIndex;
    int64 z = 2 + width * programIndex;

    soa_to_aos3(x, y, z, a);
    uniform int errs = 0;
    for (uniform int i = 0; i < width * programCount; ++i)
        if (a[i] != i) ++errs;

    RET[programIndex] = errs;
}

task void result(uniform float RET[]) {
    RET[programIndex] = 0;
}