travel(region1,region2,region3,region4,region5,region6,region7,region8,region9).
%tour(cityName,season,description,Travel_cost,hotelReservation,distance,contactInformation,tour_type,traveAgency,path)
tour(Dahir Dar,winter,'found at the middle of lake tana and abay',200,'summer land,ethio star',570,'tour agencies','Natural Land Escapes','NTO,',Debre markos).

reservation(Bahirdar,'Summer Land, Ethio Star,  Papyrus',region5)


%hotel(hotelName,reg).

dsplayRegionsAvailable:-travel(X1,X2,X3,X4,X5,X6,X7,X8,X9),write('The available regions with tour sites are:'),nl,write(X1),nl,
write(X2),nl,write(X3),nl,write(X4),nl,write(X5),nl,write(X6),nl,write(X7),nl,write(X8),nl,write(X9),nl.

displayReservations:- write('Enter the region name to display reservations available.'),nl,read(R),nl,reservation(X,Y,Z),(R=Z),nl
,write(X),nl,write(Y),nl.


%city(cityName,toursite,discritption,region).

%reservation(reservationName,discrption,city,toursite).
%traveagency(agencyType,agencyName,contactInformation,branch).