R1
R1(A,B,C,D,X( 0), 3,0x5A827999L);
R1(D,A,B,C,X( 4), 5,0x5A827999L);
R1(C,D,A,B,X( 8), 9,0x5A827999L);
R1(B,C,D,A,X(12),13,0x5A827999L);
R1(A,B,C,D,X( 1), 3,0x5A827999L);
R1(D,A,B,C,X( 5), 5,0x5A827999L);
R1(C,D,A,B,X( 9), 9,0x5A827999L);
R1(B,C,D,A,X(13),13,0x5A827999L);
R1(A,B,C,D,X( 2), 3,0x5A827999L);
R1(D,A,B,C,X( 6), 5,0x5A827999L);
R1(C,D,A,B,X(10), 9,0x5A827999L);
R1(B,C,D,A,X(14),13,0x5A827999L);
R1(A,B,C,D,X( 3), 3,0x5A827999L);
R1(D,A,B,C,X( 7), 5,0x5A827999L);
R1(C,D,A,B,X(11), 9,0x5A827999L);
R1(B,C,D,A,X(15),13,0x5A827999L);
R1(A,B,C,D,X( 1), 5,0xf61e2562L);
R1(D,A,B,C,X( 6), 9,0xc040b340L);
R1(C,D,A,B,X(11),14,0x265e5a51L);
R1(B,C,D,A,X( 0),20,0xe9b6c7aaL);
R1(A,B,C,D,X( 5), 5,0xd62f105dL);
R1(D,A,B,C,X(10), 9,0x02441453L);
R1(C,D,A,B,X(15),14,0xd8a1e681L);
R1(B,C,D,A,X( 4),20,0xe7d3fbc8L);
R1(A,B,C,D,X( 9), 5,0x21e1cde6L);
R1(D,A,B,C,X(14), 9,0xc33707d6L);
R1(C,D,A,B,X( 3),14,0xf4d50d87L);
R1(B,C,D,A,X( 8),20,0x455a14edL);
R1(A,B,C,D,X(13), 5,0xa9e3e905L);
R1(D,A,B,C,X( 2), 9,0xfcefa3f8L);
R1(C,D,A,B,X( 7),14,0x676f02d9L);
R1(B,C,D,A,X(12),20,0x8d2a4c8aL);
R1(B, C, D, A, F, G, H, E, 0x6228cbce, W11, W11 ^ W15);
R1(A, B, C, D, E, F, G, H, 0xc451979c, W12, W12 ^ W00);
R1(D, A, B, C, H, E, F, G, 0x88a32f39, W13, W13 ^ W01);
R1(C, D, A, B, G, H, E, F, 0x11465e73, W14, W14 ^ W02);
R1(B, C, D, A, F, G, H, E, 0x228cbce6, W15, W15 ^ W03);
R1(A, B, C, D, E, F, G, H, 0x79cc4519, W00, W00 ^ W04);
R1(D, A, B, C, H, E, F, G, 0xf3988a32, W01, W01 ^ W05);
R1(C, D, A, B, G, H, E, F, 0xe7311465, W02, W02 ^ W06);
R1(B, C, D, A, F, G, H, E, 0xce6228cb, W03, W03 ^ W07);
R1(A, B, C, D, E, F, G, H, 0x9cc45197, W04, W04 ^ W08);
R1(D, A, B, C, H, E, F, G, 0x3988a32f, W05, W05 ^ W09);
R1(C, D, A, B, G, H, E, F, 0x7311465e, W06, W06 ^ W10);
R1(B, C, D, A, F, G, H, E, 0xe6228cbc, W07, W07 ^ W11);
R1(A, B, C, D, E, F, G, H, 0xcc451979, W08, W08 ^ W12);
R1(D, A, B, C, H, E, F, G, 0x988a32f3, W09, W09 ^ W13);
R1(C, D, A, B, G, H, E, F, 0x311465e7, W10, W10 ^ W14);
W[t] = R1 (W[t - 2]) + W[t - 7] + R0 (W[t - 15]) + W[t - 16];
W[t] = R1 (W[t - 2]) + W[t - 7] + R0 (W[t - 15]) + W[t - 16];