Генерация кодов на языке Фортран

Язык Фортран вот уже многие десятилетия используется для программирования вычислительных задач. Накоплены обширные библиотеки решения таких задач на Фортране. Почитателей этого языка Maple 7 порадует тем, что она позволяет готовить коды для программ на Фортране. Для этого вначале надо загрузить библиотечную функцию:

> with(codegen.fortran); 

[fortran ]

 После этого может использоваться функция fortran:

fortran(expr.filename=str.optimized)

Два последних параметра не обязательны при выводе выражения ехрr в форме, присущей языку Фортран:

> fortran(a*x*2+b*x+c);

t0 = a*x**2+b*x+c 

> fortran(diff(x"n,x$2));

t0 = x**n*n**2/x**2-x**n*n/x**2

Параметр optimize позволяет генерировать оптимизированные коды:

> fortran(a*x*2+b*x+c.optimized);

 t1 = x**2 t4 = a*tl+b*x+c

При этом вычислительный процесс строится так, чтобы минимизировать число арифметических операций.