A-M baby

2013-04-10 21:29:02 -07:00 · 2013-04-10 21:29:02 -07:00 · db842d013d
commit db842d013d
parent 764da6cbbb
19005 changed files with 197040 additions and 7 deletions
--- a/Task/Function-composition/Maxima/function-composition.maxima
+++ b/Task/Function-composition/Maxima/function-composition.maxima
@ -0,0 +1,8 @@
+/* built-in */
+load(to_poly_solver);
+
+compose_functions([sin, cos]);
+/* lambda([%g0],sin(cos(%g0)))*/
+
+/* An implementation, to show a use of buildq */
+compose(f, g) := buildq([f, g], lambda([x], f(g(x))));