| 933 | //} |
| 934 | |
| 935 | static resolvente iiCopyRes(resolvente r, int l) |
| 936 | { |
| 937 | int i; |
| 938 | resolvente res=(ideal *)omAlloc0((l+1)*sizeof(ideal)); |
| 939 | |
| 940 | for (i=0; i<l; i++) |
| 941 | if (r[i]!=NULL) res[i]=idCopy(r[i]); |
| 942 | return res; |
| 943 | } |
| 944 | |
| 945 | BOOLEAN jjMINRES(leftv res, leftv v) |
| 946 | { |