3586{
3588 ring orig_ring = r;
3589 int pos;
3591 ideal s_h;
3592 if(orig_ring != new_ring)
3593 {
3596
3597
3598
3599
3600
3601
3602
3603
3604
3605
3606 }
3607 else
3608 {
3609 s_h =
id_Copy (arg_I, orig_ring);
3610 }
3612
3613 ideal s_result =
do_t_rep_gb (new_ring, s_h, syz_comp, F4_mode, pos);
3615 if(orig_ring != new_ring)
3616 {
3620
3622
3624
3625 }
3626 else
3630}
ideal id_Copy(ideal h1, const ring r)
copy an ideal
void rChangeCurrRing(ring r)
VAR ring currRing
Widely used global variable which specifies the current polynomial ring for Singular interpreter and ...
ideal idrMoveR_NoSort(ideal &id, ring src_r, ring dest_r)
ideal idrCopyR_NoSort(ideal id, ring src_r, ring dest_r)
ring rAssure_TDeg(ring r, int &pos)
void rDelete(ring r)
unconditionally deletes fields in r
ideal do_t_rep_gb(ring, ideal arg_I, int syz_comp, BOOLEAN F4_mode, int deg_pos)