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

Язык программирования системы Maple 1057 14.2.12. Создание своей библиотеки процедур Если приведенные выше примеры составления процедур кажутся вам простыми, значит, вы неплохо знаете программирование и, скорее всего, уже имеете несколь ко полезных процедур, которые вы хотели бы сохранить – если не для потомков, то хотя бы для своей повседневной работы. Сделать это в Maple довольно просто. Прежде всего надо определить имя своей библиотеки, например mylib, и со здать для нее на диске каталог (папку) с заданным именем. Процедуры в Maple ассоциируются с таблицами. Поэтому вначале надо задать таблицу пустышку под будущие процедуры: > restart; > mylib:=table(); mylib := table([]) Теперь надо ввести свои библиотечные процедуры. Они задаются с двойным именем – вначале указывается имя библиотеки, а затем в квадратных скобках имя процедуры. Для примера зададим три простые процедуры с именами f1, f2 и f3: > mylib[f1]:=proc(x::anything) sin(x)+cos(x) end: > mylib[f2]:=proc(x::anything) sin(x)^2+cos(x)^2 end: > mylib[f3]:=proc(x::anything) if x=0 then 1 else sin(x)/x fi end: Рекомендуется тщательно проверить работу процедур, прежде чем записывать их на диск. Ограничимся, скажем, такими контрольными примерами: > mylib[f1](x); sin(x) + cos(x) > mylib[f1](1.); 1.381773291 > mylib[f2](x); sin(x)2 + cos(x)2 > simplify(mylib[f2](x)); 1 > evalf(mylib[f3](x)); > sin(0)/0; Error, division by zero > mylib[f3](0); 1