(TranslationUnit
    [(Module
        interface_02_mod
        (TriviaNode
            []
            [(EndOfLine)
            (EndOfLine)]
        )
        []
        [(ImplicitNone
            []
            (TriviaNode
                []
                [(EndOfLine)
                (EndOfLine)]
            )
        )]
        [(Interface
            (InterfaceHeader)
            (TriviaNode
                []
                [(EndOfLine)
                (EndOfLine)]
            )
            [(InterfaceProc
                (Subroutine
                    a1
                    [(a)]
                    []
                    ()
                    ()
                    []
                    []
                    []
                    [(Declaration
                        (AttrType
                            TypeInteger
                            []
                            ()
                            ()
                            None
                        )
                        [(AttrIntent
                            InOut
                        )]
                        [(a
                        []
                        []
                        ()
                        ()
                        None
                        ())]
                        ()
                    )]
                    []
                    []
                    []
                )
            )]
        )
        (Interface
            (InterfaceHeader)
            (TriviaNode
                []
                [(EndOfLine)
                (EndOfLine)]
            )
            [(InterfaceProc
                (Subroutine
                    a2
                    [(a)]
                    []
                    ()
                    (TriviaNode
                        []
                        [(EndOfLine)
                        (EndOfLine)]
                    )
                    []
                    []
                    []
                    [(Declaration
                        (AttrType
                            TypeInteger
                            []
                            ()
                            ()
                            None
                        )
                        [(AttrIntent
                            InOut
                        )]
                        [(a
                        []
                        []
                        ()
                        ()
                        None
                        ())]
                        ()
                    )]
                    []
                    []
                    []
                )
            )
            (InterfaceProc
                (Subroutine
                    a3
                    [(a)]
                    []
                    ()
                    ()
                    []
                    []
                    []
                    [(Declaration
                        (AttrType
                            TypeReal
                            []
                            ()
                            ()
                            None
                        )
                        [(AttrIntent
                            InOut
                        )]
                        [(a
                        []
                        []
                        ()
                        ()
                        None
                        ())]
                        ()
                    )]
                    []
                    []
                    []
                )
            )]
        )]
        []
        []
    )
    (Program
        interface_02
        ()
        [(Use
            []
            interface_02_mod
            [(UseSymbol
                a1
                ()
            )
            (UseSymbol
                a2
                ()
            )
            (UseSymbol
                a3
                ()
            )]
            .true.
            ()
        )]
        [(ImplicitNone
            []
            (TriviaNode
                []
                [(EndOfLine)
                (EndOfLine)]
            )
        )]
        []
        []
        []
    )]
)
