НазадВперед Содержание

Интерфейс с языком Фортран

Подпрограммы и функции, написанные на Фортране, могут быть вызваны из программы, написанной на языке Норма, при помощи обычных средств вызова разделов и обращения к функциям. При этом осуществляется контроль переприсваивания при анализе фактических параметров. Например Фортран-подпрограмма

DOUBLE PRECISION FUNCTION FortBOUND(k1,k2)
DOUBLE PRECISION pi,k1,k2
pi=3.1415
FortBOUND=SIN(pi*k1/k2)
RETURN
END

может быть вызвана взамен функции BOUND в программе Parabol:

EXTERNAL FUNCTION FortBOUND DOUBLE.
FOR Wxt/j=0 ASSUME u=FortBOUND(i,M).