Replace constants that are mandatorily added in poclbm kernel with one value.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90
diff --git a/poclbm120213.cl b/poclbm120213.cl
index 4ee026e..881e0f2 100644
--- a/poclbm120213.cl
+++ b/poclbm120213.cl
@@ -95,8 +95,7 @@ W[16]+=state0;
W[19]=(rotr(W[16],6)^rotr(W[16],11)^rotr(W[16],25));
W[19]+=d1;
W[19]+=ch(W[16],b1,c1);
-W[19]+=K[4];
-W[19]+=0x80000000;
+W[19]+=0xB956C25B;
W[23]=W[19];
W[23]+=h1;
@@ -173,8 +172,7 @@ W[17]+=(rotr(W[18],2)^rotr(W[18],13)^rotr(W[18],22));
W[17]+=Ma(W[20],W[18],W[19]);
W[16]+=(rotr(W[21],6)^rotr(W[21],11)^rotr(W[21],25));
W[16]+=ch(W[21],W[22],W[23]);
-W[16]+=K[15];
-W[16]+=0x00000280U;
+W[16]+=0xC19BF3F4;
W[20]+=W[16];
W[16]+=(rotr(W[17],2)^rotr(W[17],13)^rotr(W[17],22));
W[23]+=(rotr(W[20],6)^rotr(W[20],11)^rotr(W[20],25));
@@ -664,8 +662,7 @@ W[0]=W[16];
W[7]=state7;
W[7]+=W[23];
-W[23]=0xb0edbdd0;
-W[23]+=K[0];
+W[23]=0xF377ED68;
W[0]+=state0;
W[23]+=W[0];
@@ -681,10 +678,9 @@ W[1]+=state1;
W[6]=state6;
W[6]+=W[22];
-W[22]=0x1f83d9abU;
+W[22]=0x90BB1E3C;
W[22]+=(rotr(W[19],6)^rotr(W[19],11)^rotr(W[19],25));
W[22]+=(0x9b05688cU^(W[19]&0xca0b3af3U));
-W[22]+=K[1];
W[2]=state2;
W[2]+=W[18];
@@ -698,10 +694,9 @@ W[22]+=(rotr(W[23],2)^rotr(W[23],13)^rotr(W[23],22));
W[5]=state5;
W[5]+=W[21];
-W[21]=0x9b05688cU;
+W[21]=0x150C6645B;
W[21]+=(rotr(W[18],6)^rotr(W[18],11)^rotr(W[18],25));
W[21]+=ch(W[18],W[19],0x510e527fU);
-W[21]+=K[2];
W[21]+=W[2];
W[17]=0xbb67ae85U;
@@ -712,10 +707,9 @@ W[21]+=(rotr(W[22],2)^rotr(W[22],13)^rotr(W[22],22));
W[4]=state4;
W[4]+=W[20];
-W[20]=0x510e527fU;
+W[20]=0x13AC42E24;
W[20]+=(rotr(W[17],6)^rotr(W[17],11)^rotr(W[17],25));
W[20]+=ch(W[17],W[18],W[19]);
-W[20]+=K[3];
W[20]+=W[3];
W[16]=W[20];
@@ -752,8 +746,7 @@ W[20]+=W[16];
W[16]+=(rotr(W[17],2)^rotr(W[17],13)^rotr(W[17],22));
W[23]+=(rotr(W[20],6)^rotr(W[20],11)^rotr(W[20],25));
W[23]+=ch(W[20],W[21],W[22]);
-W[23]+=K[8];
-W[23]+=0x80000000;
+W[23]+=0x15807AA98;
W[16]+=Ma(W[19],W[17],W[18]);
W[19]+=W[23];
W[23]+=(rotr(W[16],2)^rotr(W[16],13)^rotr(W[16],22));
@@ -796,8 +789,7 @@ W[17]+=(rotr(W[18],2)^rotr(W[18],13)^rotr(W[18],22));
W[17]+=Ma(W[20],W[18],W[19]);
W[16]+=(rotr(W[21],6)^rotr(W[21],11)^rotr(W[21],25));
W[16]+=ch(W[21],W[22],W[23]);
-W[16]+=K[15];
-W[16]+=0x00000100U;
+W[16]+=0xC19BF274;
W[20]+=W[16];
W[16]+=(rotr(W[17],2)^rotr(W[17],13)^rotr(W[17],22));
W[23]+=(rotr(W[20],6)^rotr(W[20],11)^rotr(W[20],25));