(* DIP Zero Dimensional Definition Module. *) DEFINITION MODULE DIPZ; FROM MASSTOR IMPORT LIST; PROCEDURE DIRMPG(IL,F: LIST): LIST; (*Distributive rational minimal polynomial for a groebner basis. F is a groebner basis. PP is the minimal polynomial for the i-th variable for F. *) END DIPZ.