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 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50
|
import java.io.File;
import java.util.HashMap;
import se.sics.jasper.Query;
import se.sics.jasper.SICStus;
import se.sics.jasper.SPPredicate;
import se.sics.jasper.SPQuery;
import se.sics.jasper.SPTerm;
public class RunProlog {
public static void main(String argv[]) {
SICStus sp;
SPPredicate pred;
SPTerm from, to, way;
SPQuery query;
int i;
try
{
appendToJavaLibraryPath("'C:/Program Files/SICStus Prolog 3.12.2/bin/spnative.lib'");
System.out.println(System.getProperty("java.library.path"));
sp = new SICStus(argv,"C:/Program Files/SICStus Prolog 3.12.2/bin/");
sp.load("C:/Documents and Settings/nicolas/Bureau/train.pl");
pred = new SPPredicate(sp, "connected", 4, "");
to = new SPTerm(sp, "Orebro");
from = new SPTerm(sp, "Stockholm");
way = new SPTerm(sp).putVariable();
query = sp.openQuery(pred, new SPTerm[] { from, to, way, way });
while (query.nextSolution())
{
System.out.println(way.toString());
}
}
catch ( Exception e )
{
e.printStackTrace();
}
}
public static void appendToJavaLibraryPath(String newPath) {
//String javaLibraryPath = System.getProperty("java.library.path");
System.setProperty("java.library.path",newPath);
}
} |
Partager