Next: SIZEOF, Previous: SINH, Up: Intrinsic Procedures

`SIZE`

— Determine the size of an array*Description*:- Determine the extent of
`ARRAY`along a specified dimension`DIM`, or the total number of elements in`ARRAY`if`DIM`is absent. *Standard*:- Fortran 95 and later, with
`KIND`argument Fortran 2003 and later *Class*:- Inquiry function
*Syntax*:`RESULT = SIZE(ARRAY[, DIM [, KIND]])`

*Arguments*:-
`ARRAY`Shall be an array of any type. If `ARRAY`is a pointer it must be associated and allocatable arrays must be allocated.`DIM`(Optional) shall be a scalar of type `INTEGER`

and its value shall be in the range from 1 to n, where n equals the rank of`ARRAY`.`KIND`(Optional) An `INTEGER`

initialization expression indicating the kind parameter of the result. *Return value*:- The return value is of type
`INTEGER`

and of kind`KIND`. If`KIND`is absent, the return value is of default integer kind. *Example*:-
PROGRAM test_size WRITE(*,*) SIZE((/ 1, 2 /)) ! 2 END PROGRAM

*See also*:- SHAPE, RESHAPE