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

Описание:

Определяет размер МАССИВ по указанному измерению РАЗМЕР, или общее количество элементов в МАССИВ, если РАЗМЕР отсутствует.

Стандарт:

Fortran 90 и выше, с аргументом KIND Fortran 2003 и выше

Класс:

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

Синтаксис:

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

Аргументы:

`МАССИВ`	Должен быть массивом любого типа. Если `МАССИВ` является указателем, он должен быть связан, а массивы, которые являются распределяемыми, должны быть распределены.
`РАЗМЕР`	(Необязательно) должен быть скаляром типа `INTEGER` и его значение должно находиться в диапазоне от 1 до n, где n равно рангу `МАССИВ`.
`KIND`	(Необязательно) Скалярное `INTEGER` константное выражение, указывающее параметр рода результата.

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

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

Пример:

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

См. также:

© Free Software Foundation
Licensed under the GNU Free Documentation License, Version 1.3.
https://gcc.gnu.org/onlinedocs/gcc-14.2.0/gfortran/SIZE.html