(TranslationUnit
    [(Program
        array6
        ()
        []
        [(ImplicitNone
            []
            ()
        )]
        []
        []
        [(Subroutine
            t
            [(n)
            (a)
            (b)
            (c)
            (d)
            (e)]
            []
            ()
            ()
            []
            []
            []
            [(Declaration
                (AttrType
                    TypeInteger
                    []
                    ()
                    ()
                    None
                )
                [(AttrIntent
                    In
                )]
                [(n
                []
                []
                ()
                ()
                None
                ())]
                ()
            )
            (Declaration
                (AttrType
                    TypeReal
                    []
                    ()
                    ()
                    None
                )
                []
                [(a
                [(()
                ()
                DimensionStar)]
                []
                ()
                ()
                None
                ())
                (b
                [(3
                ()
                DimensionStar)]
                []
                ()
                ()
                None
                ())]
                ()
            )
            (Declaration
                (AttrType
                    TypeReal
                    []
                    ()
                    ()
                    None
                )
                [(AttrDimension
                    [(1
                    3
                    DimensionExpr)
                    (1
                    n
                    DimensionExpr)
                    (()
                    ()
                    DimensionStar)]
                )]
                [(c
                []
                []
                ()
                ()
                None
                ())]
                ()
            )
            (Declaration
                (AttrType
                    TypeReal
                    []
                    ()
                    ()
                    None
                )
                [(AttrDimension
                    [(1
                    3
                    DimensionExpr)
                    (1
                    n
                    DimensionExpr)
                    (4
                    ()
                    DimensionStar)]
                )]
                [(d
                []
                []
                ()
                ()
                None
                ())]
                ()
            )
            (Declaration
                (AttrType
                    TypeReal
                    []
                    ()
                    ()
                    None
                )
                []
                [(e
                [(n
                ()
                DimensionStar)]
                []
                ()
                ()
                None
                ())]
                ()
            )]
            []
            []
            []
        )]
    )]
)
