SIZE — Determine the size of an array#

SIZE(ARRAY, DIM, KIND)#

Determine the extent of ARRAY along a specified dimension DIM, or the total number of elements in ARRAY if DIM is absent.

Parameters

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.

Returns

The return value is of type INTEGER and of kind KIND. If KIND is absent, the return value is of default integer kind.

Standard:

Fortran 90 and later, with KIND argument Fortran 2003 and later

Class:

Inquiry function

Syntax:

RESULT = SIZE(ARRAY[, DIM [, KIND]])

Example:

PROGRAM test_size
  WRITE(*,*) SIZE((/ 1, 2 /))    ! 2
END PROGRAM