(*^ ::[ frontEndVersion = "Microsoft Windows Mathematica Notebook Front End Version 2.2"; microsoftWindowsStandardFontEncoding; fontset = title, "Times New Roman", 24, L0, center, nohscroll, bold; fontset = subtitle, "Times New Roman", 18, L0, center, nohscroll, bold; fontset = subsubtitle, "Times New Roman", 14, L0, center, nohscroll, bold; fontset = section, "Times New Roman", 14, L0, bold, grayBox; fontset = subsection, "Times New Roman", 12, L0, bold, blackBox; fontset = subsubsection, "Times New Roman", 10, L0, bold, whiteBox; fontset = text, "Times New Roman", 12, L0; fontset = smalltext, "Times New Roman", 10, L0; fontset = input, "Courier New", 8, L0, nowordwrap, bold; fontset = output, "Courier New", 8, L0, nowordwrap; fontset = message, "Courier New", 8, L0, nowordwrap, R65535; fontset = print, "Courier New", 8, L0, nowordwrap, R32896, B32896; fontset = info, "Courier New", 10, L0, nowordwrap; fontset = postscript, "Courier New", 8, L0, nowordwrap; fontset = name, "Times New Roman", 10, L0, nohscroll, italic, B65535; fontset = header, "Times New Roman", 10, L0, right, nohscroll; fontset = footer, "Times New Roman", 10, L0, right, nohscroll; fontset = help, "Times New Roman", 10, L0, nohscroll; fontset = clipboard, "Times New Roman", 12, L0, nohscroll; fontset = completions, "Times New Roman", 12, L0, nowordwrap, nohscroll; fontset = graphics, "Courier New", 10, L0, nowordwrap, nohscroll; fontset = special1, "Times New Roman", 12, L0, nowordwrap, nohscroll; fontset = special2, "Times New Roman", 12, L0, center, nowordwrap, nohscroll; fontset = special3, "Times New Roman", 12, L0, right, nowordwrap, nohscroll; fontset = special4, "Times New Roman", 12, L0, nowordwrap, nohscroll; fontset = special5, "Times New Roman", 12, L0, nowordwrap, nohscroll; fontset = leftheader, "Times New Roman", 12, L0, nowordwrap, nohscroll; fontset = leftfooter, "Times New Roman", 12, L0, nowordwrap, nohscroll; fontset = reserved1, "Courier New", 10, L0, nowordwrap, nohscroll;] :[font = title; inactive; startGroup; startGroup; nohscroll; center; ] Coefficients Functions :[font = subtitle; inactive; nohscroll; center; ] With the Coefficients.m package :[font = subsubtitle; inactive; endGroup; nohscroll; center; ] Roberto Colistete Júnior 11/95 :[font = section; inactive; startGroup; ] Commands :[font = text; inactive; startGroup; Cclosed; ] The Coefficients.m package provides some additional functions to deal with coefficients of low order multivariable polynomials, without any "dominant variable" : :[font = input; nowordwrap; ] <