#!/bin/sh
exit 0
BEGINCHUNKint@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)vn=vn^1$@}@}@}@}@printf("~d",vn)$@}@