Reorganizacija strukture foldera.

[spa2-teorijske-vezbe.git] / 01. Dvosmerni Recnik / XDS / RECNIKATP.DEF

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