证明树排版测试

(MB (ProofTreeRender
     `(<== (cut (,Δ ,Δ^)
                ,(&⊗ $A $B)
                (,Δ^^)
                ,$C)
           (⊗R (,Δ) ,$A (,Δ^) ,$B)
           (⊗L (,Δ^^) ,$A ,$B ,$C))
     env:linear))
ΔA Δ B Δ, Δ AB R Δ ,A,B C Δ , AB C L Δ, Δ , Δ C cut AB
(MB (ProofTreeRender
     `(<== (cut (,Δ^) ,$B
                (,Δ ,Δ^^) ,$C)
           (axiom
            ,(Sequent
              (list Δ^) (list $B)))
           (cut (,Δ) ,$A
                (,Δ^^ ,$B) ,$C))
     env:linear))
Δ B ΔA Δ ,B,A C Δ, Δ ,B C cutA Δ ,Δ, Δ C cutB