gitweb on Svarog

projekti pod git sistemom za održavanje verzija -- projects under the git version control system
PolinomL - formatiranje u novoj proceduri
authorDoni Pracner <quinnuendo@gmail.com>
Thu, 6 Feb 2014 15:21:13 +0000 (16:21 +0100)
committerDoni Pracner <quinnuendo@gmail.com>
Thu, 6 Feb 2014 15:21:13 +0000 (16:21 +0100)
kodovi/polinomi/POLINOML.MOD

index 3781d25664f057c190e2699dc176df7856ef8dcc..6063d5dd74e2db701fb8bb6f9357b94339332e1b 100644 (file)
@@ -83,23 +83,23 @@ BEGIN
     prethodni := cilj;\r
     cilj := cilj^.veza;\r
   END;\r
-  IF (cilj = NIL) THEN\r
+  IF cilj = NIL THEN\r
     IF k#0.0 THEN\r
       NEW(cilj);\r
       cilj^.k := k;\r
       cilj^.st := st;\r
       cilj^.veza := NIL;\r
-      IF (p = NIL) THEN\r
+      IF p = NIL THEN\r
        p := cilj;\r
       ELSE\r
        prethodni^.veza := cilj;\r
       END;\r
     END;\r
   ELSIF cilj^.st=st THEN\r
-    IF k#0.0 THEN\r
+    IF k # 0.0 THEN\r
       cilj^.k:=k;\r
     ELSE\r
-      IF (p=cilj) THEN\r
+      IF p = cilj THEN\r
        DISPOSE(p);\r
       ELSE\r
        prethodni^.veza:= prethodni^.veza^.veza;\r
@@ -107,7 +107,7 @@ BEGIN
       END;\r
     END;\r
   ELSE\r
-    IF k#0.0 THEN\r
+    IF k # 0.0 THEN\r
       NEW(cilj);\r
       cilj^.k := k;\r
       cilj^.st := st;\r
Svarog.pmf.uns.ac.rs/gitweb maintanance Doni Pracner