typedef unsigned int u32; typedef unsigned long long u64; static inline u64 rot(u64 x, u32 n, u32 mb, u32 me) { u64 y = x; if (n) x = 0 #ifdef SL | (x << n) #endif #ifdef SR | (x >> (64 - n)) #endif ; u64 s = -1; if (n) s = 0 #ifdef SL | (s << n) #endif #ifdef SR | (s >> (64 - n)) #endif ; u64 mask = 0; mask += 1ULL << (63 - mb); mask += 1ULL << (63 - mb); mask -= 1ULL << (63 - me); mask -= (mb > me); if (mask & ~s) return 12345*y; return x & mask; } #ifdef CC #define X2(N,B) \ u64 f_##N##_##B(u64 x) { return rot(x,N,B,63-N); } #endif #ifdef CL #define X2(N,B) \ u64 f_##N##_##B(u64 x) { return rot(x,N,B,63); } #endif #ifdef CR #define X2(N,E) \ u64 f_##N##_##E(u64 x) { return rot(x,N,0,E); } #endif #define X1(N) \ X2(N,0) \ X2(N,1) \ X2(N,2) \ X2(N,7) \ X2(N,8) \ X2(N,9) \ X2(N,15) \ X2(N,16) \ X2(N,17) \ X2(N,23) \ X2(N,24) \ X2(N,25) \ X2(N,29) \ X2(N,30) \ X2(N,31) \ X2(N,32) \ X2(N,33) \ X2(N,34) \ X2(N,39) \ X2(N,40) \ X2(N,41) \ X2(N,47) \ X2(N,48) \ X2(N,49) \ X2(N,55) \ X2(N,56) \ X2(N,57) \ X2(N,61) \ X2(N,62) \ X2(N,63) #define X() \ X1(0) \ X1(1) \ X1(2) \ X1(7) \ X1(8) \ X1(9) \ X1(15) \ X1(16) \ X1(17) \ X1(23) \ X1(24) \ X1(25) \ X1(29) \ X1(30) \ X1(31) \ X1(32) \ X1(33) \ X1(34) \ X1(39) \ X1(40) \ X1(41) \ X1(47) \ X1(48) \ X1(49) \ X1(55) \ X1(56) \ X1(57) \ X1(61) \ X1(62) \ X1(63) X()