Finds the quickest route from a source to a destination given a list of optional transports
Written in Prolog
Load script into prolog interpreter and use the command 'journey(Source, Destination, [Transports])' to find the quickest route.
You can change or add different modes of transport at the beginning of script