```    G4 Prover
Result of the test for sequent p/\(q/\r) <--> (p/\q)/\r

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/\q/\r<-->(p/\q)/\r.
Trying to prove with threshold = 0
Succeed in proving p/\q/\r --> (p/\q)/\r (2 msec.)
pretty:1 =
----------- Ax  ----------- Ax
p,q,r --> p     p,q,r --> q
--------------------------- R/\  ----------- Ax
p,q,r --> p/\q             p,q,r --> r
-------------------------------------- R/\
p,q,r --> (p/\q)/\r
-------------------- L/\
p,q/\r --> (p/\q)/\r
--------------------- L/\
p/\q/\r --> (p/\q)/\r
Trying to prove with threshold = 0
Succeed in proving (p/\q)/\r --> p/\q/\r (2 msec.)
pretty:2 =
----------- Ax  ----------- Ax
p,q,r --> q     p,q,r --> r
----------- Ax  --------------------------- R/\
p,q,r --> p           p,q,r --> q/\r
------------------------------------ R/\
p,q,r --> p/\q/\r
------------------ L/\
p/\q,r --> p/\q/\r
--------------------- L/\
(p/\q)/\r --> p/\q/\r
yes
fol(g4i)> quit.
yes
Exit from Sequent Calculus Prover...
Total CPU time = 9 msec.
true

Back to g4-prover
Maintained by  Joseph Vidal-Rosset
```