9.242 SIZE — Определение размера массива

Описание:

Определяет размер ARRAY по указанному измерению DIM или общее число элементов в ARRAY, если DIM отсутствует.

Стандарт:

Fortran 95 и более поздние версии, с аргументом KIND Fortran 2003 и более поздние версии

Класс:

Функция запроса

Синтаксис:

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

Аргументы:

ARRAY	Должен быть массивом любого типа. Если ARRAY является указателем, он должен быть ассоциирован, а распределяемые массивы должны быть распределены.
DIM	(Необязательно) должен быть скаляром типа INTEGER и его значение должно быть в диапазоне от 1 до n, где n равно рангу ARRAY.
KIND	(Необязательно) выражение инициализации INTEGER, указывающее параметр вида результата.

Возвращаемое значение:

Возвращаемое значение имеет тип INTEGER и вид KIND. Если KIND отсутствует, возвращаемое значение имеет стандартный целочисленный вид.

Пример:

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

См. также:

SHAPE, RESHAPE