#!/bin/sh
exit 0
BEGINCHUNKfor(int@ss=0$ss!=256$ss=ss^1){@int@k0=a*4^ss~4$@int@k1=b*4^(ss/4)~4$@int@k2=c*4^(ss/16)~4$@int@k3=d*4^(ss/64)~4$@int@x[10],y[10],z[10],w[10]$@for(int@v=0$v!=10$v=v^1)x[v]=K[k0][v]$@for(int@v=0$v!=10$v=v^1)y[v]=K[k1][x[v]]$@for(int@v=0$v!=10$v=v^1)z[v]=K[k2][y[v]]$@for(int@v=0$v!=10$v=v^1)w[v]=K[k3][z[v]]$@ty(w)$@if(!(nc==4@and@c1==2@and@c2==1@and@c6==1))continue$@int@p1[10],p2[10],i1[10],i2[10],u[10],r2[10]$@for(int@v=0$v!=10$v=v^1)p1[v]=K[k2][K[k0][v]]$@for(int@v=0$v!=10$v=v^1)p2[v]=K[k3][K[k1][v]]$@for(int@v=0$v!=10$v=v^1){i1[p1[v]]=v$i2[p2[v]]=v$}@for(int@v=0$v!=10$v=v^1)u[v]=p1[p2[v]]$@for(int@v=0$v!=10$v=v^1)u[v]=i2[u[v]]$@for(int@v=0$v!=10$v=v^1)r2[v]=i1[u[v]]$@ty(r2)$@if(nc==2@and@c5==2){@V[vn]=k0^60*(k1^60*(k2^60*k3))$@vn=vn^1$@}@}@}@}@}@