Добавил:
Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:

Fortran для персонального компьютера

..pdf
Скачиваний:
22
Добавлен:
15.11.2022
Размер:
12.5 Mб
Скачать

ALLOCATED EPSILON

LEN TRIM

MIN

AMAXO

FLOAT

LGE

MINO

AMAX1

HF1X

LGT

MINI

AMINO

HUGE

LLE

MINEXPONENT

AMIN1

ICHAR

LLT

NEAREST

CHAR

IDINT

LOC

PRECISION

CMPLX

IFIX

LOCFAR

REAL

DBLE

IMAG

LOCNEAR

SCAN

DCMPLX

INTI

LOG

SNGL

DFLOAT

INT2

LOG 10

TINY

DMAX1

INT4

MAX

VERIFY

DMIN1

INTC

MAXO

 

DREAL

INT

MAXI

 

EOF

JFIX

MAXEXPONENT

 

В языке ФОРТРАН фирмы Microsoft реализовано не­ сколько встроенных функции,длина имен которых превышает шесть символов: ALLOCATED, EPSILON, LEN TRIM, LOCNEAR, MAXEXPONENT, MINEXPONENT, NEAREST, PRECISION. Если разрешена метакоманда $TRUNCATE, то компилятор рассматривает каждое имя функции с аналогич­ ными первыми шестью символами как встроенные функции.

Втабл.5.2 объясняются все сокращения, используемые во всех последующих таблицах описания встроенных функ­ ций.

Впоследующих подразделах приводится детальное опи­ сание встроенных функций ФОРТРАНА версии 5.0 фирмы

Microsoft. Для некоторых классов встроенных функций под­ робное описание не приводится, а интересующийся читатель может найти его в литературе по более ранним версиям языка.

5.2.1Функции преобразование типов данных

В таблице 5.3 описываются встроенные функции преоб­ разования типов данных.

Список используемых сокращений приведен в табл.5.2. Горизонтальные линии в таблице 5.3 делят встроенные функции на подклассы, первый из которых соответствует пре­ образованиям к целому типу, второй — вещественному, тре­

тий— комплексному, а .

• четвертый соответствует функциям

преобразования символов.

Функция INT, преобразует параметр к типу целый. Ес­ ли параметр gen имеет тип целый, то INT( gen ) равно gen. Если gen вещественный, то INT ( gen ) равно усеченному значению [gen ]. Если gen имеет тип комплексный, то сначала

В табл.5.9 перечислены функции, возвращающие в ка­ честве результатов максимальное или минимальное значение из двух или более значений.

Таблица 5.9 Максимумы и минимумы

 

Имя

Тип

Тип функции I

 

параметра

совпадает с

|

MAX(genA,genB [,genC ]...)

int или real

•MAXO(intA,intB[,intC ].„)

 

параметром

|

ini

int

 

АМАХ1 (real4A,real4B [,real4C ]...)

REAL*4

REALM

 

AMAXO(intA,intB[,intC ]...)

ini

REALM

 

MAXI (real4A,real4B[,real4C ]...)

REALM

int

 

DMAX1 (dblA,dblB[,db1C 1...)

REALM

REALM

 

MIN (genA,genB [,genC 1...)

int или real

совпадает с

 

 

 

параметром

 

MIN0(intA,intB [,intC ]...)

int

int

 

AMIN1 (real4A,real4B[,real4C ]...)

REAL*4

REALM

 

AMINO(intA,intB[,intC ]...)

int

REALM

 

MINI (real4A,real4B[,rcal4C ]...)

REALM

int

 

DMIN1 (db!A,dblB[,dblC ]...)

REALM

REALM

 

МАХ, МАХО, АМАХ1 и DMAX1 возвращают минималь­ ное значение из списка параметров.

АМАХО и МАХ1 возвращают максимальное значение и, кроме того, выполняют преобразование типов.

MIN, MINO, AMlNl и DMIN1 возвращают минималь­ ные значения.

AMINO и MINI возвращают минимальные значения и выполняют преобразование типов.

5.2.8Произведения с двойной точностью

В табл.5.10 указана встроенная функция, которая воз­ вращает произведение (результат операции умножения) с двойной точностью.

Таблица 5.10 Произведение с двойной точностью

Имя

Тип параметра

TипФункции

DPROD (rea!4A,rcal4B)

REALM

R EAL*8

DPROD в качестве результата возвращает произведе­ ниедвойной точности двух вещественных параметров содина­ рной точностью.

7 Заказ №J,0fc

97

Имя

Tип параметра

Тип функции

SQRT(gen)

real или emp

совпадает с параметром

DSQRT(dbl)

REAL*8

REAL*8

CSQRT (cmp8)

COMPLEX*8

COMPLEX*8

CDSQRT(cmpl6

COMPLEX*! 6

COMPLEX*16

EXP (gen)

real или emp

совпадает с параметром

DEXP(dbl)

REAL*8

REAL*8

CEXP (cmp8)

COMPLEX*8

COMPLEX*8

CDEXP(cmpl6)

COMPLEX*16

COMPLEX*16

LOG(gen)

real или emp

совпадает с параметром

ALOG (rcal4)

REALM

REAL*4

DLOG(dbl)

REAL*8

REAL*8

CLOG(cmp8)

COMPLEX*8

COMPLEX*8

CDLOG(cmpl6)

COMPLEXM6

COMPLEX*16

LOG 10(real)

real или emp

совпадает с параметром

ALOG10(real4)

REALM

REAL*4

DLOGlO(dbl)

REAL*8

REAL*8

функции CLOG есть л, только тогда, когда действительная часть параметра меньше 0 и мнимая часть параметра равна 0.

5.2.11Тригонометрические функции

Тригонометрические функции перечислены втабл.5.13. Значения углов, используемых во встроенных тригоно­

метрических функциях, задаются в радианах. Отметим"ограничения параметров и результатов вычи­

сления встроенных тригонометрических функций.

SIN, DSIN, СОо, DCOS не имеют ограничений для пара­ метров. Диапазон результатов, возвращаемых этими функ­ циями - вещественные числа по модулю не превышающие 1.

TAN, DTAN не имеют ограничений для параметров. Диапазон результатов - все вещественные числа.

ASIN, DASIN в качестве аргумента должны иметь число

помодулю не превышающее 1. Результат по модулю не превы­ шает значение л/ 2 .

ACOS, DACOS должны иметь параметр по модулю не превышающий 1, а результат в интервале от 0 до л.

ATAN, DATAN "ограничений параметра не имеют, ре­ зультат по модулю не превышает л/2.

ATAN2, DATANz не допускают одновременного равен­ ства 0 обоих параметров, результат по модулю не превышает

Я.