 a routin find solut simultan linear equat polynomi coeffici 