atl_smm4x4xurx_mips.c

来自「基于Blas CLapck的.用过的人知道是干啥的」· C语言 代码 · 共 3,232 行 · 第 1/5 页

	#endif
	madd.s	rC22, rC22, rE2, rB2
	#if KB == 27
					swc1	rC31, -CMUL(4)(pC1)
	#endif
	madd.s	rC32, rC32, rA3, rB2
	#if KB > 27
					lwc1	rB2, 108(pB2)
	#elif KB == 27
					swc1	rC02, -CMUL(16)(pC2)
	#endif
	madd.s	rC03, rC03, rE0, rB3
	#if KB == 27
					swc1	rC12, -CMUL(12)(pC2)
	#endif
	madd.s	rC13, rC13, rA1, rB3
	#if KB > 27
					lwc1	ra3, 108(pA3)
	#elif KB == 27
					swc1	rC22, -CMUL(8)(pC2)
	#endif
	madd.s	rC23, rC23, rE2, rB3
	#if KB == 27
					swc1	rC32, -CMUL(4)(pC2)
	#endif
	madd.s	rC33, rC33, rA3, rB3
	#if KB > 27
					lwc1	rB3, 108(pB3)
	#endif
#endif
#if KB > 27
	#if KB > 28
					lwc1	rA1, 112(pA1)
	#elif KB == 28
					daddu	pA0, pA0, incAm
	#endif
	madd.s	rC00, rC00, re0, rb0
	#if KB == 28
					daddu	pA1, pA1, incAm
	#endif
	madd.s	rC10, rC10, ra1, rb0
	#if KB > 30
					lwc1	rE0, 120(pA0)
	#elif KB == 28
					daddu	pA2, pA2, incAm
	#endif
	madd.s	rC20, rC20, rA2, rb0
	#if KB == 28
					daddu	pA3, pA3, incAm
	#endif
	madd.s	rC30, rC30, ra3, rb0
	#if KB > 28
					lwc1	rB0, 112(pB0)
	#elif KB == 28
					swc1	rC00, -CMUL(16)(pC0)
	#endif
	madd.s	rC01, rC01, re0, rB1
	#if KB == 28
					swc1	rC10, -CMUL(12)(pC0)
	#endif
	madd.s	rC11, rC11, ra1, rB1
	#if KB == 28
					swc1	rC20, -CMUL(8)(pC0)
	#endif
	madd.s	rC21, rC21, rA2, rB1
	#if KB == 28
					swc1	rC30, -CMUL(4)(pC0)
	#endif
	madd.s	rC31, rC31, ra3, rB1
	#if KB > 28
					lwc1	rB1, 112(pB1)
	#elif KB == 28
					swc1	rC01, -CMUL(16)(pC1)
	#endif
	madd.s	rC02, rC02, re0, rB2
	#if KB == 28
					swc1	rC11, -CMUL(12)(pC1)
	#endif
	madd.s	rC12, rC12, ra1, rB2
	#if KB > 29
					lwc1	rE2, 116(pA2)
	#elif KB == 28
					swc1	rC21, -CMUL(8)(pC1)
	#endif
	madd.s	rC22, rC22, rA2, rB2
	#if KB == 28
					swc1	rC31, -CMUL(4)(pC1)
	#endif
	madd.s	rC32, rC32, ra3, rB2
	#if KB > 28
					lwc1	rB2, 112(pB2)
	#elif KB == 28
					swc1	rC02, -CMUL(16)(pC2)
	#endif
	madd.s	rC03, rC03, re0, rB3
	#if KB == 28
					swc1	rC12, -CMUL(12)(pC2)
	#endif
	madd.s	rC13, rC13, ra1, rB3
	#if KB > 28
					lwc1	rA3, 112(pA3)
	#elif KB == 28
					swc1	rC22, -CMUL(8)(pC2)
	#endif
	madd.s	rC23, rC23, rA2, rB3
	#if KB == 28
					swc1	rC32, -CMUL(4)(pC2)
	#endif
	madd.s	rC33, rC33, ra3, rB3
	#if KB > 28
					lwc1	rB3, 112(pB3)
	#endif
#endif
#if KB > 28
	#if KB > 29
					lwc1	ra1, 116(pA1)
	#elif KB == 29
					daddu	pA0, pA0, incAm
	#endif
	madd.s	rC00, rC00, rA0, rB0
	#if KB == 29
					daddu	pA1, pA1, incAm
	#endif
	madd.s	rC10, rC10, rA1, rB0
	#if KB > 31
					lwc1	re0, 124(pA0)
	#elif KB == 29
					daddu	pA2, pA2, incAm
	#endif
	madd.s	rC20, rC20, ra2, rB0
	#if KB == 29
					daddu	pA3, pA3, incAm
	#endif
	madd.s	rC30, rC30, rA3, rB0
	#if KB > 29
					lwc1	rb0, 116(pB0)
	#elif KB == 29
					swc1	rC00, -CMUL(16)(pC0)
	#endif
	madd.s	rC01, rC01, rA0, rB1
	#if KB == 29
					swc1	rC10, -CMUL(12)(pC0)
	#endif
	madd.s	rC11, rC11, rA1, rB1
	#if KB == 29
					swc1	rC20, -CMUL(8)(pC0)
	#endif
	madd.s	rC21, rC21, ra2, rB1
	#if KB == 29
					swc1	rC30, -CMUL(4)(pC0)
	#endif
	madd.s	rC31, rC31, rA3, rB1
	#if KB > 29
					lwc1	rB1, 116(pB1)
	#elif KB == 29
					swc1	rC01, -CMUL(16)(pC1)
	#endif
	madd.s	rC02, rC02, rA0, rB2
	#if KB == 29
					swc1	rC11, -CMUL(12)(pC1)
	#endif
	madd.s	rC12, rC12, rA1, rB2
	#if KB > 30
					lwc1	rA2, 120(pA2)
	#elif KB == 29
					swc1	rC21, -CMUL(8)(pC1)
	#endif
	madd.s	rC22, rC22, ra2, rB2
	#if KB == 29
					swc1	rC31, -CMUL(4)(pC1)
	#endif
	madd.s	rC32, rC32, rA3, rB2
	#if KB > 29
					lwc1	rB2, 116(pB2)
	#elif KB == 29
					swc1	rC02, -CMUL(16)(pC2)
	#endif
	madd.s	rC03, rC03, rA0, rB3
	#if KB == 29
					swc1	rC12, -CMUL(12)(pC2)
	#endif
	madd.s	rC13, rC13, rA1, rB3
	#if KB > 29
					lwc1	ra3, 116(pA3)
	#elif KB == 29
					swc1	rC22, -CMUL(8)(pC2)
	#endif
	madd.s	rC23, rC23, ra2, rB3
	#if KB == 29
					swc1	rC32, -CMUL(4)(pC2)
	#endif
	madd.s	rC33, rC33, rA3, rB3
	#if KB > 29
					lwc1	rB3, 116(pB3)
	#endif
#endif
#if KB > 29
	#if KB > 30
					lwc1	rA1, 120(pA1)
	#elif KB == 30
					daddu	pA0, pA0, incAm
	#endif
	madd.s	rC00, rC00, ra0, rb0
	#if KB == 30
					daddu	pA1, pA1, incAm
	#endif
	madd.s	rC10, rC10, ra1, rb0
	#if KB > 32
					lwc1	rA0, 128(pA0)
	#elif KB == 30
					daddu	pA2, pA2, incAm
	#endif
	madd.s	rC20, rC20, rE2, rb0
	#if KB == 30
					daddu	pA3, pA3, incAm
	#endif
	madd.s	rC30, rC30, ra3, rb0
	#if KB > 30
					lwc1	rB0, 120(pB0)
	#elif KB == 30
					swc1	rC00, -CMUL(16)(pC0)
	#endif
	madd.s	rC01, rC01, ra0, rB1
	#if KB == 30
					swc1	rC10, -CMUL(12)(pC0)
	#endif
	madd.s	rC11, rC11, ra1, rB1
	#if KB == 30
					swc1	rC20, -CMUL(8)(pC0)
	#endif
	madd.s	rC21, rC21, rE2, rB1
	#if KB == 30
					swc1	rC30, -CMUL(4)(pC0)
	#endif
	madd.s	rC31, rC31, ra3, rB1
	#if KB > 30
					lwc1	rB1, 120(pB1)
	#elif KB == 30
					swc1	rC01, -CMUL(16)(pC1)
	#endif
	madd.s	rC02, rC02, ra0, rB2
	#if KB == 30
					swc1	rC11, -CMUL(12)(pC1)
	#endif
	madd.s	rC12, rC12, ra1, rB2
	#if KB > 31
					lwc1	ra2, 124(pA2)
	#elif KB == 30
					swc1	rC21, -CMUL(8)(pC1)
	#endif
	madd.s	rC22, rC22, rE2, rB2
	#if KB == 30
					swc1	rC31, -CMUL(4)(pC1)
	#endif
	madd.s	rC32, rC32, ra3, rB2
	#if KB > 30
					lwc1	rB2, 120(pB2)
	#elif KB == 30
					swc1	rC02, -CMUL(16)(pC2)
	#endif
	madd.s	rC03, rC03, ra0, rB3
	#if KB == 30
					swc1	rC12, -CMUL(12)(pC2)
	#endif
	madd.s	rC13, rC13, ra1, rB3
	#if KB > 30
					lwc1	rA3, 120(pA3)
	#elif KB == 30
					swc1	rC22, -CMUL(8)(pC2)
	#endif
	madd.s	rC23, rC23, rE2, rB3
	#if KB == 30
					swc1	rC32, -CMUL(4)(pC2)
	#endif
	madd.s	rC33, rC33, ra3, rB3
	#if KB > 30
					lwc1	rB3, 120(pB3)
	#endif
#endif
#if KB > 30
	#if KB > 31
					lwc1	ra1, 124(pA1)
	#elif KB == 31
					daddu	pA0, pA0, incAm
	#endif
	madd.s	rC00, rC00, rE0, rB0
	#if KB == 31
					daddu	pA1, pA1, incAm
	#endif
	madd.s	rC10, rC10, rA1, rB0
	#if KB > 33
					lwc1	ra0, 132(pA0)
	#elif KB == 31
					daddu	pA2, pA2, incAm
	#endif
	madd.s	rC20, rC20, rA2, rB0
	#if KB == 31
					daddu	pA3, pA3, incAm
	#endif
	madd.s	rC30, rC30, rA3, rB0
	#if KB > 31
					lwc1	rb0, 124(pB0)
	#elif KB == 31
					swc1	rC00, -CMUL(16)(pC0)
	#endif
	madd.s	rC01, rC01, rE0, rB1
	#if KB == 31
					swc1	rC10, -CMUL(12)(pC0)
	#endif
	madd.s	rC11, rC11, rA1, rB1
	#if KB == 31
					swc1	rC20, -CMUL(8)(pC0)
	#endif
	madd.s	rC21, rC21, rA2, rB1
	#if KB == 31
					swc1	rC30, -CMUL(4)(pC0)
	#endif
	madd.s	rC31, rC31, rA3, rB1
	#if KB > 31
					lwc1	rB1, 124(pB1)
	#elif KB == 31
					swc1	rC01, -CMUL(16)(pC1)
	#endif
	madd.s	rC02, rC02, rE0, rB2
	#if KB == 31
					swc1	rC11, -CMUL(12)(pC1)
	#endif
	madd.s	rC12, rC12, rA1, rB2
	#if KB > 32
					lwc1	rE2, 128(pA2)
	#elif KB == 31
					swc1	rC21, -CMUL(8)(pC1)
	#endif
	madd.s	rC22, rC22, rA2, rB2
	#if KB == 31
					swc1	rC31, -CMUL(4)(pC1)
	#endif
	madd.s	rC32, rC32, rA3, rB2
	#if KB > 31
					lwc1	rB2, 124(pB2)
	#elif KB == 31
					swc1	rC02, -CMUL(16)(pC2)
	#endif
	madd.s	rC03, rC03, rE0, rB3
	#if KB == 31
					swc1	rC12, -CMUL(12)(pC2)
	#endif
	madd.s	rC13, rC13, rA1, rB3
	#if KB > 31
					lwc1	ra3, 124(pA3)
	#elif KB == 31
					swc1	rC22, -CMUL(8)(pC2)
	#endif
	madd.s	rC23, rC23, rA2, rB3
	#if KB == 31
					swc1	rC32, -CMUL(4)(pC2)
	#endif
	madd.s	rC33, rC33, rA3, rB3
	#if KB > 31
					lwc1	rB3, 124(pB3)
	#endif
#endif
#if KB > 31
	#if KB > 32
					lwc1	rA1, 128(pA1)
	#elif KB == 32
					daddu	pA0, pA0, incAm
	#endif
	madd.s	rC00, rC00, re0, rb0
	#if KB == 32
					daddu	pA1, pA1, incAm
	#endif
	madd.s	rC10, rC10, ra1, rb0
	#if KB > 34
					lwc1	rE0, 136(pA0)
	#elif KB == 32
					daddu	pA2, pA2, incAm
	#endif
	madd.s	rC20, rC20, ra2, rb0
	#if KB == 32
					daddu	pA3, pA3, incAm
	#endif
	madd.s	rC30, rC30, ra3, rb0
	#if KB > 32
					lwc1	rB0, 128(pB0)
	#elif KB == 32
					swc1	rC00, -CMUL(16)(pC0)
	#endif
	madd.s	rC01, rC01, re0, rB1
	#if KB == 32
					swc1	rC10, -CMUL(12)(pC0)
	#endif
	madd.s	rC11, rC11, ra1, rB1
	#if KB == 32
					swc1	rC20, -CMUL(8)(pC0)
	#endif
	madd.s	rC21, rC21, ra2, rB1
	#if KB == 32
					swc1	rC30, -CMUL(4)(pC0)
	#endif
	madd.s	rC31, rC31, ra3, rB1
	#if KB > 32
					lwc1	rB1, 128(pB1)
	#elif KB == 32
					swc1	rC01, -CMUL(16)(pC1)
	#endif
	madd.s	rC02, rC02, re0, rB2
	#if KB == 32
					swc1	rC11, -CMUL(12)(pC1)
	#endif
	madd.s	rC12, rC12, ra1, rB2
	#if KB > 33
					lwc1	rA2, 132(pA2)
	#elif KB == 32
					swc1	rC21, -CMUL(8)(pC1)
	#endif
	madd.s	rC22, rC22, ra2, rB2
	#if KB == 32
					swc1	rC31, -CMUL(4)(pC1)
	#endif
	madd.s	rC32, rC32, ra3, rB2
	#if KB > 32
					lwc1	rB2, 128(pB2)
	#elif KB == 32
					swc1	rC02, -CMUL(16)(pC2)
	#endif
	madd.s	rC03, rC03, re0, rB3
	#if KB == 32
					swc1	rC12, -CMUL(12)(pC2)
	#endif
	madd.s	rC13, rC13, ra1, rB3
	#if KB > 32
					lwc1	rA3, 128(pA3)
	#elif KB == 32
					swc1	rC22, -CMUL(8)(pC2)
	#endif
	madd.s	rC23, rC23, ra2, rB3
	#if KB == 32
					swc1	rC32, -CMUL(4)(pC2)
	#endif
	madd.s	rC33, rC33, ra3, rB3
	#if KB > 32
					lwc1	rB3, 128(pB3)
	#endif
#endif
#if KB > 32
	#if KB > 33
					lwc1	ra1, 132(pA1)
	#elif KB == 33
					daddu	pA0, pA0, incAm
	#endif
	madd.s	rC00, rC00, rA0, rB0
	#if KB == 33
					daddu	pA1, pA1, incAm
	#endif
	madd.s	rC10, rC10, rA1, rB0
	#if KB > 35
					lwc1	re0, 140(pA0)
	#elif KB == 33
					daddu	pA2, pA2, incAm
	#endif
	madd.s	rC20, rC20, rE2, rB0
	#if KB == 33
					daddu	pA3, pA3, incAm
	#endif
	madd.s	rC30, rC30, rA3, rB0
	#if KB > 33
					lwc1	rb0, 132(pB0)
	#elif KB == 33
					swc1	rC00, -CMUL(16)(pC0)
	#endif
	madd.s	rC01, rC01, rA0, rB1
	#if KB == 33
					swc1	rC10, -CMUL(12)(pC0)
	#endif
	madd.s	rC11, rC11, rA1, rB1
	#if KB == 33
					swc1	rC20, -CMUL(8)(pC0)
	#endif
	madd.s	rC21, rC21, rE2, rB1
	#if KB == 33
					swc1	rC30, -CMUL(4)(pC0)
	#endif
	madd.s	rC31, rC31, rA3, rB1
	#if KB > 33
					lwc1	rB1, 132(pB1)
	#elif KB == 33
					swc1	rC01, -CMUL(16)(pC1)
	#endif
	madd.s	rC02, rC02, rA0, rB2
	#if KB == 33
					swc1	rC11, -CMUL(12)(pC1)
	#endif
	madd.s	rC12, rC12, rA1, rB2
	#if KB > 34
					lwc1	ra2, 136(pA2)
	#elif KB == 33
					swc1	rC21, -CMUL(8)(pC1)
	#endif
	madd.s	rC22, rC22, rE2, rB2
	#if KB == 33
					swc1	rC31, -CMUL(4)(pC1)
	#endif
	madd.s	rC32, rC32, rA3, rB2
	#if KB > 33
					lwc1	rB2, 132(pB2)
	#elif KB == 33
					swc1	rC02, -CMUL(16)(pC2)
	#endif
	madd.s	rC03, rC03, rA0, rB3
	#if KB == 33
					swc1	rC12, -CMUL(12)(pC2)
	#endif
	madd.s	rC13, rC13, rA1, rB3
	#if KB > 33
					lwc1	ra3, 132(pA3)
	#elif KB == 33
					swc1	rC22, -CMUL(8)(pC2)
	#endif
	madd.s	rC23, rC23, rE2, rB3
	#if KB == 33
					swc1	rC32, -CMUL(4)(pC2)
	#endif
	madd.s	rC33, rC33, rA3, rB3
	#if KB > 33
					lwc1	rB3, 132(pB3)
	#endif
#endif
#if KB > 33
	#if KB > 34
					lwc1	rA1, 136(pA1)
	#elif KB == 34
					daddu	pA0, pA0, incAm
	#endif
	madd.s	rC00, rC00, ra0, rb0
	#if KB == 34
					daddu	pA1, pA1, incAm
	#endif
	madd.s	rC10, rC10, ra1, rb0
	#if KB > 36
					lwc1	rA0, 144(pA0)
	#elif KB == 34
					daddu	pA2, pA2, incAm
	#endif
	madd.s	rC20, rC20, rA2, rb0
	#if KB == 34
					daddu	pA3, pA3, incAm
	#endif
	madd.s	rC30, rC30, ra3, rb0
	#if KB > 34
					lwc1	rB0, 136(pB0)
	#elif KB == 34
					swc1	rC00, -CMUL(16)(pC0)
	#endif
	madd.s	rC01, rC01, ra0, rB1
	#if KB == 34
					swc1	rC10, -CMUL(12)(pC0)
	#endif
	madd.s	rC11, rC11, ra1, rB1
	#if KB == 34
					swc1	rC20, -CMUL(8)(pC0)
	#endif
	madd.s	rC21, rC21, rA2, rB1
	#if KB == 34
					swc1	rC30, -CMUL(4)(pC0)
	#endif
	madd.s	rC31, rC31, ra3, rB1
	#if KB > 34
					lwc1	rB1, 136(pB1)
	#elif KB == 34
					swc1	rC01, -CMUL(16)(pC1)
	#endif
	madd.s	rC02, rC02, ra0, rB2
	#if KB == 34
					swc1	rC11, -CMUL(12)(pC1)
	#endif
	madd.s	rC12, rC12, ra1, rB2
	#if KB > 35
					lwc1	rE2, 140(pA2)
	#elif KB == 34
					swc1	rC21, -CMUL(8)(pC1)
	#endif
	madd.s	rC22, rC22, rA2, rB2
	#if KB == 34
					swc1	rC31, -CMUL(4)(pC1)
	#endif
	madd.s	rC32, rC32, ra3, rB2
	#if KB > 34
					lwc1	rB2, 136(pB2)
	#elif KB == 34
					swc1	rC02, -CMUL(16)(pC2)
	#endif
	madd.s	rC03, rC03, ra0, rB3
	#if KB == 34
					swc1	rC12, -CMUL(12)(pC2)
	#endif
	madd.s	rC13, rC13, ra1, rB3
	#if KB > 34
					lwc1	rA3, 136(pA3)
	#elif KB == 34
					swc1	rC22, -CMUL(8)(pC2)
	#endif
	madd.s	rC23, rC23, rA2, rB3
	#if KB == 34
					swc1	rC32, -CMUL(4)(pC2)
	#endif
	madd.s	rC33, rC33, ra3, rB3
	#if KB > 34
					lwc1	rB3, 136(pB3)
	#endif
#endif
#if KB > 34
	#if KB > 35
					lwc1	ra1, 140(pA1)
	#elif KB == 35
					daddu	pA0, pA0, incAm
	#endif
	madd.s	rC00, rC00, rE0, rB0
	#if KB == 35
					daddu	pA1, pA1, incAm
	#endif
	madd.s	rC10, rC10, rA1, rB0
	#if KB > 37
					lwc1	ra0, 148(pA0)
	#elif KB == 35
					daddu	pA2, pA2, incAm
	#endif
	madd.s	rC20, rC20, ra2, rB0
	#if KB == 35
					daddu	pA3, pA3, incAm
	#endif
	madd.s	rC30, rC30, rA3, rB0
	#if KB > 35
					lwc1	rb0, 140(pB0)
	#elif KB == 35
					swc1	rC00, -CMUL(16)(pC0)
	#endif
	madd.s	rC01, rC01, rE0, rB1
	#if KB == 35
					swc1	rC10, -CMUL(12)(pC0)
	#endif
	madd.s	rC11, rC11, rA1, rB1
	#if KB == 35
					swc1	rC20,