Список прологов на Java с JPL

Question

Я пролог-нуб и имею проблему с прологом в java.

Пролог:

event( 'Number1', 
    54.320021, 
    13.043840, 
    [sport,hotel,schwimmen,sauna]). 
event( 'Number2', 
    54.320678, 
    13.046984, 
    [einkaufen]). 


findAllCategories(Categories):- 
    findall(X, event(_,_,_,X), L), 
    appendCategories(C1,L), 
    Categories = C1. 

appendCategories(C1,[R|[]]):- 
    C1 = R. 

appendCategories(C,[R|L]):- 
    appendCategories(C1,L), 
    append(C1,R,X), 
    C = X. 

append([],L,L). 
append([H|T],L2,[H|L3]):- 
    append(T,L2,L3). 

Решение в prologconsole: [Einkaufen, спорт, гостиницы, Schwimmen, сауна]

Java:

import java.util.ArrayList; 
import java.util.Map; 
import org.jpl7.*; 

public ArrayList<String> getCategoriesByProlog(){ 
    ArrayList<String> categories = new ArrayList<String>(); 

    Variable X = new Variable("X"); 
     Query q4 = 
      new Query(
       "findAllCategories", 
       new Term[] {X} 
      ); 

    Map<String, Term>[] solutions = q4.allSolutions(); 

    for (int i=0 ; i<solutions.length ; i++) { 
     System.out.println("X = " + solutions[i].get("X")); 
     categories.add(solutions[i].get("X").toString()); 
    } 

    return categories; 

Выход в Java: X = ' [|] '(einkaufen,' [|] '(спорт,' [|] '(гостиница,' [|] '(schwimmen,' [|] '(сауна,' [] ')))))

Как я могу прочитать пролог-термин как ArrayList для Java?

Answer 1

вам необходимо изменить его в срок массив как это:

Map<String, Term>[] solutions = q4.allSolutions(); 

for (int i=0 ; i<solutions.length ; i++) 
{     
    System.out.println("X = " + solutions[i].get("X")); 

    //ADD THIS PART 
    Term term = solutions[i].get("X"); 

    int u=0;  
    for (Term oneTerm : term.toTermArray()) 
    { 
     categories.add(oneTerm); 
     System.out.println("term["+i+"]["+u+"] = " + oneTerm); 
     u++; 
    } 
}