IntegerTerm
int
Term t = new IntegerTerm(100); int i = ((IntegerTerm) t).intValue();
232233234235236237238239240241242
} else { return engine.fail(); } a6 = new VariableTerm(engine); //START inline expansion of $get_level(a(6)) if (! a6.unify(new IntegerTerm(engine.B0), engine.trail)) { return engine.fail(); } //END inline expansion p1 = new PRED_$cut_1(a6, cont); return new PRED_C_3(a4, s2, a5, p1);
265266267268269270271272273274275
} else { return engine.fail(); } a6 = new VariableTerm(engine); //START inline expansion of $get_level(a(6)) if (! a6.unify(new IntegerTerm(engine.B0), engine.trail)) { return engine.fail(); } //END inline expansion Term[] y1 = {a2}; a7 = new StructureTerm(s4, y1);
300301302303304305306307308309310
} else { return engine.fail(); } a6 = new VariableTerm(engine); //START inline expansion of $get_level(a(6)) if (! a6.unify(new IntegerTerm(engine.B0), engine.trail)) { return engine.fail(); } //END inline expansion a7 = new VariableTerm(engine); a8 = new VariableTerm(engine);
339340341342343344345346347348349
} else { return engine.fail(); } a6 = new VariableTerm(engine); //START inline expansion of $get_level(a(6)) if (! a6.unify(new IntegerTerm(engine.B0), engine.trail)) { return engine.fail(); } //END inline expansion Term[] y1 = {new VariableTerm(engine), a2}; a7 = new StructureTerm(s10, y1);
374375376377378379380381382383384
} else { return engine.fail(); } a6 = new VariableTerm(engine); //START inline expansion of $get_level(a(6)) if (! a6.unify(new IntegerTerm(engine.B0), engine.trail)) { return engine.fail(); } //END inline expansion Term[] y1 = {a2}; a7 = new StructureTerm(s11, y1);
409410411412413414415416417418419
446447448449450451452453454455456
483484485486487488489490491492493
520521522523524525526527528529530
} else { return engine.fail(); } a6 = new VariableTerm(engine); //START inline expansion of $get_level(a(6)) if (! a6.unify(new IntegerTerm(engine.B0), engine.trail)) { return engine.fail(); } //END inline expansion a7 = new VariableTerm(engine); Term[] y1 = {a7};
5051525354555657585960
a1 = arg1; a2 = arg2; // A->B:-['$get_level'(C),call('jp.ac.kobe_u.cs.prolog.builtin':A),'$cut'(C),call('jp.ac.kobe_u.cs.prolog.builtin':B)] a3 = new VariableTerm(engine); //START inline expansion of $get_level(a(3)) if (! a3.unify(new IntegerTerm(engine.B0), engine.trail)) { return engine.fail(); } //END inline expansion Term[] y1 = {s2, a1}; a4 = new StructureTerm(s1, y1);