TomasVercetti
Member | Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
popkov,
либо, в свете значительного расширения возможностей языков ФП в последние годы, им нужно снова обратить свой взор на дальнейшее развитие такового, либо-таки дополнить документацию, либо исправить баги в некоторых функциях...
Griefin,
да - так работает.
All,
но я запутался : )
Вот это понятно:
(1)
Plot[ { f1[x] }, {x, xmin, xmax}, PlotPoints->10, MaxRecursion->0 ] // Timing
Plot[ { f2[ "число", x ] }, {x, xmin, xmax}, PlotPoints->10, MaxRecursion->0 ] // Timing
Plot[ { f3[ "число", x ]}, {x, xmin, xmax}, PlotPoints->10, MaxRecursion->0 ] // Timing
12.656
0.407
0.141
---------
(2)
Plot[ { f1[x] }, {x, xmin, xmax}, PlotPoints->10, MaxRecursion->0 ] // Timing
Plot[ { f2[ f1[x] , x ] }, {x, xmin, xmax}, PlotPoints->10, MaxRecursion->0 ] // Timing
Plot[ { f3[ f1[x] , x ]}, {x, xmin, xmax}, PlotPoints->10, MaxRecursion->0 ] // Timing
11.813
12.046
11.703
---------
(3)
Plot[ { f1[x], f2[ f1[x] , x ], f3[ f1[x] , x ] }, {x, xmin, xmax}, PlotPoints->10, MaxRecursion->0 ] // Timing
35.421
---------
Вот это непонятно:
(4)
Plot[Module[{f1x=f1[x]}, {f1x, f2[ f1x, x ], f3[ f1x, x ]}], {x, xmin, xmax}, PlotPoints->10, MaxRecursion->0 ] // Timing
34.718
---------
(5)
Plot[Evaluate[Module[{f1x=f1[x]}, {f1x, f2[ f1x, x ], f3[ f1x, x ]}]], {x, xmin, xmax}, PlotPoints->10, MaxRecursion->0 ] // Timing
110.219
--------- |
