cont = engine.cont;
// A;B:-['$not_unifiable'(A,(C->D)),call('jp.ac.kobe_u.cs.prolog.builtin':A)]
Term[] y1 = {new VariableTerm(engine), new VariableTerm(engine)};
a3 = new StructureTerm(s1, y1);
//START inline expansion of $not_unifiable(a(1),a(3))
if (a1.unify(a3, engine.trail)) {
return engine.fail();
}
//END inline expansion
Term[] y2 = {s3, a1};
a4 = new StructureTerm(s2, y2);