Maple Функция sin при подстановках ведет себя странно

[Andrei P]

Combat Zone в сообщении #1723947 писал(а):

Ладно, исхожу из того что m вы уже ввели и alpha0 тоже.
Напишите, пожалуйста, здесь в коде какие они. (Подсветку синтакиса можно выбрать просто текстовую).

Andrei P в сообщении #1723946 писал(а):

Опечаток не было, это перевод на LaTeX/

Этот момент мы выяснили, так не делают, для этого и существует подсветка синтаксиса.

То есть у вас есть некая величина

Используется синтаксис Text

Sval:=sin(alpha0)*(1+m)

Если вам нужно в символьном расчете заменить sin(alpha) на эту величину, то это делается так:

Используется синтаксис Text

OtvGr1[N] := evalf(subs(sin(alpha) = S_val, GroupeVel1))

И я надеюсь, что пять градусов (они ведь, да?) не вводились так

Andrei P в сообщении #1723938 писал(а):

Потом присвоил alpha0 конкретное значение (5^0),

Может, я недопонимаю ваших действий, не судите строго.

, В общем еще сам вылечил таким образом

GroupeVel1:= algsubs(sin(alpha)= sin(alpha0)*(1+m), GroupeVel1): 

Заработало. Но мне непонятно, почему при присвоении

sin(alpha):= sin(alpha0)*(1+m);

Не заменяется глобально каждое вхождение синуса на соответствующее значение. При том, что простые присваивания, типа:

q3 := q0 + m * tan(alpha0)*sin(alpha);

глобально отрабатываются на значении характеристического полинома.
Пять градусов я, естаественно вводил так:

Цитата:

alpha0:= evalf(5*Pi/180);

В общем, спасибо. Постепенно дошли до результата. Хотя, возможно. не совсем оптимально.

[Combat Zone]

Andrei P в сообщении #1723952 писал(а):

, В общем еще сам вылечил таким образом

Контрольный вопрос: косинусы остались?

[Andrei P]

Combat Zone в сообщении #1723953 писал(а):

Andrei P в сообщении #1723952 писал(а):

, В общем еще сам вылечил таким образом

Контрольный вопрос: косинусы остались?

Нет Я их через основное тождество тригонометрии заменил:

HarUr:= algsubs(cos(alpha)^2 = 1-sin(alpha)^2,HarUr):

С групповыми скоростями пришлось несколько сложнее:

GroupeVel1:= algsubs(cos(alpha)^2 = 1-sin(alpha)^2,GroupeVel1): has(GroupeVel1, cos(alpha));
                              true
GroupeVel1:= expand(GroupeVel1):
GroupeVel1:= algsubs(cos(alpha)^2 = 1-sin(alpha)^2,GroupeVel1): has(GroupeVel1, cos(alpha));
                             false