[ BlockLemma
    ( SourcePos
        { sourceName = "test/examples/proofassume.tex"
        , sourceLine = Pos 1
        , sourceColumn = Pos 1
        }
    )
    ( Marker "assumetest" )
    ( Lemma []
        ( Connected Implication
            ( TermSymbol
                ( SymbolPredicate
                    ( PredicateRelation
                        ( Command "in" )
                    )
                )
                [ TermVar
                    ( NamedVar "x" )
                , TermVar
                    ( NamedVar "y" )
                ]
            )
            ( TermSymbol
                ( SymbolPredicate
                    ( PredicateRelation
                        ( Command "in" )
                    )
                )
                [ TermVar
                    ( NamedVar "x" )
                , TermVar
                    ( NamedVar "y" )
                ]
            )
        )
    )
, BlockProof
    ( SourcePos
        { sourceName = "test/examples/proofassume.tex"
        , sourceLine = Pos 4
        , sourceColumn = Pos 1
        }
    )
    ( Assume
        ( TermSymbol
            ( SymbolPredicate
                ( PredicateRelation
                    ( Command "in" )
                )
            )
            [ TermVar
                ( NamedVar "x" )
            , TermVar
                ( NamedVar "y" )
            ]
        )
        ( Have
            ( TermSymbol
                ( SymbolPredicate
                    ( PredicateRelation
                        ( Command "in" )
                    )
                )
                [ TermVar
                    ( NamedVar "x" )
                , TermVar
                    ( NamedVar "y" )
                ]
            ) JustificationEmpty ( Qed JustificationEmpty )
        )
    )
, BlockLemma
    ( SourcePos
        { sourceName = "test/examples/proofassume.tex"
        , sourceLine = Pos 9
        , sourceColumn = Pos 1
        }
    )
    ( Marker "assumetesttwo" )
    ( Lemma []
        ( Connected Implication
            ( Connected Conjunction
                ( TermSymbol
                    ( SymbolPredicate
                        ( PredicateRelation
                            ( Command "in" )
                        )
                    )
                    [ TermVar
                        ( NamedVar "x" )
                    , TermVar
                        ( NamedVar "y" )
                    ]
                )
                ( TermSymbol
                    ( SymbolPredicate
                        ( PredicateRelation
                            ( Command "in" )
                        )
                    )
                    [ TermVar
                        ( NamedVar "a" )
                    , TermVar
                        ( NamedVar "b" )
                    ]
                )
            )
            ( TermSymbol
                ( SymbolPredicate
                    ( PredicateRelation
                        ( Command "in" )
                    )
                )
                [ TermVar
                    ( NamedVar "x" )
                , TermVar
                    ( NamedVar "y" )
                ]
            )
        )
    )
, BlockProof
    ( SourcePos
        { sourceName = "test/examples/proofassume.tex"
        , sourceLine = Pos 12
        , sourceColumn = Pos 1
        }
    )
    ( Assume
        ( TermSymbol
            ( SymbolPredicate
                ( PredicateRelation
                    ( Command "in" )
                )
            )
            [ TermVar
                ( NamedVar "a" )
            , TermVar
                ( NamedVar "b" )
            ]
        )
        ( Assume
            ( TermSymbol
                ( SymbolPredicate
                    ( PredicateRelation
                        ( Command "in" )
                    )
                )
                [ TermVar
                    ( NamedVar "x" )
                , TermVar
                    ( NamedVar "y" )
                ]
            )
            ( Have
                ( TermSymbol
                    ( SymbolPredicate
                        ( PredicateRelation
                            ( Command "in" )
                        )
                    )
                    [ TermVar
                        ( NamedVar "x" )
                    , TermVar
                        ( NamedVar "y" )
                    ]
                ) JustificationEmpty ( Qed JustificationEmpty )
            )
        )
    )
]