From 442d732696ad431b84f6e5c72b6ee785be4fd968 Mon Sep 17 00:00:00 2001
From: adelon <22380201+adelon@users.noreply.github.com>
Date: Sat, 10 Feb 2024 02:22:14 +0100
Subject: Initial commit

---
 test/golden/finite-set-terms/parsing.golden | 124 ++++++++++++++++++++++++++++
 1 file changed, 124 insertions(+)
 create mode 100644 test/golden/finite-set-terms/parsing.golden

(limited to 'test/golden/finite-set-terms/parsing.golden')

diff --git a/test/golden/finite-set-terms/parsing.golden b/test/golden/finite-set-terms/parsing.golden
new file mode 100644
index 0000000..c30f70b
--- /dev/null
+++ b/test/golden/finite-set-terms/parsing.golden
@@ -0,0 +1,124 @@
+[ BlockAxiom
+    ( SourcePos
+        { sourceName = "test/examples/finite-set-terms.tex"
+        , sourceLine = Pos 1
+        , sourceColumn = Pos 1
+        }
+    )
+    ( Marker "cons" )
+    ( Axiom []
+        ( StmtConnected Equivalence
+            ( StmtFormula
+                ( FormulaChain
+                    ( ChainBase
+                        ( ExprVar
+                            ( NamedVar "x" ) :| []
+                        ) Positive
+                        ( RelationSymbol
+                            ( Command "in" )
+                        )
+                        ( ExprOp
+                            [ Just
+                                ( Command "cons" )
+                            , Just InvisibleBraceL
+                            , Nothing
+                            , Just InvisibleBraceR
+                            , Just InvisibleBraceL
+                            , Nothing
+                            , Just InvisibleBraceR
+                            ]
+                            [ ExprVar
+                                ( NamedVar "y" )
+                            , ExprVar
+                                ( NamedVar "X" )
+                            ] :| []
+                        )
+                    )
+                )
+            )
+            ( StmtConnected Disjunction
+                ( StmtFormula
+                    ( FormulaChain
+                        ( ChainBase
+                            ( ExprVar
+                                ( NamedVar "x" ) :| []
+                            ) Positive
+                            ( RelationSymbol
+                                ( Symbol "=" )
+                            )
+                            ( ExprVar
+                                ( NamedVar "y" ) :| []
+                            )
+                        )
+                    )
+                )
+                ( StmtFormula
+                    ( FormulaChain
+                        ( ChainBase
+                            ( ExprVar
+                                ( NamedVar "x" ) :| []
+                            ) Positive
+                            ( RelationSymbol
+                                ( Command "in" )
+                            )
+                            ( ExprVar
+                                ( NamedVar "X" ) :| []
+                            )
+                        )
+                    )
+                )
+            )
+        )
+    )
+, BlockDefn
+    ( SourcePos
+        { sourceName = "test/examples/finite-set-terms.tex"
+        , sourceLine = Pos 5
+        , sourceColumn = Pos 1
+        }
+    )
+    ( Marker "unit" )
+    ( DefnOp
+        ( SymbolPattern
+            [ Just
+                ( Command "unit" )
+            ] []
+        )
+        ( ExprFiniteSet
+            ( ExprOp
+                [ Just
+                    ( Command "emptyset" )
+                ] [] :| []
+            )
+        )
+    )
+, BlockLemma
+    ( SourcePos
+        { sourceName = "test/examples/finite-set-terms.tex"
+        , sourceLine = Pos 9
+        , sourceColumn = Pos 1
+        }
+    )
+    ( Marker "emptyset_in_unit" )
+    ( Lemma []
+        ( StmtFormula
+            ( FormulaChain
+                ( ChainBase
+                    ( ExprOp
+                        [ Just
+                            ( Command "emptyset" )
+                        ] [] :| []
+                    ) Positive
+                    ( RelationSymbol
+                        ( Command "in" )
+                    )
+                    ( ExprOp
+                        [ Just
+                            ( Command "unit" )
+                        ] [] :| []
+                    )
+                )
+            )
+        )
+    )
+]
\ No newline at end of file
-- 
cgit v1.2.3