Maple в инженерных расчетах. Коптев А.А - 44 стр.

UptoLike

> g:=x->sin(x)+cos(x);
:=
g
x
+ ()sin
x
()cos
x
Вычислим значения f(x) и g(x) в точке x=0,5:
> f(0.5);
1.357008100
> g(0.5);
1.357008100
Проверим эквивалентность f(x) и g(x):
> evalb(f(x)=g(x));
true
Такую форму процедуры иногда называют процедура-функция. Следующий пример демонстрирует
процедуру-функцию с двумя параметрами.
> z:=(x,y)->x^2+y^2;
:= z
(),xy
+ x
2
y
2
> z(1.2,3.5);
13.69
Процедура функция может не иметь параметров, но при ее вызове обязательно сохраняется пара
скобок.
> e:=()->evalf(exp(1));
:= e
() ( )evalf e
> e;
e
> e();
2.718281828
> ln(e());
0.9999999998
> ln(exp(1));
1
Функция unapply используется для конструирования функций из выражений.
> p := x^2 + sin(x) + 1;
:= p
+
+ x
2
()sin x 1
> f := unapply(p,x);
:= f
x
+
+ x
2
()sin x 1
> f(Pi/12);
+ +
π
2
144
sin
π
12
1
Для задания кусочной функции в Maple имеется специальное средствофункция piecewise, которая
имеет следующие параметры:
piecewise(интервал_1, выражение_1, интервал_2, выражение_2, ...,
интервал_n, выражение_n [, выражение])
Последнее необязательное выражение задает функцию для неохваченных интервалов.
> p :=x-> piecewise(x<0,-x,x>0,x);
:= p
x
()piecewise , , ,
<
x
0
x
< 0
x
x
> plot(p(x),x=-1..1,scaling=constrained);