(TranslationUnit
    (SymbolTable
        1
        {
            bindc3:
                (Program
                    (SymbolTable
                        2
                        {
                            c_f_pointer:
                                (ExternalSymbol
                                    2
                                    c_f_pointer
                                    4 c_f_pointer
                                    lfortran_intrinsic_iso_c_binding
                                    []
                                    c_f_pointer
                                    Public
                                ),
                            c_loc:
                                (ExternalSymbol
                                    2
                                    c_loc
                                    4 c_loc
                                    lfortran_intrinsic_iso_c_binding
                                    []
                                    c_loc
                                    Public
                                ),
                            c_ptr:
                                (ExternalSymbol
                                    2
                                    c_ptr
                                    4 c_ptr
                                    lfortran_intrinsic_iso_c_binding
                                    []
                                    c_ptr
                                    Public
                                ),
                            idx:
                                (Variable
                                    2
                                    idx
                                    []
                                    Local
                                    (IntegerConstant 1 (Integer 4) Decimal)
                                    (IntegerConstant 1 (Integer 4) Decimal)
                                    Save
                                    (Integer 4)
                                    ()
                                    Source
                                    Public
                                    Required
                                    .false.
                                    .false.
                                ),
                            queries:
                                (Variable
                                    2
                                    queries
                                    []
                                    Local
                                    ()
                                    ()
                                    Default
                                    (CPtr)
                                    ()
                                    Source
                                    Public
                                    Required
                                    .false.
                                    .false.
                                ),
                            x:
                                (Variable
                                    2
                                    x
                                    []
                                    Local
                                    ()
                                    ()
                                    Default
                                    (Pointer
                                        (Integer 2)
                                    )
                                    ()
                                    Source
                                    Public
                                    Required
                                    .false.
                                    .false.
                                ),
                            y:
                                (Variable
                                    2
                                    y
                                    []
                                    Local
                                    ()
                                    ()
                                    Default
                                    (Integer 2)
                                    ()
                                    Source
                                    Public
                                    Required
                                    .false.
                                    .true.
                                )
                        })
                    bindc3
                    [iso_c_binding]
                    [(CPtrToPointer
                        (Var 2 queries)
                        (Var 2 x)
                        ()
                        ()
                    )
                    (Print
                        (StringFormat
                            ()
                            [(PointerToCPtr
                                (Var 2 x)
                                (CPtr)
                                ()
                            )
                            (Var 2 queries)]
                            FormatFortran
                            (String -1 0 () PointerString)
                            ()
                        )
                    )
                    (Associate
                        (Var 2 x)
                        (Var 2 y)
                    )
                    (Print
                        (StringFormat
                            ()
                            [(PointerToCPtr
                                (Var 2 x)
                                (CPtr)
                                ()
                            )
                            (PointerToCPtr
                                (GetPointer
                                    (Var 2 y)
                                    (Pointer
                                        (Integer 2)
                                    )
                                    ()
                                )
                                (CPtr)
                                ()
                            )]
                            FormatFortran
                            (String -1 0 () PointerString)
                            ()
                        )
                    )]
                ),
            iso_c_binding:
                (IntrinsicModule lfortran_intrinsic_iso_c_binding)
        })
    []
)
