mirror of
https://review.haiku-os.org/buildtools
synced 2025-02-07 14:34:51 +01:00
* these are dependencies for gcc 4 Graphite engine build. * CLooG 0.18.0 includes ISL 0.11.1 which is the backend that the build script enables. * PPL is needed by GCC build even if it isn't the chosen backend.
820 lines
18 KiB
C
820 lines
18 KiB
C
/* Generated from ../../../git/cloog/test/swim.cloog by CLooG 0.14.0-72-gefe2fc2 gmp bits in 0.70s. */
|
|
extern void hash(int);
|
|
|
|
/* Useful macros. */
|
|
#define floord(n,d) (((n)<0) ? -((-(n)+(d)-1)/(d)) : (n)/(d))
|
|
#define ceild(n,d) (((n)<0) ? -((-(n))/(d)) : ((n)+(d)-1)/(d))
|
|
#define max(x,y) ((x) > (y) ? (x) : (y))
|
|
#define min(x,y) ((x) < (y) ? (x) : (y))
|
|
|
|
#define S1() { hash(1); }
|
|
#define S2() { hash(2); }
|
|
#define S3() { hash(3); }
|
|
#define S4() { hash(4); }
|
|
#define S5() { hash(5); }
|
|
#define S6() { hash(6); }
|
|
#define S7() { hash(7); }
|
|
#define S8() { hash(8); }
|
|
#define S9() { hash(9); }
|
|
#define S10() { hash(10); }
|
|
#define S11() { hash(11); }
|
|
#define S12() { hash(12); }
|
|
#define S13() { hash(13); }
|
|
#define S14() { hash(14); }
|
|
#define S15() { hash(15); }
|
|
#define S16() { hash(16); }
|
|
#define S17() { hash(17); }
|
|
#define S18() { hash(18); }
|
|
#define S19() { hash(19); }
|
|
#define S20() { hash(20); }
|
|
#define S21() { hash(21); }
|
|
#define S22() { hash(22); }
|
|
#define S23() { hash(23); }
|
|
#define S24() { hash(24); }
|
|
#define S25() { hash(25); }
|
|
#define S26() { hash(26); }
|
|
#define S27() { hash(27); }
|
|
#define S28(i,j) { hash(28); hash(i); hash(j); }
|
|
#define S29(i,j) { hash(29); hash(i); hash(j); }
|
|
#define S30(i,j) { hash(30); hash(i); hash(j); }
|
|
#define S31(i) { hash(31); hash(i); }
|
|
#define S32() { hash(32); }
|
|
#define S33() { hash(33); }
|
|
#define S34() { hash(34); }
|
|
#define S35() { hash(35); }
|
|
#define S36() { hash(36); }
|
|
#define S37() { hash(37); }
|
|
#define S38(i) { hash(38); hash(i); }
|
|
#define S39(i) { hash(39); hash(i); }
|
|
#define S40(i,j,k) { hash(40); hash(i); hash(j); hash(k); }
|
|
#define S41(i,j,k) { hash(41); hash(i); hash(j); hash(k); }
|
|
#define S42(i,j,k) { hash(42); hash(i); hash(j); hash(k); }
|
|
#define S43(i,j,k) { hash(43); hash(i); hash(j); hash(k); }
|
|
#define S44(i,j) { hash(44); hash(i); hash(j); }
|
|
#define S45(i,j) { hash(45); hash(i); hash(j); }
|
|
#define S46(i,j) { hash(46); hash(i); hash(j); }
|
|
#define S47(i,j) { hash(47); hash(i); hash(j); }
|
|
#define S48(i,j) { hash(48); hash(i); hash(j); }
|
|
#define S49(i,j) { hash(49); hash(i); hash(j); }
|
|
#define S50(i,j) { hash(50); hash(i); hash(j); }
|
|
#define S51(i,j) { hash(51); hash(i); hash(j); }
|
|
#define S52(i) { hash(52); hash(i); }
|
|
#define S53(i) { hash(53); hash(i); }
|
|
#define S54(i) { hash(54); hash(i); }
|
|
#define S55(i) { hash(55); hash(i); }
|
|
#define S56(i) { hash(56); hash(i); }
|
|
#define S57(i) { hash(57); hash(i); }
|
|
#define S58(i) { hash(58); hash(i); }
|
|
#define S59(i,j,k) { hash(59); hash(i); hash(j); hash(k); }
|
|
#define S60(i,j,k) { hash(60); hash(i); hash(j); hash(k); }
|
|
#define S61(i,j,k) { hash(61); hash(i); hash(j); hash(k); }
|
|
#define S62(i,j) { hash(62); hash(i); hash(j); }
|
|
#define S63(i,j) { hash(63); hash(i); hash(j); }
|
|
#define S64(i,j) { hash(64); hash(i); hash(j); }
|
|
#define S65(i,j) { hash(65); hash(i); hash(j); }
|
|
#define S66(i,j) { hash(66); hash(i); hash(j); }
|
|
#define S67(i,j) { hash(67); hash(i); hash(j); }
|
|
#define S68(i) { hash(68); hash(i); }
|
|
#define S69(i) { hash(69); hash(i); }
|
|
#define S70(i) { hash(70); hash(i); }
|
|
#define S71(i) { hash(71); hash(i); }
|
|
#define S72(i) { hash(72); hash(i); }
|
|
#define S73(i) { hash(73); hash(i); }
|
|
#define S74(i) { hash(74); hash(i); }
|
|
#define S75(i) { hash(75); hash(i); }
|
|
#define S76(i) { hash(76); hash(i); }
|
|
#define S77(i) { hash(77); hash(i); }
|
|
#define S78(i) { hash(78); hash(i); }
|
|
#define S79(i) { hash(79); hash(i); }
|
|
#define S80(i) { hash(80); hash(i); }
|
|
#define S81(i) { hash(81); hash(i); }
|
|
#define S82(i) { hash(82); hash(i); }
|
|
#define S83(i) { hash(83); hash(i); }
|
|
#define S84(i) { hash(84); hash(i); }
|
|
#define S85(i) { hash(85); hash(i); }
|
|
#define S86(i) { hash(86); hash(i); }
|
|
#define S87(i) { hash(87); hash(i); }
|
|
#define S88(i) { hash(88); hash(i); }
|
|
#define S89(i) { hash(89); hash(i); }
|
|
#define S90(i) { hash(90); hash(i); }
|
|
#define S91(i) { hash(91); hash(i); }
|
|
#define S92(i) { hash(92); hash(i); }
|
|
#define S93(i) { hash(93); hash(i); }
|
|
#define S94(i) { hash(94); hash(i); }
|
|
#define S95(i,j,k) { hash(95); hash(i); hash(j); hash(k); }
|
|
#define S96(i,j,k) { hash(96); hash(i); hash(j); hash(k); }
|
|
#define S97(i,j,k) { hash(97); hash(i); hash(j); hash(k); }
|
|
#define S98(i,j) { hash(98); hash(i); hash(j); }
|
|
#define S99(i) { hash(99); hash(i); }
|
|
#define S100(i) { hash(100); hash(i); }
|
|
#define S101(i) { hash(101); hash(i); }
|
|
#define S102(i,j,k) { hash(102); hash(i); hash(j); hash(k); }
|
|
#define S103(i,j,k) { hash(103); hash(i); hash(j); hash(k); }
|
|
#define S104(i,j,k) { hash(104); hash(i); hash(j); hash(k); }
|
|
#define S105(i,j,k) { hash(105); hash(i); hash(j); hash(k); }
|
|
#define S106(i,j,k) { hash(106); hash(i); hash(j); hash(k); }
|
|
#define S107(i,j,k) { hash(107); hash(i); hash(j); hash(k); }
|
|
#define S108(i,j) { hash(108); hash(i); hash(j); }
|
|
#define S109(i,j) { hash(109); hash(i); hash(j); }
|
|
#define S110(i,j) { hash(110); hash(i); hash(j); }
|
|
#define S111(i,j) { hash(111); hash(i); hash(j); }
|
|
#define S112(i,j) { hash(112); hash(i); hash(j); }
|
|
#define S113(i,j) { hash(113); hash(i); hash(j); }
|
|
#define S114(i,j) { hash(114); hash(i); hash(j); }
|
|
#define S115(i,j) { hash(115); hash(i); hash(j); }
|
|
#define S116(i,j) { hash(116); hash(i); hash(j); }
|
|
#define S117(i,j) { hash(117); hash(i); hash(j); }
|
|
#define S118(i,j) { hash(118); hash(i); hash(j); }
|
|
#define S119(i,j) { hash(119); hash(i); hash(j); }
|
|
#define S120(i) { hash(120); hash(i); }
|
|
#define S121(i) { hash(121); hash(i); }
|
|
#define S122(i) { hash(122); hash(i); }
|
|
#define S123(i) { hash(123); hash(i); }
|
|
#define S124(i) { hash(124); hash(i); }
|
|
#define S125(i) { hash(125); hash(i); }
|
|
|
|
void test(int M, int N, int O, int P, int Q, int R)
|
|
{
|
|
/* Scattering iterators. */
|
|
int p1, p3, p5;
|
|
/* Original iterators. */
|
|
int i, j, k;
|
|
if (M == 1) {
|
|
S1() ;
|
|
S2() ;
|
|
S3() ;
|
|
S4() ;
|
|
S5() ;
|
|
S6() ;
|
|
S7() ;
|
|
S8() ;
|
|
S9() ;
|
|
S10() ;
|
|
S11() ;
|
|
S12() ;
|
|
S13() ;
|
|
S14() ;
|
|
S15() ;
|
|
S16() ;
|
|
S17() ;
|
|
S18() ;
|
|
S19() ;
|
|
S20() ;
|
|
S21() ;
|
|
S22() ;
|
|
S23() ;
|
|
S24() ;
|
|
S25() ;
|
|
S26() ;
|
|
S27() ;
|
|
}
|
|
if (M == 1) {
|
|
for (p1=1;p1<=N;p1++) {
|
|
for (p3=1;p3<=N;p3++) {
|
|
S28(p1,p3) ;
|
|
S29(p1,p3) ;
|
|
S30(p1,p3) ;
|
|
}
|
|
S31(p1) ;
|
|
}
|
|
}
|
|
if (M == 1) {
|
|
S32() ;
|
|
S33() ;
|
|
S34() ;
|
|
}
|
|
if ((M == 1) && (O <= 1)) {
|
|
S35() ;
|
|
}
|
|
if (M == 1) {
|
|
S36() ;
|
|
S37() ;
|
|
}
|
|
if ((M == 1) && (N >= 1) && (Q >= 1) && (R >= 1)) {
|
|
for (p1=2;p1<=P;p1++) {
|
|
S38(p1) ;
|
|
S39(p1) ;
|
|
for (p3=1;p3<=Q;p3++) {
|
|
for (p5=1;p5<=R;p5++) {
|
|
S40(p1,p3,p5) ;
|
|
S41(p1,p3,p5) ;
|
|
S42(p1,p3,p5) ;
|
|
S43(p1,p3,p5) ;
|
|
}
|
|
}
|
|
for (p3=1;p3<=Q;p3++) {
|
|
S44(p1,p3) ;
|
|
S45(p1,p3) ;
|
|
S46(p1,p3) ;
|
|
S47(p1,p3) ;
|
|
}
|
|
for (p3=1;p3<=R;p3++) {
|
|
S48(p1,p3) ;
|
|
S49(p1,p3) ;
|
|
S50(p1,p3) ;
|
|
S51(p1,p3) ;
|
|
}
|
|
S52(p1) ;
|
|
S53(p1) ;
|
|
S54(p1) ;
|
|
S55(p1) ;
|
|
S56(p1) ;
|
|
S57(p1) ;
|
|
S58(p1) ;
|
|
for (p3=1;p3<=Q;p3++) {
|
|
for (p5=1;p5<=R;p5++) {
|
|
S59(p1,p3,p5) ;
|
|
S60(p1,p3,p5) ;
|
|
S61(p1,p3,p5) ;
|
|
}
|
|
}
|
|
for (p3=1;p3<=Q;p3++) {
|
|
S62(p1,p3) ;
|
|
S63(p1,p3) ;
|
|
S64(p1,p3) ;
|
|
}
|
|
for (p3=1;p3<=R;p3++) {
|
|
S65(p1,p3) ;
|
|
S66(p1,p3) ;
|
|
S67(p1,p3) ;
|
|
}
|
|
S68(p1) ;
|
|
S69(p1) ;
|
|
S70(p1) ;
|
|
S71(p1) ;
|
|
S72(p1) ;
|
|
S73(p1) ;
|
|
S74(p1) ;
|
|
S75(p1) ;
|
|
S76(p1) ;
|
|
S77(p1) ;
|
|
S78(p1) ;
|
|
S79(p1) ;
|
|
S80(p1) ;
|
|
S81(p1) ;
|
|
S82(p1) ;
|
|
S83(p1) ;
|
|
S84(p1) ;
|
|
S85(p1) ;
|
|
S86(p1) ;
|
|
S87(p1) ;
|
|
S88(p1) ;
|
|
S89(p1) ;
|
|
S90(p1) ;
|
|
S91(p1) ;
|
|
S92(p1) ;
|
|
S93(p1) ;
|
|
S94(p1) ;
|
|
for (p3=1;p3<=N;p3++) {
|
|
for (p5=1;p5<=N;p5++) {
|
|
S95(p1,p3,p5) ;
|
|
S96(p1,p3,p5) ;
|
|
S97(p1,p3,p5) ;
|
|
}
|
|
S98(p1,p3) ;
|
|
}
|
|
S99(p1) ;
|
|
S100(p1) ;
|
|
S101(p1) ;
|
|
for (p3=1;p3<=Q;p3++) {
|
|
for (p5=1;p5<=R;p5++) {
|
|
S102(p1,p3,p5) ;
|
|
S103(p1,p3,p5) ;
|
|
S104(p1,p3,p5) ;
|
|
S105(p1,p3,p5) ;
|
|
S106(p1,p3,p5) ;
|
|
S107(p1,p3,p5) ;
|
|
}
|
|
}
|
|
for (p3=1;p3<=Q;p3++) {
|
|
S108(p1,p3) ;
|
|
S109(p1,p3) ;
|
|
S110(p1,p3) ;
|
|
S111(p1,p3) ;
|
|
S112(p1,p3) ;
|
|
S113(p1,p3) ;
|
|
}
|
|
for (p3=1;p3<=R;p3++) {
|
|
S114(p1,p3) ;
|
|
S115(p1,p3) ;
|
|
S116(p1,p3) ;
|
|
S117(p1,p3) ;
|
|
S118(p1,p3) ;
|
|
S119(p1,p3) ;
|
|
}
|
|
S120(p1) ;
|
|
S121(p1) ;
|
|
S122(p1) ;
|
|
S123(p1) ;
|
|
S124(p1) ;
|
|
S125(p1) ;
|
|
}
|
|
}
|
|
if ((M == 1) && (N <= 0) && (Q >= 1) && (R >= 1)) {
|
|
for (p1=2;p1<=P;p1++) {
|
|
S38(p1) ;
|
|
S39(p1) ;
|
|
for (p3=1;p3<=Q;p3++) {
|
|
for (p5=1;p5<=R;p5++) {
|
|
S40(p1,p3,p5) ;
|
|
S41(p1,p3,p5) ;
|
|
S42(p1,p3,p5) ;
|
|
S43(p1,p3,p5) ;
|
|
}
|
|
}
|
|
for (p3=1;p3<=Q;p3++) {
|
|
S44(p1,p3) ;
|
|
S45(p1,p3) ;
|
|
S46(p1,p3) ;
|
|
S47(p1,p3) ;
|
|
}
|
|
for (p3=1;p3<=R;p3++) {
|
|
S48(p1,p3) ;
|
|
S49(p1,p3) ;
|
|
S50(p1,p3) ;
|
|
S51(p1,p3) ;
|
|
}
|
|
S52(p1) ;
|
|
S53(p1) ;
|
|
S54(p1) ;
|
|
S55(p1) ;
|
|
S56(p1) ;
|
|
S57(p1) ;
|
|
S58(p1) ;
|
|
for (p3=1;p3<=Q;p3++) {
|
|
for (p5=1;p5<=R;p5++) {
|
|
S59(p1,p3,p5) ;
|
|
S60(p1,p3,p5) ;
|
|
S61(p1,p3,p5) ;
|
|
}
|
|
}
|
|
for (p3=1;p3<=Q;p3++) {
|
|
S62(p1,p3) ;
|
|
S63(p1,p3) ;
|
|
S64(p1,p3) ;
|
|
}
|
|
for (p3=1;p3<=R;p3++) {
|
|
S65(p1,p3) ;
|
|
S66(p1,p3) ;
|
|
S67(p1,p3) ;
|
|
}
|
|
S68(p1) ;
|
|
S69(p1) ;
|
|
S70(p1) ;
|
|
S71(p1) ;
|
|
S72(p1) ;
|
|
S73(p1) ;
|
|
S74(p1) ;
|
|
S75(p1) ;
|
|
S76(p1) ;
|
|
S77(p1) ;
|
|
S78(p1) ;
|
|
S79(p1) ;
|
|
S80(p1) ;
|
|
S81(p1) ;
|
|
S82(p1) ;
|
|
S83(p1) ;
|
|
S84(p1) ;
|
|
S85(p1) ;
|
|
S86(p1) ;
|
|
S87(p1) ;
|
|
S88(p1) ;
|
|
S89(p1) ;
|
|
S90(p1) ;
|
|
S91(p1) ;
|
|
S92(p1) ;
|
|
S93(p1) ;
|
|
S94(p1) ;
|
|
S99(p1) ;
|
|
S100(p1) ;
|
|
S101(p1) ;
|
|
for (p3=1;p3<=Q;p3++) {
|
|
for (p5=1;p5<=R;p5++) {
|
|
S102(p1,p3,p5) ;
|
|
S103(p1,p3,p5) ;
|
|
S104(p1,p3,p5) ;
|
|
S105(p1,p3,p5) ;
|
|
S106(p1,p3,p5) ;
|
|
S107(p1,p3,p5) ;
|
|
}
|
|
}
|
|
for (p3=1;p3<=Q;p3++) {
|
|
S108(p1,p3) ;
|
|
S109(p1,p3) ;
|
|
S110(p1,p3) ;
|
|
S111(p1,p3) ;
|
|
S112(p1,p3) ;
|
|
S113(p1,p3) ;
|
|
}
|
|
for (p3=1;p3<=R;p3++) {
|
|
S114(p1,p3) ;
|
|
S115(p1,p3) ;
|
|
S116(p1,p3) ;
|
|
S117(p1,p3) ;
|
|
S118(p1,p3) ;
|
|
S119(p1,p3) ;
|
|
}
|
|
S120(p1) ;
|
|
S121(p1) ;
|
|
S122(p1) ;
|
|
S123(p1) ;
|
|
S124(p1) ;
|
|
S125(p1) ;
|
|
}
|
|
}
|
|
if ((M == 1) && (N >= 1) && (Q <= 0) && (R >= 1)) {
|
|
for (p1=2;p1<=P;p1++) {
|
|
S38(p1) ;
|
|
S39(p1) ;
|
|
for (p3=1;p3<=R;p3++) {
|
|
S48(p1,p3) ;
|
|
S49(p1,p3) ;
|
|
S50(p1,p3) ;
|
|
S51(p1,p3) ;
|
|
}
|
|
S52(p1) ;
|
|
S53(p1) ;
|
|
S54(p1) ;
|
|
S55(p1) ;
|
|
S56(p1) ;
|
|
S57(p1) ;
|
|
S58(p1) ;
|
|
for (p3=1;p3<=R;p3++) {
|
|
S65(p1,p3) ;
|
|
S66(p1,p3) ;
|
|
S67(p1,p3) ;
|
|
}
|
|
S68(p1) ;
|
|
S69(p1) ;
|
|
S70(p1) ;
|
|
S71(p1) ;
|
|
S72(p1) ;
|
|
S73(p1) ;
|
|
S74(p1) ;
|
|
S75(p1) ;
|
|
S76(p1) ;
|
|
S77(p1) ;
|
|
S78(p1) ;
|
|
S79(p1) ;
|
|
S80(p1) ;
|
|
S81(p1) ;
|
|
S82(p1) ;
|
|
S83(p1) ;
|
|
S84(p1) ;
|
|
S85(p1) ;
|
|
S86(p1) ;
|
|
S87(p1) ;
|
|
S88(p1) ;
|
|
S89(p1) ;
|
|
S90(p1) ;
|
|
S91(p1) ;
|
|
S92(p1) ;
|
|
S93(p1) ;
|
|
S94(p1) ;
|
|
for (p3=1;p3<=N;p3++) {
|
|
for (p5=1;p5<=N;p5++) {
|
|
S95(p1,p3,p5) ;
|
|
S96(p1,p3,p5) ;
|
|
S97(p1,p3,p5) ;
|
|
}
|
|
S98(p1,p3) ;
|
|
}
|
|
S99(p1) ;
|
|
S100(p1) ;
|
|
S101(p1) ;
|
|
for (p3=1;p3<=R;p3++) {
|
|
S114(p1,p3) ;
|
|
S115(p1,p3) ;
|
|
S116(p1,p3) ;
|
|
S117(p1,p3) ;
|
|
S118(p1,p3) ;
|
|
S119(p1,p3) ;
|
|
}
|
|
S120(p1) ;
|
|
S121(p1) ;
|
|
S122(p1) ;
|
|
S123(p1) ;
|
|
S124(p1) ;
|
|
S125(p1) ;
|
|
}
|
|
}
|
|
if ((M == 1) && (N <= 0) && (Q <= 0) && (R >= 1)) {
|
|
for (p1=2;p1<=P;p1++) {
|
|
S38(p1) ;
|
|
S39(p1) ;
|
|
for (p3=1;p3<=R;p3++) {
|
|
S48(p1,p3) ;
|
|
S49(p1,p3) ;
|
|
S50(p1,p3) ;
|
|
S51(p1,p3) ;
|
|
}
|
|
S52(p1) ;
|
|
S53(p1) ;
|
|
S54(p1) ;
|
|
S55(p1) ;
|
|
S56(p1) ;
|
|
S57(p1) ;
|
|
S58(p1) ;
|
|
for (p3=1;p3<=R;p3++) {
|
|
S65(p1,p3) ;
|
|
S66(p1,p3) ;
|
|
S67(p1,p3) ;
|
|
}
|
|
S68(p1) ;
|
|
S69(p1) ;
|
|
S70(p1) ;
|
|
S71(p1) ;
|
|
S72(p1) ;
|
|
S73(p1) ;
|
|
S74(p1) ;
|
|
S75(p1) ;
|
|
S76(p1) ;
|
|
S77(p1) ;
|
|
S78(p1) ;
|
|
S79(p1) ;
|
|
S80(p1) ;
|
|
S81(p1) ;
|
|
S82(p1) ;
|
|
S83(p1) ;
|
|
S84(p1) ;
|
|
S85(p1) ;
|
|
S86(p1) ;
|
|
S87(p1) ;
|
|
S88(p1) ;
|
|
S89(p1) ;
|
|
S90(p1) ;
|
|
S91(p1) ;
|
|
S92(p1) ;
|
|
S93(p1) ;
|
|
S94(p1) ;
|
|
S99(p1) ;
|
|
S100(p1) ;
|
|
S101(p1) ;
|
|
for (p3=1;p3<=R;p3++) {
|
|
S114(p1,p3) ;
|
|
S115(p1,p3) ;
|
|
S116(p1,p3) ;
|
|
S117(p1,p3) ;
|
|
S118(p1,p3) ;
|
|
S119(p1,p3) ;
|
|
}
|
|
S120(p1) ;
|
|
S121(p1) ;
|
|
S122(p1) ;
|
|
S123(p1) ;
|
|
S124(p1) ;
|
|
S125(p1) ;
|
|
}
|
|
}
|
|
if ((M == 1) && (N >= 1) && (Q <= 0) && (R <= 0)) {
|
|
for (p1=2;p1<=P;p1++) {
|
|
S38(p1) ;
|
|
S39(p1) ;
|
|
S52(p1) ;
|
|
S53(p1) ;
|
|
S54(p1) ;
|
|
S55(p1) ;
|
|
S56(p1) ;
|
|
S57(p1) ;
|
|
S58(p1) ;
|
|
S68(p1) ;
|
|
S69(p1) ;
|
|
S70(p1) ;
|
|
S71(p1) ;
|
|
S72(p1) ;
|
|
S73(p1) ;
|
|
S74(p1) ;
|
|
S75(p1) ;
|
|
S76(p1) ;
|
|
S77(p1) ;
|
|
S78(p1) ;
|
|
S79(p1) ;
|
|
S80(p1) ;
|
|
S81(p1) ;
|
|
S82(p1) ;
|
|
S83(p1) ;
|
|
S84(p1) ;
|
|
S85(p1) ;
|
|
S86(p1) ;
|
|
S87(p1) ;
|
|
S88(p1) ;
|
|
S89(p1) ;
|
|
S90(p1) ;
|
|
S91(p1) ;
|
|
S92(p1) ;
|
|
S93(p1) ;
|
|
S94(p1) ;
|
|
for (p3=1;p3<=N;p3++) {
|
|
for (p5=1;p5<=N;p5++) {
|
|
S95(p1,p3,p5) ;
|
|
S96(p1,p3,p5) ;
|
|
S97(p1,p3,p5) ;
|
|
}
|
|
S98(p1,p3) ;
|
|
}
|
|
S99(p1) ;
|
|
S100(p1) ;
|
|
S101(p1) ;
|
|
S120(p1) ;
|
|
S121(p1) ;
|
|
S122(p1) ;
|
|
S123(p1) ;
|
|
S124(p1) ;
|
|
S125(p1) ;
|
|
}
|
|
}
|
|
if ((M == 1) && (N <= 0) && (Q <= 0) && (R <= 0)) {
|
|
for (p1=2;p1<=P;p1++) {
|
|
S38(p1) ;
|
|
S39(p1) ;
|
|
S52(p1) ;
|
|
S53(p1) ;
|
|
S54(p1) ;
|
|
S55(p1) ;
|
|
S56(p1) ;
|
|
S57(p1) ;
|
|
S58(p1) ;
|
|
S68(p1) ;
|
|
S69(p1) ;
|
|
S70(p1) ;
|
|
S71(p1) ;
|
|
S72(p1) ;
|
|
S73(p1) ;
|
|
S74(p1) ;
|
|
S75(p1) ;
|
|
S76(p1) ;
|
|
S77(p1) ;
|
|
S78(p1) ;
|
|
S79(p1) ;
|
|
S80(p1) ;
|
|
S81(p1) ;
|
|
S82(p1) ;
|
|
S83(p1) ;
|
|
S84(p1) ;
|
|
S85(p1) ;
|
|
S86(p1) ;
|
|
S87(p1) ;
|
|
S88(p1) ;
|
|
S89(p1) ;
|
|
S90(p1) ;
|
|
S91(p1) ;
|
|
S92(p1) ;
|
|
S93(p1) ;
|
|
S94(p1) ;
|
|
S99(p1) ;
|
|
S100(p1) ;
|
|
S101(p1) ;
|
|
S120(p1) ;
|
|
S121(p1) ;
|
|
S122(p1) ;
|
|
S123(p1) ;
|
|
S124(p1) ;
|
|
S125(p1) ;
|
|
}
|
|
}
|
|
if ((M == 1) && (N >= 1) && (Q >= 1) && (R <= 0)) {
|
|
for (p1=2;p1<=P;p1++) {
|
|
S38(p1) ;
|
|
S39(p1) ;
|
|
for (p3=1;p3<=Q;p3++) {
|
|
S44(p1,p3) ;
|
|
S45(p1,p3) ;
|
|
S46(p1,p3) ;
|
|
S47(p1,p3) ;
|
|
}
|
|
S52(p1) ;
|
|
S53(p1) ;
|
|
S54(p1) ;
|
|
S55(p1) ;
|
|
S56(p1) ;
|
|
S57(p1) ;
|
|
S58(p1) ;
|
|
for (p3=1;p3<=Q;p3++) {
|
|
S62(p1,p3) ;
|
|
S63(p1,p3) ;
|
|
S64(p1,p3) ;
|
|
}
|
|
S68(p1) ;
|
|
S69(p1) ;
|
|
S70(p1) ;
|
|
S71(p1) ;
|
|
S72(p1) ;
|
|
S73(p1) ;
|
|
S74(p1) ;
|
|
S75(p1) ;
|
|
S76(p1) ;
|
|
S77(p1) ;
|
|
S78(p1) ;
|
|
S79(p1) ;
|
|
S80(p1) ;
|
|
S81(p1) ;
|
|
S82(p1) ;
|
|
S83(p1) ;
|
|
S84(p1) ;
|
|
S85(p1) ;
|
|
S86(p1) ;
|
|
S87(p1) ;
|
|
S88(p1) ;
|
|
S89(p1) ;
|
|
S90(p1) ;
|
|
S91(p1) ;
|
|
S92(p1) ;
|
|
S93(p1) ;
|
|
S94(p1) ;
|
|
for (p3=1;p3<=N;p3++) {
|
|
for (p5=1;p5<=N;p5++) {
|
|
S95(p1,p3,p5) ;
|
|
S96(p1,p3,p5) ;
|
|
S97(p1,p3,p5) ;
|
|
}
|
|
S98(p1,p3) ;
|
|
}
|
|
S99(p1) ;
|
|
S100(p1) ;
|
|
S101(p1) ;
|
|
for (p3=1;p3<=Q;p3++) {
|
|
S108(p1,p3) ;
|
|
S109(p1,p3) ;
|
|
S110(p1,p3) ;
|
|
S111(p1,p3) ;
|
|
S112(p1,p3) ;
|
|
S113(p1,p3) ;
|
|
}
|
|
S120(p1) ;
|
|
S121(p1) ;
|
|
S122(p1) ;
|
|
S123(p1) ;
|
|
S124(p1) ;
|
|
S125(p1) ;
|
|
}
|
|
}
|
|
if ((M == 1) && (N <= 0) && (Q >= 1) && (R <= 0)) {
|
|
for (p1=2;p1<=P;p1++) {
|
|
S38(p1) ;
|
|
S39(p1) ;
|
|
for (p3=1;p3<=Q;p3++) {
|
|
S44(p1,p3) ;
|
|
S45(p1,p3) ;
|
|
S46(p1,p3) ;
|
|
S47(p1,p3) ;
|
|
}
|
|
S52(p1) ;
|
|
S53(p1) ;
|
|
S54(p1) ;
|
|
S55(p1) ;
|
|
S56(p1) ;
|
|
S57(p1) ;
|
|
S58(p1) ;
|
|
for (p3=1;p3<=Q;p3++) {
|
|
S62(p1,p3) ;
|
|
S63(p1,p3) ;
|
|
S64(p1,p3) ;
|
|
}
|
|
S68(p1) ;
|
|
S69(p1) ;
|
|
S70(p1) ;
|
|
S71(p1) ;
|
|
S72(p1) ;
|
|
S73(p1) ;
|
|
S74(p1) ;
|
|
S75(p1) ;
|
|
S76(p1) ;
|
|
S77(p1) ;
|
|
S78(p1) ;
|
|
S79(p1) ;
|
|
S80(p1) ;
|
|
S81(p1) ;
|
|
S82(p1) ;
|
|
S83(p1) ;
|
|
S84(p1) ;
|
|
S85(p1) ;
|
|
S86(p1) ;
|
|
S87(p1) ;
|
|
S88(p1) ;
|
|
S89(p1) ;
|
|
S90(p1) ;
|
|
S91(p1) ;
|
|
S92(p1) ;
|
|
S93(p1) ;
|
|
S94(p1) ;
|
|
S99(p1) ;
|
|
S100(p1) ;
|
|
S101(p1) ;
|
|
for (p3=1;p3<=Q;p3++) {
|
|
S108(p1,p3) ;
|
|
S109(p1,p3) ;
|
|
S110(p1,p3) ;
|
|
S111(p1,p3) ;
|
|
S112(p1,p3) ;
|
|
S113(p1,p3) ;
|
|
}
|
|
S120(p1) ;
|
|
S121(p1) ;
|
|
S122(p1) ;
|
|
S123(p1) ;
|
|
S124(p1) ;
|
|
S125(p1) ;
|
|
}
|
|
}
|
|
}
|