Use the Shape IntrinsicArrayFunction. Here is how LFortran does it:

integer(8) :: x(2, 2)
print*, shape(x)
end

It gives:

                    [(Print
                        [(IntrinsicArrayFunction
                            Shape
                            [(ArrayPhysicalCast
                                (Var 2 x)
                                FixedSizeArray
                                DescriptorArray
                                (Array
                                    (Integer 8)
                                    [((IntegerConstant 1 (Integer 4))
                                    (IntegerConstant 2 (Integer 4)))
                                    ((IntegerConstant 1 (Integer 4))
                                    (IntegerConstant 2 (Integer 4)))]
                                    DescriptorArray
                                )
                                ()
                            )]
                            0
                            (Array
                                (Integer 4)
                                [((IntegerConstant 1 (Integer 4))
                                (IntegerConstant 2 (Integer 4)))]
                                FixedSizeArray
                            )
                            (ArrayConstant
                                [(IntegerConstant 2 (Integer 4))
                                (IntegerConstant 2 (Integer 4))]
                                (Array
                                    (Integer 4)
                                    [((IntegerConstant 1 (Integer 4))
                                    (IntegerConstant 2 (Integer 4)))]
                                    FixedSizeArray
                                )
                                ColMajor
                            )
                        )]
                        ()
                        ()
                    )]

Implement numpy.size() and numpy.shape() #1457

Description

Metadata

Metadata

Assignees

Labels

Type

Projects

Milestone

Relationships

Development

Issue actions