degmintoradians( degmin( Degrees, Minutes ), radians ) :-
print('test2'),
radians is ((Degrees + Minutes) / 60) * (pi / 180).
distance( Airport1, Airport2, DistanceMiles ) :-
airport( Airport1, _, Latitude1, Longitude1 ),
airport( Airport2, _, Latitude2, Longitude2 ),
print('test1'),
degmintoradians( Latitude1, latrads1 ),
.....
我想要做的很简单,只需将“Latitude1”和“longitude1”传递给degmintoradians。打印案例是测试,当运行完整代码时,打印“test1”,但“test2”不打印。我似乎无法弄明白为什么,我认为我做的一切都是正确的。
如果有帮助,机场会存储在这样的数据库中:
airport( atl, 'Atlanta ', degmin( 33,39 ), degmin( 84,25 ) ).
感谢。