G4 Prover
Result of the test for sequent p/\(p->q)/\(p/\q->s)-->s
G4 Prover: a Prolog Prover for Roy Dyckhoff's Sequent Calculus G4
This prover is a fork made by Joseph Vidal-Rosset (joseph.vidal-rosset@gmail.com),
from seqprover.pl, the sequent prover for CL-X, written by Naoyuki Tamura (tamura@kobe-u.ac.jp).
Type "help." if you need some help.
fol(g4i)> fol(g4i).
yes
fol(g4i)> output(pretty).
yes
fol(g4i)> p/\(p->q)/\p/\q->s-->s.
Trying to prove with threshold = 0
Succeed in proving p/\(p->q)/\p/\q->s --> s (1 msec.)
pretty:1 =
------------- Ax
s,p,p,q --> s
---------------- L0->1
q,p,p,q->s --> s
----------------- L/\
q,p,p/\q->s --> s
-------------------- L0->1
p,p->q,p/\q->s --> s
----------------------- L/\
p,(p->q)/\p/\q->s --> s
------------------------ L/\
p/\(p->q)/\p/\q->s --> s
yes
fol(g4i)> quit.
yes
Exit from Sequent Calculus Prover...
Total CPU time = 4 msec.
true