縁あって幅経路探索をPrologで。本当はエッジの重みを所要時間にしたり、乗り換えにもコストをつけたいんだけど、データを載せるのがめんど（ｒｙ