slightly re-arranged distance announcements in de-tts
This commit is contained in:
parent
7512fc67f4
commit
c2813620c3
1 changed files with 2 additions and 1 deletions
|
@ -67,7 +67,8 @@ nth(17, 'siebzehnte ').
|
||||||
|
|
||||||
%%% distance measure
|
%%% distance measure
|
||||||
distance(Dist) == T :- Dist < 1000, dist(Dist, F), append(F, ' meters',T).
|
distance(Dist) == T :- Dist < 1000, dist(Dist, F), append(F, ' meters',T).
|
||||||
dist(D, ['10 ']) :- D < 20, !.
|
dist(D, ['10 ']) :- D < 15, !.
|
||||||
|
dist(D, ['15 ']) :- D < 20, !.
|
||||||
dist(D, ['20 ']) :- D < 30, !.
|
dist(D, ['20 ']) :- D < 30, !.
|
||||||
dist(D, ['30 ']) :- D < 40, !.
|
dist(D, ['30 ']) :- D < 40, !.
|
||||||
dist(D, ['40 ']) :- D < 50, !.
|
dist(D, ['40 ']) :- D < 50, !.
|
||||||
|
|
Loading…
Reference in a new issue