ExpVextor(d_p) = ExpVector(s_p)
| 1325 | } |
| 1326 | // ExpVextor(d_p) = ExpVector(s_p) |
| 1327 | static inline void p_ExpVectorCopy(poly d_p, poly s_p, const ring r) |
| 1328 | { |
| 1329 | p_LmCheckPolyRing1(d_p, r); |
| 1330 | p_LmCheckPolyRing1(s_p, r); |
| 1331 | memcpy(d_p->exp, s_p->exp, r->ExpL_Size*sizeof(long)); |
| 1332 | } |
| 1333 | |
| 1334 | static inline poly p_Init(const ring r, omBin bin) |
| 1335 | { |