(TranslationUnit
    [(Program
        print1
        ()
        []
        [(ImplicitNone
            []
            (TriviaNode
                []
                [(EndOfLine)
                (EndOfLine)]
            )
        )]
        [(Declaration
            (AttrType
                TypeReal
                []
                ()
                ()
                None
            )
            []
            [(pi
            []
            []
            ()
            ()
            None
            ())]
            ()
        )]
        [(Assignment
            0
            pi
            (Real "3.141592")
            (TriviaNode
                []
                [(EndOfLine)
                (EndOfLine)]
            )
        )
        (Print
            0
            (String "(f6.3)" ())
            [pi]
            ()
        )
        (Print
            0
            ()
            [pi]
            ()
        )
        (Print
            0
            10
            []
            ()
        )
        (Format
            10
            "3x, \"print\""
            (TriviaNode
                []
                [(EndOfLine)
                (EndOfLine)]
            )
        )]
        []
    )]
)
