From: Doni Pracner <quinnuendo@gmail.com>
Date: Thu, 6 Feb 2014 15:21:13 +0000 (+0100)
Subject: PolinomL - formatiranje u novoj proceduri
X-Git-Tag: v14a~8^2~22
X-Git-Url: http://svarog.pmf.uns.ac.rs/gitweb/?a=commitdiff_plain;ds=inline;h=ecd8664d575d7606d6f1a3739e67b9d884b6a572;p=spa1skripta-public.git

PolinomL - formatiranje u novoj proceduri
---

diff --git a/kodovi/polinomi/POLINOML.MOD b/kodovi/polinomi/POLINOML.MOD
index 3781d25..6063d5d 100644
--- a/kodovi/polinomi/POLINOML.MOD
+++ b/kodovi/polinomi/POLINOML.MOD
@@ -83,23 +83,23 @@ BEGIN
     prethodni := cilj;
     cilj := cilj^.veza;
   END;
-  IF (cilj = NIL) THEN
+  IF cilj = NIL THEN
     IF k#0.0 THEN
       NEW(cilj);
       cilj^.k := k;
       cilj^.st := st;
       cilj^.veza := NIL;
-      IF (p = NIL) THEN
+      IF p = NIL THEN
 	p := cilj;
       ELSE
 	prethodni^.veza := cilj;
       END;
     END;
   ELSIF cilj^.st=st THEN
-    IF k#0.0 THEN
+    IF k # 0.0 THEN
       cilj^.k:=k;
     ELSE
-      IF (p=cilj) THEN
+      IF p = cilj THEN
 	DISPOSE(p);
       ELSE
 	prethodni^.veza:= prethodni^.veza^.veza;
@@ -107,7 +107,7 @@ BEGIN
       END;
     END;
   ELSE
-    IF k#0.0 THEN
+    IF k # 0.0 THEN
       NEW(cilj);
       cilj^.k := k;
       cilj^.st := st;