(TranslationUnit
    (SymbolTable
        1
        {
            intrinsics_12:
                (Program
                    (SymbolTable
                        2
                        {
                            
                        })
                    intrinsics_12
                    []
                    [(Print
                        (StringFormat
                            ()
                            [(TypeInquiry
                                Kind
                                (Integer 4)
                                (IntegerConstant 5 (Integer 4) Decimal)
                                (Integer 4)
                                (IntegerConstant 4 (Integer 4) Decimal)
                            )]
                            FormatFortran
                            (Allocatable
                                (String 1 () DeferredLength DescriptorString)
                            )
                            ()
                        )
                    )
                    (Print
                        (StringFormat
                            ()
                            [(TypeInquiry
                                Kind
                                (Integer 4)
                                (IntegerConstant 5 (Integer 4) Decimal)
                                (Integer 4)
                                (IntegerConstant 4 (Integer 4) Decimal)
                            )]
                            FormatFortran
                            (Allocatable
                                (String 1 () DeferredLength DescriptorString)
                            )
                            ()
                        )
                    )
                    (Print
                        (StringFormat
                            ()
                            [(TypeInquiry
                                Kind
                                (Integer 8)
                                (IntegerConstant 5 (Integer 8) Decimal)
                                (Integer 4)
                                (IntegerConstant 8 (Integer 4) Decimal)
                            )]
                            FormatFortran
                            (Allocatable
                                (String 1 () DeferredLength DescriptorString)
                            )
                            ()
                        )
                    )
                    (Print
                        (StringFormat
                            ()
                            [(TypeInquiry
                                Kind
                                (Real 8)
                                (RealConstant
                                    0.000000
                                    (Real 8)
                                )
                                (Integer 4)
                                (IntegerConstant 8 (Integer 4) Decimal)
                            )]
                            FormatFortran
                            (Allocatable
                                (String 1 () DeferredLength DescriptorString)
                            )
                            ()
                        )
                    )
                    (Print
                        (StringFormat
                            ()
                            [(TypeInquiry
                                Kind
                                (Real 4)
                                (RealConstant
                                    0.000000
                                    (Real 4)
                                )
                                (Integer 4)
                                (IntegerConstant 4 (Integer 4) Decimal)
                            )]
                            FormatFortran
                            (Allocatable
                                (String 1 () DeferredLength DescriptorString)
                            )
                            ()
                        )
                    )
                    (Print
                        (StringFormat
                            ()
                            [(TypeInquiry
                                Kind
                                (Real 4)
                                (RealConstant
                                    5.000000
                                    (Real 4)
                                )
                                (Integer 4)
                                (IntegerConstant 4 (Integer 4) Decimal)
                            )]
                            FormatFortran
                            (Allocatable
                                (String 1 () DeferredLength DescriptorString)
                            )
                            ()
                        )
                    )
                    (Print
                        (StringFormat
                            ()
                            [(TypeInquiry
                                Kind
                                (Real 8)
                                (RealConstant
                                    5.000000
                                    (Real 8)
                                )
                                (Integer 4)
                                (IntegerConstant 8 (Integer 4) Decimal)
                            )]
                            FormatFortran
                            (Allocatable
                                (String 1 () DeferredLength DescriptorString)
                            )
                            ()
                        )
                    )
                    (Print
                        (StringFormat
                            ()
                            [(TypeInquiry
                                Kind
                                (Logical 4)
                                (LogicalConstant
                                    .true.
                                    (Logical 4)
                                )
                                (Integer 4)
                                (IntegerConstant 4 (Integer 4) Decimal)
                            )]
                            FormatFortran
                            (Allocatable
                                (String 1 () DeferredLength DescriptorString)
                            )
                            ()
                        )
                    )]
                )
        })
    []
)
