/* Macros de présentation de l'intégration par parties */ /* Jean-Michel Sarlat - avril 2003 */ /* http://melusine.eu.org/syracuse/maxima/ */ ipp_a(u,v,x) := block([U], U:integrate(u,x), 'integrate(u*v,x) = U*v -'integrate(U*diff(v,x),x)); ipp(u,v,x) := block([U], U:integrate(u,x), U*v - integrate(U*diff(v,x),x));