Детали — это окружение обсуждаемого «программного текста»; требования к читабельности, модифицируемости, оптимальности,...
Например, если
выражение F далее по тексту программы не используется, то можно было написать с использованием поименованной оператор-функции
F, а не
выражения F (так, в некоторых случаях, читабельней)
Код:
> F:= x -> (128/5)*(1-x)*x*exp(2*(x-1)/(1+x))/(1+x)^5;
> plot({seq(F((1-(4/5)*b^2*sin(t)^2)^(1/2)), b=0.1..1, 0.1)}, t=-Pi..Pi);
Если в дальнейшем оператор-функция не используется, то можно использовать непоименованную функцию
Код:
> plot({seq(proc (x) (128/5)*(1-x)*x*exp(2*(x-1)/(1+x))/(1+x)^5 end proc ((1-(4/5)*b^2*sin(t)^2)^(1/2)), b=0.1..1, 0.1)}, t=-Pi..Pi);
Аналогичный вариант с непоименованной оператор-функцией:
plot({seq((x -> (128/5)*(1-x)*x*exp(2*(x-1)/(1+x))/(1+x)^5) ((1-(4/5)*b^2*sin(t)^2)^(1/2)), b=0.1..1, 0.1)}, t=-Pi..Pi);В общем, много можно привести слегка отличающихся вариантов.
И с циклом можно. Примитивный пример, использующий непоименованную функцию
Код:
> S:= {}:
> for b from 0.1 by 0.1 to 1
do S:= {op(S), plot(proc (x) (128/5)*(1-x)*x*exp(2*(x-1)/(1+x))/(1+x)^5 end proc ((1-(4/5)*b^2*sin(t)^2)^(1/2)), t=-Pi..Pi)}; end do:
> plots[display](S);
Как правило, будет работать медленней, чем вариант с последовательностью. Возможно, вариант с циклом будет полезен, если задавать в цикле отдельное форматирование для разных кривых. Лень гадать. По поводу нецелого индекса цикла моё мнение то же, что и для последовательностей (конец моего предыдущего поста). Аналогично для
sum,
add,…