diff --git a/dhscanner-ast.cabal b/dhscanner-ast.cabal
--- a/dhscanner-ast.cabal
+++ b/dhscanner-ast.cabal
@@ -22,7 +22,7 @@
     and models both of them as plain sequential code blocks. Every file has exactly one ast that represents it.
     Non Haskell parogrammers note: The ast is /immutable/ (like everything else in Haskell ...)
 
-version:            0.1.0.1
+version:            0.1.0.2
 license:            GPL-3.0-only
 license-file:       LICENSE
 author:             OrenGitHub
@@ -47,9 +47,9 @@
         Location
 
     build-depends:
-        aeson >= 2.2.3 && < 2.3,
-        base >= 4.17.2 && < 4.18,
-        containers >= 0.6.7 && < 0.7
+        aeson < 2.3,
+        base < 4.19,
+        containers < 0.7
 
     hs-source-dirs:
         src
diff --git a/src/Ast.hs b/src/Ast.hs
--- a/src/Ast.hs
+++ b/src/Ast.hs
@@ -65,10 +65,8 @@
    | ExpVar ExpVarContent
    | ExpBool ExpBoolContent
    | ExpCall ExpCallContent
-   | ExpField ExpFieldContent
    | ExpBinop ExpBinopContent
    | ExpLambda ExpLambdaContent
-   | ExpSubscript ExpSubscriptContent
    deriving ( Show, Eq, Ord, Generic, ToJSON, FromJSON )
 
 data Stmt
@@ -300,29 +298,10 @@
      }
      deriving ( Show, Eq, Ord, Generic, ToJSON, FromJSON )
 
-data ExpFieldContent
-   = ExpFieldContent
-     {
-         expFieldLhs :: Exp,
-         expFieldName :: Token.FieldName,
-         expFieldLocation :: Location
-     }
-     deriving ( Show, Eq, Ord, Generic, ToJSON, FromJSON )
-
-data ExpSubscriptContent
-   = ExpSubscriptContent
-     {
-         expSubscriptLhs :: Exp,
-         expSubscriptIdx :: Exp,
-         expSubscriptLocation :: Location
-     }
-     deriving ( Show, Eq, Ord, Generic, ToJSON, FromJSON )
-
-
 data VarFieldContent
    = VarFieldContent
      {
-         varFieldLhs :: ExpVarContent,
+         varFieldLhs :: Exp,
          varFieldName :: Token.FieldName,
          varFieldLocation :: Location
      }
@@ -338,7 +317,7 @@
 data VarSubscriptContent
    = VarSubscriptContent
      {
-         varSubscriptLhs :: ExpVarContent,
+         varSubscriptLhs :: Exp,
          varSubscriptIdx :: Exp,
          varSubscriptLocation :: Location
      }
