X-Git-Url: http://svarog.pmf.uns.ac.rs/gitweb/?p=spa2-teorijske-vezbe.git;a=blobdiff_plain;f=Cas01%2FRECNIKAT.DEF;fp=Cas01%2FRECNIKAT.DEF;h=0000000000000000000000000000000000000000;hp=92a237ae9fff8ae228d7c6a5e2b2ac6a0cf0bff6;hb=c3663b0b48c5d562615e606e6a1cc3f7fe4d43c8;hpb=cfda726ac9ecd0bd02935512ea0edaee2cd31b57

diff --git a/Cas01/RECNIKAT.DEF b/Cas01/RECNIKAT.DEF
deleted file mode 100644
index 92a237a..0000000
--- a/Cas01/RECNIKAT.DEF
+++ /dev/null
@@ -1,42 +0,0 @@
-DEFINITION MODULE RecnikATP;
-
-  CONST
-    Broj = 11; (* Neki prost broj *)
-    MaxDuzRec = 50;
-    MaxTabela = Broj - 1;
-
-  TYPE
-    String = ARRAY [1 .. MaxDuzRec] OF CHAR;
-    Lista = POINTER TO Element;
-    Element = RECORD
-                Veza, Prevod: Lista;
-                Rec: String;
-            END;
-    Indeksi = [0 .. MaxTabela];
-    Tabela = ARRAY Indeksi OF Lista;
-    Recnik = RECORD
-               BrojReci: CARDINAL;
-               Domace, Strane: Tabela;
-             END;
-
-  PROCEDURE Inicijalizuj(VAR R: Recnik);
-  PROCEDURE Unisti(VAR R: Recnik);
-
-  PROCEDURE Ubaci(DomacaRec, StranaRec: String;
-                  VAR R: Recnik;
-                  VAR Duplikat: BOOLEAN);
-
-  PROCEDURE Izbaci(Rec: String;
-                   VAR R: Recnik;
-                   Domaca: BOOLEAN;
-                   VAR Ok: BOOLEAN);
-
-  PROCEDURE Prevedi(StranaNaDomacu: BOOLEAN;
-                    Rec: String;
-                    VAR Prevod: String;
-                    VAR R: Recnik;
-                    VAR Ok: BOOLEAN);
-
-  PROCEDURE Sadrzaj(VAR R: Recnik);
-
-END RecnikATP.