forked from pdep-utn/eg-rutas-prolog
-
Notifications
You must be signed in to change notification settings - Fork 0
/
Copy pathtest_rutas.pl
24 lines (16 loc) · 1.15 KB
/
test_rutas.pl
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
/*
████████╗███████╗███████╗████████╗███████╗
╚══██╔══╝██╔════╝██╔════╝╚══██╔══╝██╔════╝
██║ █████╗ ███████╗ ██║ ███████╗
██║ ██╔══╝ ╚════██║ ██║ ╚════██║
██║ ███████╗███████║ ██║ ███████║
╚═╝ ╚══════╝╚══════╝ ╚═╝ ╚══════╝
*/
:- include(rutas).
:-begin_tests(rutas).
test(distancia_directa, nondet):-kilometrosViaje(puertoMadryn, puertoDeseado, 732).
test(distancias_posibles_usando_diferentes_rutas, set(Kilometros = [1711, 1772])):-
kilometrosViaje(puertoMadryn, calafate, Kilometros).
test(recorrida_al_derecho, nondet):-totalViaje(puertoMadryn, calafate, 1711).
test(recorrida_al_reves, nondet):-totalViaje(calafate, puertoMadryn, 1711).
:-end_tests(rutas).