53 	lwbrx		reg,0,rWP;	/* load data			*/
65 #define R_00_15(a, b, c, d, w0, w1, p, q, off, k0h, k0l, k1h, k1l) \  argument
73 	add		a,a,rT0;	/* 1: a = a + f			*/ \
76 	add		a,a,w0;		/* 1: a = a + wk		*/ \
78 	rotrwi		a,a,p;		/* 1: a = a rotl x		*/ \
79 	add		d,d,w1;		/* 2: a = a + wk		*/ \
80 	add		a,a,b;		/* 1: a = a + b			*/ \
81 	and		rT0,a,b;	/* 2: f = b and c		*/ \
82 	andc		rT1,c,a;	/* 2: f' = ~b and d		*/ \
84 	add		d,d,rT0;	/* 2: a = a + f			*/ \
86 	rotrwi		d,d,q;		/* 2: a = a rotl x		*/ \
87 	add		d,d,a;		/* 2: a = a + b			*/
89 #define R_16_31(a, b, c, d, w0, w1, p, q, k0h, k0l, k1h, k1l) \  argument
95 	add		a,a,rT0;	/* 1: a = a + f			*/ \
97 	add		a,a,w0;		/* 1: a = a + wk		*/ \
100 	rotrwi		a,a,p;		/* 1: a = a rotl x		*/ \
101 	add		a,a,b;		/* 1: a = a + b			*/ \
102 	add		d,d,w1;		/* 2: a = a + wk		*/ \
103 	and		rT1,a,c;	/* 2: f' = b and d		*/ \
105 	add		d,d,rT0;	/* 2: a = a + f			*/ \
106 	rotrwi		d,d,q;		/* 2: a = a rotl x		*/ \
107 	add		d,d,a;		/* 2: a = a +b			*/
109 #define R_32_47(a, b, c, d, w0, w1, p, q, k0h, k0l, k1h, k1l) \  argument
114 	add		a,a,rT1;	/* 1: a = a + f			*/ \
116 	add		a,a,w0;		/* 1: a = a + wk		*/ \
118 	rotrwi		a,a,p;		/* 1: a = a rotl x		*/ \
119 	add		d,d,w1;		/* 2: a = a + wk		*/ \
120 	add		a,a,b;		/* 1: a = a + b			*/ \
121 	xor		rT1,rT0,a;	/* 2: f = b xor f'		*/ \
122 	add		d,d,rT1;	/* 2: a = a + f			*/ \
123 	rotrwi		d,d,q;		/* 2: a = a rotl x		*/ \
124 	add		d,d,a;		/* 2: a = a + b			*/
126 #define R_48_63(a, b, c, d, w0, w1, p, q, k0h, k0l, k1h, k1l) \  argument
131 	add		a,a,w0;		/* 1: a = a + wk		*/ \
133 	add		a,a,rT0;	/* 1: a = a + f			*/ \
135 	rotrwi		a,a,p;		/* 1: a = a rotl x		*/ \
136 	add		a,a,b;		/* 1: a = a + b			*/ \
137 	orc		rT0,a,c;	/* 2: f = b or ~d		*/ \
138 	add		d,d,w1;		/* 2: a = a + wk		*/ \
140 	add		d,d,rT0;	/* 2: a = a + f			*/ \
141 	rotrwi		d,d,q;		/* 2: a = a rotl x		*/ \
142 	add		d,d,a;		/* 2: a = a + b			*/
148 	lwz		rH0,0(rHP)
154 	R_00_15(rH0, rH1, rH2, rH3, rW00, rW01, 25, 20, 0,
155 		0xd76b, -23432, 0xe8c8, -18602)
157 		0x2420, 0x70db, 0xc1be, -12562)
159 		0xf57c, 0x0faf, 0x4788, -14806)
161 		0xa830, 0x4613, 0xfd47, -27391)
163 		0x6981, -26408, 0x8b45,  -2129)
165 		0xffff, 0x5bb1, 0x895d, -10306)
167 		0x6b90, 0x1122, 0xfd98, 0x7193)
169 		0xa679, 0x438e, 0x49b4, 0x0821)
172 		0x0d56, 0x6e0c, 0x1810, 0x6d2d)
174 		0x9d02, -32109, 0x124c, 0x2332)
176 		0x8ea7, 0x4a33, 0x0245, -18270)
178 		0x8eee,  -8608, 0xf258,  -5095)
180 		0x969d, -10697, 0x1cbe, -15288)
182 		0x3317, 0x3e99, 0xdbd9, 0x7c15)
184 		0xac4b, 0x7772, 0xd8cf, 0x331d)
186 		0x6a28, 0x6dd8, 0x219a, 0x3b68)
189 		0x29cb, 0x28e5, 0x4218,  -7788)
191 		0x473f, 0x06d1, 0x3aae, 0x3036)
193 		0xaea1, -15134, 0x640b, -11295)
195 		0x8f4c, 0x4887, 0xbc7c, -22499)
197 		0x7eb8, -27199, 0x00ea, 0x6050)
199 		0xe01a, 0x22fe, 0x4447, 0x69c5)
201 		0xb7f3, 0x0253, 0x59b1, 0x4d5b)
203 		0x4701, -27017, 0xc7bd, -19859)
206 		0x0988,  -1462, 0x4c70, -19401)
208 		0xadaf,  -5221, 0xfc99, 0x66f7)
210 		0x7e80, -16418, 0xba1e, -25587)
212 		0x4130, 0x380d, 0xe0c5, 0x738d)
213 	lwz		rW00,0(rHP)
215 		0xe837, -30770, 0xde8a, 0x69e8)
218 		0x9e79, 0x260f, 0x256d, -27941)
221 		0xab75, -20775, 0x4f9e, -28397)
224 		0x662b, 0x7c56, 0x11b2, 0x0358)
227 	stw		rH0,0(rHP)