* Данный текст распознан в автоматическом режиме, поэтому может содержать ошибки

160 Типы данных и работа с ними 2.9.2. Вывод на языке Фортран Язык Фортран вот уже многие десятилетия используется для программирования вычислительных задач. Накоплены обширные библиотеки решения таких задач на Фортране. Почитателей этого языка Maple порадует тем, что он позволяет го товить коды для программ на Фортране. Для этого вначале надо загрузить биб лиотечную функцию: > with(codegen,fortran); [fortran] После этого может использоваться функция fortran: fortran(expr,filename=str,optimized) Два последних параметра не обязательны при выводе выражения expr в фор ме, присущей языку Фортран: > 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*t1+b*x+c При этом вычислительный процесс строится так, чтобы минимизировать чис ло арифметических операций. 2.9.3. Вывод на языке C Язык C (Си) также широко используется для решения вычислительных задач. Достаточно отметить, что сама система Maple создана на языке C. Для вывода на языке C вначале надо подключить соответствующую функцию: > with(codegen,C); [C] Затем можно использовать функцию C: C(expr,folename=str,optimized) Например: > C(diff(x^b,x$2)); t0 = pow(x,1.0*b)*b*b/(x*x)-pow(x,1.0*b)*b/(x*x); > C(diff(x^b,x$2),optimized); t1 = pow(x,1.0*b); t2 = b*b; t4 = x*x; t5 = 1/t4; t9 = t1*t2*t5-t1*b*t5;