(TranslationUnit
    [(Program
        array1
        ()
        []
        [(ImplicitNone
            []
            ()
        )]
        [(Declaration
            (AttrType
                TypeReal
                []
                ()
                ()
                None
            )
            []
            [(d
            []
            []
            ()
            ()
            None
            ())
            (e
            [(1
            5
            DimensionExpr)]
            []
            ()
            ()
            None
            ())
            (e2
            [(1
            2
            DimensionExpr)
            (1
            3
            DimensionExpr)]
            []
            ()
            ()
            None
            ())
            (e3
            [(1
            1
            DimensionExpr)
            (1
            2
            DimensionExpr)
            (1
            3
            DimensionExpr)]
            []
            ()
            ()
            None
            ())]
            ()
        )
        (Declaration
            (AttrType
                TypeInteger
                []
                ()
                ()
                None
            )
            []
            [(f
            []
            []
            ()
            ()
            None
            ())
            (g
            [(1
            3
            DimensionExpr)]
            []
            ()
            ()
            None
            ())
            (g2
            [(1
            6
            DimensionExpr)
            (1
            3
            DimensionExpr)]
            []
            ()
            ()
            None
            ())
            (g3
            [(1
            4
            DimensionExpr)
            (1
            3
            DimensionExpr)
            (1
            2
            DimensionExpr)]
            []
            ()
            ()
            None
            ())]
            ()
        )
        (Declaration
            (AttrType
                TypeLogical
                []
                ()
                ()
                None
            )
            []
            [(a
            []
            []
            ()
            ()
            None
            ())
            (b
            [(1
            2
            DimensionExpr)]
            []
            ()
            ()
            None
            ())
            (b2
            [(1
            3
            DimensionExpr)
            (1
            2
            DimensionExpr)]
            []
            ()
            ()
            None
            ())
            (b3
            [(1
            2
            DimensionExpr)
            (1
            1
            DimensionExpr)
            (1
            2
            DimensionExpr)]
            []
            ()
            ()
            None
            ())]
            ()
        )]
        []
        []
    )]
)
