Sketch noun coord, symbols for reals

1 files changed, 68 insertions, 1 deletions

diff --git a/test/golden/coord/parsing.golden b/test/golden/coord/parsing.golden
index 555b86b..65fa82f 100644
--- a/test/golden/coord/parsing.golden
+++ b/test/golden/coord/parsing.golden
@@ -302,7 +302,7 @@
                 ( TermExpr
                     ( ExprVar
                         ( NamedVar "x" )
-                    )
+                    ) :| []
                 ) NounPhrase ( [] )
                 ( Noun
                     ( SgPl
@@ -364,4 +364,71 @@
             )
         )
     )
+, BlockLemma
+    ( SourcePos
+        { sourceName = "test/examples/coord.tex"
+        , sourceLine = Pos 39
+        , sourceColumn = Pos 1
+        }
+    )
+    ( Marker "are_nouns" )
+    ( Lemma
+        [ AsmLetNoun
+            ( NamedVar "x" :|
+                [ NamedVar "y" ]
+            ) NounPhrase
+            (
+                [ AdjL
+                    [ Just
+                        ( Word "foo" )
+                    ] []
+                ]
+            )
+            ( Noun
+                ( SgPl
+                    { sg =
+                        [ Just
+                            ( Word "bar" )
+                        ]
+                    , pl =
+                        [ Just
+                            ( Word "bars" )
+                        ]
+                    }
+                ) []
+            ) ( Nothing ) ( [] ) ( Nothing )
+        ]
+        ( StmtNoun
+            ( TermExpr
+                ( ExprVar
+                    ( NamedVar "x" )
+                ) :|
+                [ TermExpr
+                    ( ExprVar
+                        ( NamedVar "y" )
+                    )
+                ]
+            ) NounPhrase
+            (
+                [ AdjL
+                    [ Just
+                        ( Word "foo" )
+                    ] []
+                ]
+            )
+            ( Noun
+                ( SgPl
+                    { sg =
+                        [ Just
+                            ( Word "bar" )
+                        ]
+                    , pl =
+                        [ Just
+                            ( Word "bars" )
+                        ]
+                    }
+                ) []
+            ) ( Nothing ) ( [] ) ( Nothing )
+        )
+    )
 ]
\ No newline at end of file