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

[certik]

And use the ArraySize intrinsic.

[certik]

Also shape()

[czgdp1807]

Next on my TODO list (after https://github.com/lfortran/lfortran/issues/1210).

[faze-geek]

numpy.size() has already been completed in this #1777 .

Also shape()

I can try to add this. But for shape we would need another intrinsic like ArrayShape right?

[certik]

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
                            )
                        )]
                        ()
                        ()
                    )]