Return to howsliced CVS log

Up to [Research Unix] / researchv10dc / vol2 / Faces / How

Annotation of researchv10dc/vol2/Faces/How/howsliced, revision 1.1

1.1     ! root        1: x {
        !             2:        int a, dy;
        !             3:        array ddy[X];
        !             4:        for (dy = 1; dy < X; dy++)
        !             5:                ddy[dy] = ddy[dy-1]+rand()%4-2
        !             6:        for (dy = 0; dy < Y; dy++)
        !             7:        {       a = (dy/51)%4
        !             8:                for (x = 0; x < X; x++)
        !             9:                {       y = clamp(ddy[x]+dy-sin(2*x)/(x+50)) 
        !            10:                        if (a == 0)
        !            11:                        new[x,y]=$1[x,y]
        !            12:                        if (a == 1)
        !            13:                        new[x,y]=$2[x,y]
        !            14:                        if (a == 2)
        !            15:                        new[x,y]=$5[x,y]
        !            16:                        if (a == 3)
        !            17:                        new[x,y]=$4[x,y]
        !            18:                }
        !            19:        }       
        !            20: }

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.