/*
Adott a magyar-angol szavak szótára. Keressünk benne.
(több-több értelmű leképezés)
Vigyázat! A program még nem működik, Önnek kell megírni a hiányzó részeket.


Gondolja végig, hogy 
a/ hogyan lehet kigyűjteni egy szó összes megfelelőjét (több jó lehetőség is van)
b/ miben térnek el egymástól ezek a lehetőségek?
c/ melyik esetben mit kell csinálni, ha a keresett szónak nincs megfelelő párja? Hogyan lehet kezelni ezt az esetet?
d/ ha fel akarjuk használni ennek a programnak minden sorát, akkor a fenti lehetőségek közül melyiket kell választani?

*/

start :- adatbeolvasas, ellenorzes, menu.

adatbeolvasas :- olvassa be az adatfájl tartalmát!

ellenorzes :- irassa vissza az adatokat!

menu :- writeln('\n1. angol  --> magyar '),  
	writeln('2. magyar  --> angol '), 
	writeln('3. kilépés '), 
	write('valasztasa: '), read(V), menu(V).

menu(1) :- write('\na keresett szó: '),read(Angol), 
	keresse ki az Angol szó magyar megfelelőit, és rakja a Szavak listába!
	ki(Szavak),menu.

menu(2) :- write('\na keresett szó: '),read(Magyar), 
	keresse ki a Magyar szó angol megfelelőit, és rakja a Words listába!
	ki(Words),menu.

menu(3) :- write('viszlát! ').

menu(_) :- writeln('hibás választás, újra '), menu.

ki(L) :- L \== [], kiir(L).
ki([]) :- write('\nsajnos nincs ilyen szó a szótáramban').

kiir([F|T]) :- writeln(F), kiir(T).
kiir([]).



/*
További teendők:
Ha nincs meg a keresett szó párja, akkor kínálja fel a szótár bővítésének lehetőségét!
Ajánlott lépések:

1. A hiányzó szóhoz egyetlen másikat adjunk meg, és csak futási időben tudjuk 
használni az új szópárokat.

2. Az előző bővítése, azaz később is használható legyen a bővített szótár (vagyis mentsük el
file-ba az új szópárokat is).

3. A szótárból hiányzó szóhoz egynél több párt is fölvehet - az eredményt mentse vissza a file-ba! 
(Vigyázat! Ne tegye tönkre az eredeti adatfile-t - legalább egy biztonsági 
másolatot készítsen róla!).

4. Vezessen be egy "szótár-karbantartása" menüpontot. Ebben lehessen 
a/ bővíteni újabb szópárok megadásával
b/ a már meglévő szavakhoz lehessen újabb jelentést is rendelni. (Ehhez persze ki kell 
iratni a meglévőket is, különben honnan tudnánk, hogy mit tud a szótár.)

*/
