X-Git-Url: http://svarog.pmf.uns.ac.rs/gitweb/?a=blobdiff_plain;ds=sidebyside;f=kodovi%2Fpolinomi%2FPOLINOML.DEF;h=a88e55b9d937516f93ea9ab76caea25a397f12eb;hb=bf039344cdd8d67a049f821bd68a6edc74504126;hp=5b50bc19d235da77f7d02b03e49e2ac8a65e86d1;hpb=53bb5a4bae8d6b444244829b6343a4c98a62958f;p=spa1skripta-public.git diff --git a/kodovi/polinomi/POLINOML.DEF b/kodovi/polinomi/POLINOML.DEF index 5b50bc1..a88e55b 100644 --- a/kodovi/polinomi/POLINOML.DEF +++ b/kodovi/polinomi/POLINOML.DEF @@ -1,5 +1,5 @@ (* Modul za rad sa polinomima preko listi - verzija 2012, rev 1 *) + verzija 2014 *) DEFINITION MODULE PolinomL; TYPE Polinom = POINTER TO Monom; @@ -14,6 +14,8 @@ PROCEDURE Unos(VAR p: Polinom); PROCEDURE Stampaj(p: Polinom; d: CARDINAL); PROCEDURE Kopiraj(p: Polinom; VAR kopija: Polinom); +PROCEDURE PostaviClan(k: REAL; st:CARDINAL; + VAR p:Polinom); PROCEDURE UbaciMonom(mon:Polinom; VAR p: Polinom); PROCEDURE PromeniZnak(VAR p: Polinom);