code$ swipl -s code_English.prolog
% Janus 1.5.2 embeds Python 3.13.13 (main, Apr 8 2026, 18:23:14) [Clang 21.0.0 (clang-2100.0.123.102)]
Manual & tutorial: https://sandiway.arizona.edu Sandiway Fong (2024-2026)
Run: ?- parse(List,SO,L). (; for more answers)
List = [..words] (input), SO,L = syntactic object, [..] spellout (output)
See derivation: ?- report. ?- graph. (<- after parse/3) ?- summary. (short)
for a long report ?- retract(no_fill).
LEX expansion: ⒜ WordNet: ?- useMorphy. (noMorphy)
assert/retract/?- : use_morphy(C), for C={v,n,a,r}. ⒝ edit lex.prolog
⒞ ?- addNoun(Word) (addTr/addUrg/addUnacc/addAdj/addPrep).
Welcome to SWI-Prolog (threaded, 64 bits, version 10.0.2)
SWI-Prolog comes with ABSOLUTELY NO WARRANTY. This is free software.
Please run ?- license. for legal details.
For online help and background, visit https://www.swi-prolog.org
For built-in help, use ?- help(Topic). or ?- apropos(Word).
% Interactive session; added `.` to Python `sys.path`
101 ?- parse([there,is,arriving,a,train],S,L).
Words: there is arriving a train
Initial WS: train_a arrive_θ:presp v_arrive v_v:prog:pres INFL_v:3sg
INT/EXT: {C, {INFL_v:3sg, {v_v:prog:pres, {v_arrive, {arrive_θ:presp, train_a}}}}}
EXT: a train 3sg pres be ing arrive
Spellout: a train is arriving
Blocked: inconsistent with input!
EXT: there 3sg pres be ing arrive a train
Spellout: there is arriving a train
Parse found!
S = {C, {INFL_v:3sg, {v_v:prog:pres, {v_arrive, {arrive_θ:presp, train_a}}}}},
L = [there,is,arriving,a,train] ;
INT/EXT: {C_Q_aux(3sg,pres,be), {INFL_v:3sg, {v_v:prog:pres, {v_arrive, {arrive_θ:presp, train_a}}}}}
EXT: 3sg pres be →→ a train 3sg pres be ing arrive
Spellout: 3sg pres be a train ing arrive
Spellout: is a train arriving
Blocked: inconsistent with input!
EXT: 3sg pres be →→ there 3sg pres be ing arrive a train
Spellout: 3sg pres be there ing arrive a train
Spellout: is there arriving a train
Blocked: inconsistent with input!
false.
103 ?- report.
REPORT LENGTH: 26
true.
104 ?-