1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22 package jTrolog.engine;
23
24
25
26
27 @SuppressWarnings({ "serial" })
28 class DefaultProlog extends Prolog {
29
30 DefaultProlog() {
31 super(new String[0]);
32 opNew(":-", XFX, 1200);
33 opNew("-->", XFX, 1200);
34 opNew(":-", FX, 1200);
35 opNew("?-", FX, 1200);
36 opNew(";", XFY, 1100);
37 opNew("->", XFY, 1050);
38 opNew(",", XFY, 1000);
39 opNew("\\+", FY, 900);
40 opNew("not", FY, 900);
41 opNew("=", XFX, 700);
42 opNew("\\=", XFX, 700);
43 opNew("==", XFX, 700);
44 opNew("\\==", XFX, 700);
45
46
47 opNew("@>", XFX, 700);
48 opNew("@<", XFX, 700);
49 opNew("@=<", XFX, 700);
50 opNew("@>=", XFX, 700);
51 opNew("=:=", XFX, 700);
52 opNew("=\\=", XFX, 700);
53 opNew(">", XFX, 700);
54 opNew("<", XFX, 700);
55 opNew("=<", XFX, 700);
56 opNew(">=", XFX, 700);
57 opNew("is", XFX, 700);
58 opNew("==..", XFX, 700);
59
60
61 opNew("+", YFX, 500);
62 opNew("-", YFX, 500);
63 opNew("/\\", YFX, 500);
64 opNew("\\/", YFX, 500);
65 opNew("*", YFX, 400);
66 opNew("/", YFX, 400);
67 opNew("//", YFX, 400);
68 opNew(">>", YFX, 400);
69 opNew("<<", YFX, 400);
70 opNew("rem", YFX, 400);
71 opNew("mod", YFX, 400);
72 opNew("**", XFX, 200);
73 opNew("^", XFY, 200);
74 opNew("\\", FX, 200);
75 opNew("-", FY, 200);
76 }
77 }