forked from saetre/busstuc
-
Notifications
You must be signed in to change notification settings - Fork 0
/
Copy pathtucastt.pl
36 lines (20 loc) · 1001 Bytes
/
tucastt.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
25
26
27
28
29
30
31
32
33
34
/* -*- Mode:Prolog; coding:utf-8; -*- */
%% FILE tucastt.pl
%% SYSTEM TUC
%% CREATED TA-010127
%% REVISED TA-010327
%% Makefile for BussTUC/ASTT file
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%% RS-131227 UNIT: / (FIRST!)
%:- ensure_loaded( user:'declare' ). %% RS-111213 General (semantic) Operators
:- use_module( declare, [ ( := )/2 ] ). %% RS-131227 Avoid loop?
%%?-prolog_flag(unknown,_,fail). %% (Don't?) crash on undefined predicates
%?-compile(tucbuses).
%:- use_module( tucbuses, [ ] ). %% RS-131227 Avoid loop?
?- (unix_language := eng), %% Standard for IDI/NTNU UNIX Solaris )
(language := norsk), %% Initial default user language
(duallangflag := true), %% Also try English if unknown words
(noparentflag := true), %% Ignore content of parentheses
(tramflag := false), %% They don't like A/S Gråkallen
(parsetime_limit := 10000). %% 333 Mhz
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%