or NULL general stuff
| 71 | // or NULL |
| 72 | // general stuff |
| 73 | static number EltMult(number a, number b, const coeffs r) |
| 74 | { |
| 75 | nforder *O = (nforder*) (r->data); |
| 76 | bigintmat *c = new bigintmat((bigintmat*)a); |
| 77 | O->elMult(c, (bigintmat*) b); |
| 78 | return (number) c; |
| 79 | } |
| 80 | static number EltSub(number a, number b, const coeffs r) |
| 81 | { |
| 82 | nforder *O = (nforder*) (r->data); |