Рубрики: КОМПЬЮТЕРНАЯ ЛИТЕРАТУРА

про компютерное железо, документация, языки программирования

Фортран. Вce типы oпepaтopoв, coдepжaщиxcя в MC-Фортране.

КОМПЬЮТЕРНАЯ ЛИТЕРАТУРА

LIB.com.ua [электронная библиотека]: : ФОРТРАН — B этoй глaвe oпиcaны вce типы oпepaтopoв, coдepжaщиxcя в MC-Фортране, в oбщeпpинятыx тepминax.

логического массива. Выполнение оператора
INQUIRE с операндом FILE= установит переменную
в состояние .TRUE., если указанный файл суще-
ствует, или в состояние .FALSE. если указанного
файла нет.
Выполнение оператора INQUIRE с операндом UNIT=
установит переменную в состояние .TRUE. если
указанное устройство есть или в состояние
.FALSE. в противном случае.
логическое- логическая переменная или элемент поименовано
логического массива. Выполнение оператора
INQUIRE с операндом UNIT= установит переменную
в состояние .TRUE. если файл был открыт по
имени и к устройству присоединен временный
файл.
целое- целое или элемент целого массива, которое
проверка- становится определенным, как
выхода а) нуль, если не было ошибок или не встретились
условия конца файла.
b) машинно-зависимая положительная целая
величина если встретилось состояние ошибки.
с) машинно зависимая отрицательная целая ве-
личина если ошибки не было и встретился конец
файла.
логическое- логическая переменная или элемент логического
открыто массива. В проверке по файлу устанавливается
.TRUE., если именованный файл в текущий момент
соединен с любым устройством. В противном слу-
чае устанавливается .FALSE. В проверке по уст-
ройству устанавливается .TRUE., если для дан-
ного устройства открыт любой файл, в противном
случае — .FALSE.
целое-что- целая переменная или элемент целого массива.
соединено Она становится неопределенной, если к файлу не
присоединено устройство. Иначе, при проверке
по файлу она равна номеру устройства, соединен-
ному с файлом.
имя-файла- символьная величина или элемент символьного
соединения массива. При проверке устройства в нее засы-
лается имя файла. Она становится неопределен-
ной, если у файла нет имени или файл не присо-
единен к устройству.
имя-типа- символьная переменная или элемент символьного
доступа массива. Присваивается значение ‘SEQUENTAL’,
если присоединен файл последовательного дос-
тупа, и -‘DIRECT’, если присоединен файл пря-
мого доступа.
Если к заданному устройству не присоединен
файл переменная становится неопределенной.
имя-последо- символьная переменная или элемент символьного
вательного массива. Устанавливается ‘YES’, если среди
набора допустимых режимов доступа к присоедине-
нному файлу есть последовательный. В противном
случае — ‘NO’ или ‘UNKNOWN’.
имя-прямого символьная переменная или элемент символьного
массива. Устанавливается ‘YES’, если среди
набора допустимых режимов доступа к присоеди-
ненному файлу есть прямой. В противном случае —
‘NO’ или ‘UNKNOWN’.

имя-формата символьная переменная или элемент символьного
массива, которой присваивается FORMATTED’ если
присоединен файл для форматного ввода/вывода
и — ‘UNFORMATTED’ в противном случае.
имя-формати- символьная переменная или элемент символьного
рованного массива, которой присваивается ‘YES’, если
среди набора допустимых видов файла есть фор-
матный, и — ‘NO’ или ‘UNKNOWN’ в противном
случае.
имя-неформати- символьная переменная или элемент символьного
рованного массива, которой присваивается ‘YES’, если
среди набора допустимых видов файла есть не-
форматный и — ‘NO’ или ‘UNKNOWN’ в противном
случае.
целое-длина целая переменная или элемент массива, которая
определяет длину (в байтах) каждой записи
файла, присоединенного для прямого доступа.
Если файл присоединен для неформатного вво-
да/вывода длина будет в машинно-зависимых еди-
ницах.
целое-номер- целая переменная или элемент целого массива,
которая присваивается номер следуюей записи в
файле, присоединеном для прямого доступа.
Первая запись в таком файле имеет номер 1.
имя-пробела символьная переменная или элемент символьного
массива, которой присваивается значение ‘NULL’
если действует редактирующий описатель BN или
значение ‘ZERO’если действует BZ.
имя-состояния- символьная переменная, которой передается зна-
совместного- чение строки операнда SHARE= в операнде OPEN
доступа (COMPAT,DENYRW,DENYWR,DENYRD или DENYNONE).
Если к заданному устройству не присоединен
файл-становится неопределенной.
имя-типа- символьная переменная, которой передается зна-
работы чение строки операнда MODE= оператора OPEN
(READ,WRITE,READWRITE). Если к заданному уст-

ройству не присоединен файл становится неопре-
деленной.

Особенности.
Оператор INQUIRE может быть выполнен в любой момент. Возвра-
щаемые им величины соответствуют моменту обращения.
Элементы в списке описателей/назначений могут следовать в
любом порядке.

ЬДДДДДДДДДДДДДДДДДДДД
Ы INTERFACE
ЯДДДДДДДДДДДДДДДДДДДД

Позволяет связь с процедурами, написанными на других языках.
Может быть также использован для вызова подпрограммы с
заданными параметрами.
ДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДД
INTERFACE TO оператор подпрограммы
ДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДД
Где оператор подпрограммы — это оператор FUNCTION или
SUBROUTINE

Особенности.
Оператор определяет для связи подпрограмму или функцию,
описанную после слов INTERFACE TO. Оператор подпрограммы или фун-
кции имеет обычный синтаксис. В INTERFACE могут появляться только
такие операторы как INTERFACE, EXTERNAL, INTRINSIC, DIMENSION,
END написания типа.

Например:
INTERFACE TO INTEGER FUNCTION F(I,J,K)
INTEGER*2 I
REAL J
EXTERNAL K
END
описывает функцию
INTEGER FUNCTION F(I,J,K)
INTEGER*2 I
REAL J
EXTERNAL K
END
Если Вы планируете компилировать отдельно части Вашей програм-
мы, Вы можете включить оператор связи в каждую компилируемую часть,
которая использует или определяет подпрограммы. Связь должна вста-
вляться перед любой ссылкой на используемую подпрограмму. Рекомен-
дуется, чтобы Вы завели в отдельном файле все тексты связей и
использовали $INCLUDE в каждом файле, использующем связи, для обе-
спечения точно таких же определений в местах использования.
Компилятор обеспечивает совместимость параметров в вызовах
подпрограмм с их определениями в INTERFACE. Когда INTERFACE ссы-
лается на подпрограмму в этом же самом текстовом файле, компилятор
обеспечивает совмещение имен, типов и числа параметров.
Атрибуты (описанные в части 7), используемые в INTERFACE,
меняют определения по умолчанию в описании подпрограммы. Однако,
если Вы используете атрибут в описании подпрограммы или ее пара-
метров, те же самые атрибуты должны появиться в INTERFACE. Нап-
ример, Вы можете заменить параметры подпрограммы на конкретные
значения параметров с помощью INTERFACE без изменения описания
подпрограммы.

ЬДДДДДДДДДДДДДДДД
Ы INTRINSIC
ЯДДДДДДДДДДДДДДДД

Объявляет, что имя является именем встроенной функции.
ДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДД
INTRINSIC имя1[,имя2]…
ДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДД
Где имя — это имя встроенной функции.

Особенности.
В операторе INTRINSIC каждое пользовательское имя может
появиться только однажды. Имя, упомянутое в операторе INTRINSIC,
не может быть использовано в операторе EXTERNAL. Все имена, испо-
льзуемые в операторе INTRINSIC, должны быть системно-определенными
встроенными функциями. Список этих функций приведен в таблице 5-1
в части 5.
Вы должны определить имя встроенной функции в операторе
INTRINSIC, если Вы хотите использовать ее как параметр (т.е. как
фактический параметр в программной единице).
Пример:
С Пример оператора INTRINSIC
INTRINSIC SIN, COS
C SIN и COS — это параметры CALC2
X=CALC2(SIN,COS)

ЬДДДДДДДДДДДДДДДДДДДД
Ы LOCKING
ЯДДДДДДДДДДДДДДДДДДДД

Закрывает файлы и записи прямого доступа
ДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДД
LOCKING ([UNIT=]устройство,[REC=номер-записи,]
[RECORDS=число-записей,][LOCKMODE=’режим’,]

Страницы: 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15