(TranslationUnit
    [(Program
        array2
        ()
        []
        [(ImplicitNone
            []
            (TriviaNode
                []
                [(EndOfLine)
                (EndOfLine)]
            )
        )]
        [(Declaration
            (AttrType
                TypeReal
                []
                ()
                ()
                None
            )
            [(AttrDimension
                [(1
                5
                DimensionExpr)]
            )]
            [(a
            []
            []
            ()
            ()
            None
            ())
            (b
            []
            []
            ()
            ()
            None
            ())]
            ()
        )
        (Declaration
            (AttrType
                TypeInteger
                []
                ()
                ()
                None
            )
            [(AttrDimension
                [(1
                3
                DimensionExpr)]
            )]
            [(c
            []
            []
            ()
            ()
            None
            ())]
            ()
        )
        (Declaration
            (AttrType
                TypeLogical
                []
                ()
                ()
                None
            )
            [(AttrDimension
                [(1
                2
                DimensionExpr)]
            )]
            [(d
            []
            []
            ()
            ()
            None
            ())]
            (TriviaNode
                []
                [(EndOfLine)
                (EndOfLine)]
            )
        )
        (Declaration
            (AttrType
                TypeReal
                []
                ()
                ()
                None
            )
            [(AttrDimension
                [(1
                2
                DimensionExpr)
                (1
                3
                DimensionExpr)]
            )]
            [(e
            []
            []
            ()
            ()
            None
            ())]
            ()
        )
        (Declaration
            (AttrType
                TypeInteger
                []
                ()
                ()
                None
            )
            [(AttrDimension
                [(1
                3
                DimensionExpr)
                (1
                4
                DimensionExpr)]
            )]
            [(f
            []
            []
            ()
            ()
            None
            ())]
            ()
        )
        (Declaration
            (AttrType
                TypeLogical
                []
                ()
                ()
                None
            )
            [(AttrDimension
                [(1
                5
                DimensionExpr)
                (1
                2
                DimensionExpr)]
            )]
            [(g
            []
            []
            ()
            ()
            None
            ())]
            (TriviaNode
                []
                [(EndOfLine)
                (EndOfLine)]
            )
        )
        (Declaration
            (AttrType
                TypeReal
                []
                ()
                ()
                None
            )
            [(AttrDimension
                [(1
                2
                DimensionExpr)
                (1
                3
                DimensionExpr)
                (1
                4
                DimensionExpr)]
            )]
            [(h
            []
            []
            ()
            ()
            None
            ())]
            ()
        )
        (Declaration
            (AttrType
                TypeInteger
                []
                ()
                ()
                None
            )
            [(AttrDimension
                [(1
                3
                DimensionExpr)
                (1
                4
                DimensionExpr)
                (1
                3
                DimensionExpr)]
            )]
            [(i
            []
            []
            ()
            ()
            None
            ())]
            ()
        )
        (Declaration
            (AttrType
                TypeLogical
                []
                ()
                ()
                None
            )
            [(AttrDimension
                [(1
                5
                DimensionExpr)
                (1
                2
                DimensionExpr)
                (1
                2
                DimensionExpr)]
            )]
            [(j
            []
            []
            ()
            ()
            None
            ())]
            (TriviaNode
                []
                [(EndOfLine)
                (EndOfLine)]
            )
        )]
        []
        []
    )]
)
