Таблица
4.8 .
Встроенные подпрограммы
| Имя подпрограммы
|
Возвращаемое значение или производимое действие
|
| ABS(A) |
Абсолютная величина |
| ACHAR(I) |
I-ый символ сортирующей последовательности ASCII
|
| ACOS(X) |
Арккосинус в радианах |
| AIMAG(Z) |
Мнимая часть комплексного числа |
| AINT(A[, KIND]) |
Усечение до целого |
| ALLOCATED(ARRAY) |
Проверка выделенности динамического массива
|
| ANINT(A [, KIND]) |
Ближайшее целое |
| ASIN(X) |
Арксинус в радианах |
| ATAN(X) |
Арктангенс в радианах |
| ATAN2(Y, X) |
Аргумент комплексного числа |
| CALL DATE_AND_TIME([DATE][,TIME] [,ZONE] [,VALUES]) |
Считывание времени и даты с часов реального времени |
| CALL RANDOM_NUMBER(HARVEST) |
Случайное число в интервале [0,1) |
| CALL RANDOM_SEED([SIZE] [,PUT][,GET]) |
Получение/назначение затравочного массива |
| CALL SYSTEM_CLOCK([COUNT] [,COUNT_RATE] [,COUNT_MAX]) |
Целочисленный отсчет часов реального времени |
| CEILING(A) |
Наименьшее целое не меньшее аргумента |
| CHAR(I [, KIND]) и ICHAR(C) |
I-ый символ в сортирующей последовательности процессора |
| CMPLX(X [, Y] [, KIND]) |
Конструктор комплексного числа |
| CONJG(Z) |
Комплексное сопряжение |
| COS(X) |
Косинус |
| COSH(X) |
Гиперболический косинус |
| COUNT(MASK [, DIM]) |
Число элементов массива, имеющих значение "истина" |
| CSHIFT(ARRAY, SHIFT [, DIM]) |
Циклический сдвиг элементов массива |
| DIGITS(X) |
Число значащих цифр в модели представления аргумента |
| DOT_PRODUCT(VECTOR_A, VECTOR_B) |
Скалярное произведение векторов
|
| DPROD(X, Y) |
Умножение с двойной точностью |
| EOSHIFT(ARRAY, SHIFT [, BOUNDARY] [, DIM] ) |
Вытесняющий сдвиг элементов массива |
| EPSILON(X) |
Наименьшее число в модели представления аргумента, не пренебрежимое по сравнению с единицей |
| EXP(X) |
Экспонента |
| EXPONENT(X) |
Степенная часть в модели представления аргумента |
| FLOOR(A) |
Наименьшее целое, не превышающее аргумент |
| FRACTION(X) |
Дробная часть в модели представления аргумента |
| HUGE(X) |
Наибольшее число в модели представления аргумента |
| IACHAR(С) |
Индекс символа-аргумента в сортирующей последовательности ASCII
|
| IAND(I, J) |
Побитовое логическое И |
| IBCLR(I, POS) |
Установка нуля в заданном бите |
| IBITS(I, POS, LEN) |
Извлечение цепочки битов |
| IBSET(I, POS) |
Установка единицы в заданном бите |
| ICHAR(C) |
Индекс символа-аргумента в сортирующей последовательности процессора |
| IEOR(I, J) |
Побитовое ИСКЛЮЧАЮЩЕЕ ИЛИ |
| INDEX(STRING, SUBSTRING [,BACK]) |
Индекс начала подстроки в строке |
| INT(A [, KIND]) |
Приведение к целому типу |
| IOR(I, J) |
Побитовое логическое ИЛИ |
| ISHIFT(I, SHIFT) |
Логический сдвиг битов |
| ISHIFTC(I, SHIFT [, SIZE]) |
Логический циклический сдвиг части битов вправо |
| KIND(X) |
Разновидность типа аргумента |
| LBOUND(ARRAY [, DIM]) |
Нижняя граница массива |
| LEN(S) |
Длина текстового аргумента |
| LEN_TRIM(STRING) |
Длина строки без учета конечных пробелов |
| LOG(X) |
Натуральный логарифм |
| LOG10(X) |
Десятичный логарифм |
| LOGICAL(L [, KIND]) |
Приведение к заданной разновидности логического типа |
| MATMUL(MATRIX_A, MATRIX_B) |
Перемножение матриц
|
| MAX (A1, A2 [, A3, ]) |
Выбор максимального аргумента |
| MAXLOC(ARRAY [, MASK]) |
Индекс наибольшего элемента массива |
| MAXVAL(ARRAY [, DIM ] [,MASK]) |
Наибольший элемент массива |
| MIN (A1, A2 [, A3, ]) |
Выбор минимального аргумента |
| MINLOC(ARRAY [, MASK]) |
Индекс наименьшего элемента массива |
| MINVAL(ARRAY [, DIM ] [,MASK]) |
Наименьший элемент массива |
| MOD(A, P) |
Остаток от деления по модулю |
| MODULO(A, P) |
Деление по модулю |
| NINT(A [, KIND]) |
Ближайшее целое |
| NOT(I) |
Побитовое логическое дополнение |
| PRECISION(X) |
Десятичная точность в модели представления аргумента |
| PRESENT(A) |
Проверка присутствия необязательного аргумента |
| PRODUCT(ARRAY [, DIM] [,MASK]) |
Произведение элементов массива |
| REAL(A [, KIND]) |
Приведение к вещественному типу |
| RESHAPE(SOURCE, SHAPE [,PAD] [, ORDER]) |
Изменение формы массива |
| SCAN(STRING,SET[,BACK]) |
Индекс крайнего символа строки STRING в наборе SET
|
| SELECTED_INT_KIND(R) |
Параметр разновидности целого типа для заданного степенного диапазона |
| SELECTED_REAL_KIND([P][,R]) |
Параметр разновидности вещественного типа для заданной точности и/или заданного степенного диапазона |
| SHAPE(SOURCE) |
Форма аргумента |
| SIGN(A, B) |
Абсолютное значение A со знаком B
|
| SIN(X) |
Синус |
| SINH(X) |
Гиперболический синус |
| SIZE(ARRAY[,DIM]) |
Размер массива |
| SQRT(X) |
Квадратный корень |
| SUM(ARRAY[,DIM][,MASK]) |
Сумма элементов массива
|
| TAN(X) |
Тангенс |
| TANH(X) |
Гиперболический тангенс |
| TINY(X) |
Наименьшее положительное число в модели представления аргумента |
| TRANSPOSE(MATRIX) |
Транспонирование матрицы |
| UBOUND(ARRAY [, DIM]) |
Верхняя граница массива |
