(* Content-type: application/mathematica *) (*** Wolfram Notebook File ***) (* http://www.wolfram.com/nb *) (* CreatedBy='Mathematica 7.0' *) (*CacheID: 234*) (* Internal cache information: NotebookFileLineBreakTest NotebookFileLineBreakTest NotebookDataPosition[ 145, 7] NotebookDataLength[ 19727, 580] NotebookOptionsPosition[ 18133, 527] NotebookOutlinePosition[ 18556, 545] CellTagsIndexPosition[ 18513, 542] WindowFrame->Normal*) (* Beginning of Notebook Content *) Notebook[{ Cell[CellGroupData[{ Cell["Int\[EAcute]gration par parties", "Section"], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{"Integrale", "[", RowBox[{ RowBox[{"x", " ", RowBox[{"Log", "[", "x", "]"}]}], ",", "x"}], "]"}], "\[IndentingNewLine]", RowBox[{"Integrale", "[", RowBox[{ RowBox[{ RowBox[{"x", "^", "2"}], RowBox[{"Sin", "[", "x", "]"}]}], ",", "x"}], "]"}], "\[IndentingNewLine]", RowBox[{"Integrale", "[", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"1", "-", "x"}], ")"}], RowBox[{"Exp", "[", "x", "]"}]}], ",", "x"}], "]"}], "\[IndentingNewLine]", RowBox[{"Integrale", "[", RowBox[{ RowBox[{"x", " ", RowBox[{"Exp", "[", RowBox[{"2", "x"}], "]"}]}], ",", "x"}], "]"}], "\[IndentingNewLine]", RowBox[{"Integrale", "[", RowBox[{ RowBox[{ RowBox[{"x", "^", "2"}], " ", RowBox[{"Log", "[", "x", "]"}]}], ",", "x"}], "]"}], "\[IndentingNewLine]", RowBox[{"Integrale", "[", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"x", "+", "1"}], ")"}], RowBox[{"Cos", "[", "x", "]"}]}], ",", "x"}], "]"}], "\[IndentingNewLine]", RowBox[{"Integrale", "[", " ", RowBox[{ RowBox[{"ArcSin", "[", "x", "]"}], ",", "x"}], "]"}], "\[IndentingNewLine]", RowBox[{"Integrale", "[", RowBox[{ RowBox[{ RowBox[{"x", "^", "2"}], " ", RowBox[{"Cos", "[", RowBox[{"3", "x"}], "]"}]}], ",", "x"}], "]"}], "\[IndentingNewLine]", RowBox[{"Integrale", "[", RowBox[{ RowBox[{ RowBox[{"Log", "[", "t", "]"}], "/", RowBox[{"t", "^", "2"}]}], ",", "t"}], "]"}], "\[IndentingNewLine]", RowBox[{"Integrale", "[", RowBox[{ RowBox[{"x", " ", RowBox[{"Sqrt", "[", RowBox[{"x", "+", "1"}], "]"}]}], ",", "x"}], "]"}], "\[IndentingNewLine]", RowBox[{"Integrale", "[", RowBox[{ RowBox[{ RowBox[{"Exp", "[", "x", "]"}], RowBox[{"Sin", "[", "x", "]"}]}], ",", "x"}], "]"}], "\[IndentingNewLine]", RowBox[{"Integrale", "[", RowBox[{ RowBox[{"x", " ", RowBox[{"Exp", "[", RowBox[{"1", "-", "x"}], "]"}]}], ",", "x"}], "]"}]}], "Input", CellOpen->False, CellChangeTimes->{{3.446473501899214*^9, 3.446473581934655*^9}, 3.44647366911213*^9}], Cell[BoxData[ FormBox[ TagBox[ RowBox[{"\[Integral]", RowBox[{ RowBox[{"x", " ", FormBox[ RowBox[{"ln", "(", "x", ")"}], TraditionalForm]}], RowBox[{"\[DifferentialD]", "x"}]}]}], HoldForm], TraditionalForm]], "Output", CellChangeTimes->{{3.446473508335903*^9, 3.446473531400771*^9}, 3.44647358257065*^9, 3.446473674171295*^9}], Cell[BoxData[ FormBox[ TagBox[ RowBox[{"\[Integral]", RowBox[{ RowBox[{ SuperscriptBox["x", "2"], " ", RowBox[{"sin", "(", "x", ")"}]}], RowBox[{"\[DifferentialD]", "x"}]}]}], HoldForm], TraditionalForm]], "Output", CellChangeTimes->{{3.446473508335903*^9, 3.446473531400771*^9}, 3.44647358257065*^9, 3.446473674175309*^9}], Cell[BoxData[ FormBox[ TagBox[ RowBox[{"\[Integral]", RowBox[{ RowBox[{ SuperscriptBox["\[ExponentialE]", "x"], " ", RowBox[{"(", RowBox[{"1", "-", "x"}], ")"}]}], RowBox[{"\[DifferentialD]", "x"}]}]}], HoldForm], TraditionalForm]], "Output", CellChangeTimes->{{3.446473508335903*^9, 3.446473531400771*^9}, 3.44647358257065*^9, 3.446473674177808*^9}], Cell[BoxData[ FormBox[ TagBox[ RowBox[{"\[Integral]", RowBox[{ RowBox[{ SuperscriptBox["\[ExponentialE]", RowBox[{"2", " ", "x"}]], " ", "x"}], RowBox[{"\[DifferentialD]", "x"}]}]}], HoldForm], TraditionalForm]], "Output", CellChangeTimes->{{3.446473508335903*^9, 3.446473531400771*^9}, 3.44647358257065*^9, 3.446473674180031*^9}], Cell[BoxData[ FormBox[ TagBox[ RowBox[{"\[Integral]", RowBox[{ RowBox[{ SuperscriptBox["x", "2"], " ", FormBox[ RowBox[{"ln", "(", "x", ")"}], TraditionalForm]}], RowBox[{"\[DifferentialD]", "x"}]}]}], HoldForm], TraditionalForm]], "Output", CellChangeTimes->{{3.446473508335903*^9, 3.446473531400771*^9}, 3.44647358257065*^9, 3.4464736741836557`*^9}], Cell[BoxData[ FormBox[ TagBox[ RowBox[{"\[Integral]", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"1", "+", "x"}], ")"}], " ", RowBox[{"cos", "(", "x", ")"}]}], RowBox[{"\[DifferentialD]", "x"}]}]}], HoldForm], TraditionalForm]], "Output", CellChangeTimes->{{3.446473508335903*^9, 3.446473531400771*^9}, 3.44647358257065*^9, 3.4464736741871567`*^9}], Cell[BoxData[ FormBox[ TagBox[ RowBox[{"\[Integral]", RowBox[{ FormBox[ RowBox[{"Arcsin", "(", "x", ")"}], TraditionalForm], RowBox[{"\[DifferentialD]", "x"}]}]}], HoldForm], TraditionalForm]], "Output", CellChangeTimes->{{3.446473508335903*^9, 3.446473531400771*^9}, 3.44647358257065*^9, 3.446473674189513*^9}], Cell[BoxData[ FormBox[ TagBox[ RowBox[{"\[Integral]", RowBox[{ RowBox[{ SuperscriptBox["x", "2"], " ", RowBox[{"cos", "(", RowBox[{"3", " ", "x"}], ")"}]}], RowBox[{"\[DifferentialD]", "x"}]}]}], HoldForm], TraditionalForm]], "Output", CellChangeTimes->{{3.446473508335903*^9, 3.446473531400771*^9}, 3.44647358257065*^9, 3.446473674191724*^9}], Cell[BoxData[ FormBox[ TagBox[ RowBox[{"\[Integral]", RowBox[{ FractionBox[ FormBox[ RowBox[{"ln", "(", "t", ")"}], TraditionalForm], SuperscriptBox["t", "2"]], RowBox[{"\[DifferentialD]", "t"}]}]}], HoldForm], TraditionalForm]], "Output", CellChangeTimes->{{3.446473508335903*^9, 3.446473531400771*^9}, 3.44647358257065*^9, 3.446473674193986*^9}], Cell[BoxData[ FormBox[ TagBox[ RowBox[{"\[Integral]", RowBox[{ RowBox[{"x", " ", SqrtBox[ RowBox[{"1", "+", "x"}]]}], RowBox[{"\[DifferentialD]", "x"}]}]}], HoldForm], TraditionalForm]], "Output", CellChangeTimes->{{3.446473508335903*^9, 3.446473531400771*^9}, 3.44647358257065*^9, 3.4464736741980467`*^9}], Cell[BoxData[ FormBox[ TagBox[ RowBox[{"\[Integral]", RowBox[{ RowBox[{ SuperscriptBox["\[ExponentialE]", "x"], " ", RowBox[{"sin", "(", "x", ")"}]}], RowBox[{"\[DifferentialD]", "x"}]}]}], HoldForm], TraditionalForm]], "Output", CellChangeTimes->{{3.446473508335903*^9, 3.446473531400771*^9}, 3.44647358257065*^9, 3.446473674200486*^9}], Cell[BoxData[ FormBox[ TagBox[ RowBox[{"\[Integral]", RowBox[{ RowBox[{ SuperscriptBox["\[ExponentialE]", RowBox[{"1", "-", "x"}]], " ", "x"}], RowBox[{"\[DifferentialD]", "x"}]}]}], HoldForm], TraditionalForm]], "Output", CellChangeTimes->{{3.446473508335903*^9, 3.446473531400771*^9}, 3.44647358257065*^9, 3.44647367422232*^9}] }, Open ]], Cell[CellGroupData[{ Cell["Solutions", "Subsubsection"], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{"Calcule", "[", RowBox[{"Integrale", "[", RowBox[{ RowBox[{"x", " ", RowBox[{"Log", "[", "x", "]"}]}], ",", "x"}], "]"}], "]"}], "\[IndentingNewLine]", RowBox[{"Calcule", "[", RowBox[{"Integrale", "[", RowBox[{ RowBox[{ RowBox[{"x", "^", "2"}], RowBox[{"Sin", "[", "x", "]"}]}], ",", "x"}], "]"}], "]"}], "\[IndentingNewLine]", RowBox[{"Calcule", "[", RowBox[{"Integrale", "[", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"1", "-", "x"}], ")"}], RowBox[{"Exp", "[", "x", "]"}]}], ",", "x"}], "]"}], "]"}], "\[IndentingNewLine]", RowBox[{"Calcule", "[", RowBox[{"Integrale", "[", RowBox[{ RowBox[{"x", " ", RowBox[{"Exp", "[", RowBox[{"2", "x"}], "]"}]}], ",", "x"}], "]"}], "]"}], "\[IndentingNewLine]", RowBox[{"Calcule", "[", RowBox[{"Integrale", "[", RowBox[{ RowBox[{ RowBox[{"x", "^", "2"}], " ", RowBox[{"Log", "[", "x", "]"}]}], ",", "x"}], "]"}], "]"}], "\[IndentingNewLine]", RowBox[{"Calcule", "[", RowBox[{"Integrale", "[", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"x", "+", "1"}], ")"}], RowBox[{"Cos", "[", "x", "]"}]}], ",", "x"}], "]"}], "]"}], "\[IndentingNewLine]", RowBox[{"Calcule", "[", RowBox[{"Integrale", "[", " ", RowBox[{ RowBox[{"ArcSin", "[", "x", "]"}], ",", "x"}], "]"}], "]"}], "\[IndentingNewLine]", RowBox[{"Calcule", "[", RowBox[{"Integrale", "[", RowBox[{ RowBox[{ RowBox[{"x", "^", "2"}], " ", RowBox[{"Cos", "[", RowBox[{"3", "x"}], "]"}]}], ",", "x"}], "]"}], "]"}], "\[IndentingNewLine]", RowBox[{"Calcule", "[", RowBox[{"Integrale", "[", RowBox[{ RowBox[{ RowBox[{"Log", "[", "t", "]"}], "/", RowBox[{"t", "^", "2"}]}], ",", "t"}], "]"}], "]"}], "\[IndentingNewLine]", RowBox[{"Calcule", "[", RowBox[{"Integrale", "[", RowBox[{ RowBox[{"x", " ", RowBox[{"Sqrt", "[", RowBox[{"x", "+", "1"}], "]"}]}], ",", "x"}], "]"}], "]"}], "\[IndentingNewLine]", RowBox[{"Calcule", "[", RowBox[{"Integrale", "[", RowBox[{ RowBox[{ RowBox[{"Exp", "[", "x", "]"}], RowBox[{"Sin", "[", "x", "]"}]}], ",", "x"}], "]"}], "]"}], "\[IndentingNewLine]", RowBox[{"Calcule", "[", RowBox[{"Integrale", "[", RowBox[{ RowBox[{"x", " ", RowBox[{"Exp", "[", RowBox[{"1", "-", "x"}], "]"}]}], ",", "x"}], "]"}], "]"}]}], "Input", CellOpen->False, CellChangeTimes->{{3.446473606194174*^9, 3.4464736592393503`*^9}}], Cell[BoxData[ FormBox[ InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\(\ \[Integral] \\(\\(\\(\\(x\\\\ \\(\\(TraditionalForm\\`\\(ln(x)\\)\\)\\)\\)\\) \ \\(\\(\[DifferentialD] x\\)\\)\\)\\)\\)\\)\\) = \ \\!\\(TraditionalForm\\`\\(\\(\\(1\\/2\\\\ x\\^2\\\\ \\(\\(TraditionalForm\\`\ \\(ln(x)\\)\\)\\)\\)\\) - x\\^2\\/4\\)\\) + k\"\>", StringForm["`1` = `2` + k", analyse`Integrale[$CellContext`x Log[$CellContext`x], $CellContext`x], Rational[-1, 4] $CellContext`x^2 + Rational[1, 2] $CellContext`x^2 Log[$CellContext`x]], Editable->False], TraditionalForm]], "Output", CellChangeTimes->{{3.44647365995258*^9, 3.446473680661977*^9}}], Cell[BoxData[ FormBox[ InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\(\ \[Integral] \\(\\(\\(\\(x\\^2\\\\ \\(\\(sin(x)\\)\\)\\)\\) \\(\\(\ \[DifferentialD] x\\)\\)\\)\\)\\)\\)\\) = \ \\!\\(TraditionalForm\\`\\(\\(\\(2\\\\ x\\\\ \\(\\(sin(x)\\)\\)\\)\\) - \ \\(\\(\\(\\((x\\^2 - 2)\\)\\)\\\\ \\(\\(cos(x)\\)\\)\\)\\)\\)\\) + k\"\>", StringForm["`1` = `2` + k", analyse`Integrale[$CellContext`x^2 Sin[$CellContext`x], $CellContext`x], -(-2 + $CellContext`x^2) Cos[$CellContext`x] + 2 $CellContext`x Sin[$CellContext`x]], Editable->False], TraditionalForm]], "Output", CellChangeTimes->{{3.44647365995258*^9, 3.4464736806679077`*^9}}], Cell[BoxData[ FormBox[ InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\(\ \[Integral] \\(\\(\\(\\(\[ExponentialE]\\^x\\\\ \\(\\((1 - x)\\)\\)\\)\\) \\(\ \\(\[DifferentialD] x\\)\\)\\)\\)\\)\\)\\) = \ \\!\\(TraditionalForm\\`\\(\\(\\(-\[ExponentialE]\\^x\\)\\)\\\\ \\(\\((x - 2)\ \\)\\)\\)\\) + k\"\>", StringForm["`1` = `2` + k", analyse`Integrale[ E^$CellContext`x (1 - $CellContext`x), $CellContext`x], - E^$CellContext`x (-2 + $CellContext`x)], Editable->False], TraditionalForm]], "Output", CellChangeTimes->{{3.44647365995258*^9, 3.446473680670701*^9}}], Cell[BoxData[ FormBox[ InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\(\ \[Integral] \\(\\(\\(\\(\[ExponentialE]\\^\\(2\\\\ x\\)\\\\ x\\)\\) \\(\\(\ \[DifferentialD] x\\)\\)\\)\\)\\)\\)\\) = \\!\\(TraditionalForm\\`\\(\ \[ExponentialE]\\^\\(2\\\\ x\\)\\\\ \\(\\((x\\/2 - 1\\/4)\\)\\)\\)\\) + k\"\>", StringForm["`1` = `2` + k", analyse`Integrale[E^(2 $CellContext`x) $CellContext`x, $CellContext`x], E^(2 $CellContext`x) (Rational[-1, 4] + Rational[1, 2] $CellContext`x)], Editable->False], TraditionalForm]], "Output", CellChangeTimes->{{3.44647365995258*^9, 3.4464736806972637`*^9}}], Cell[BoxData[ FormBox[ InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\(\ \[Integral] \\(\\(\\(\\(x\\^2\\\\ \ \\(\\(TraditionalForm\\`\\(ln(x)\\)\\)\\)\\)\\) \\(\\(\[DifferentialD] \ x\\)\\)\\)\\)\\)\\)\\) = \\!\\(TraditionalForm\\`\\(\\(\\(1\\/3\\\\ x\\^3\\\\ \ \\(\\(TraditionalForm\\`\\(ln(x)\\)\\)\\)\\)\\) - x\\^3\\/9\\)\\) + k\"\>", StringForm["`1` = `2` + k", analyse`Integrale[$CellContext`x^2 Log[$CellContext`x], $CellContext`x], Rational[-1, 9] $CellContext`x^3 + Rational[1, 3] $CellContext`x^3 Log[$CellContext`x]], Editable->False], TraditionalForm]], "Output", CellChangeTimes->{{3.44647365995258*^9, 3.446473680739848*^9}}], Cell[BoxData[ FormBox[ InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\(\ \[Integral] \\(\\(\\(\\(\\(\\((1 + x)\\)\\)\\\\ \\(\\(cos(x)\\)\\)\\)\\) \ \\(\\(\[DifferentialD] x\\)\\)\\)\\)\\)\\)\\) = \ \\!\\(TraditionalForm\\`\\(\\(\\(cos(x)\\)\\) + \\(\\(x\\\\ \ \\(\\(sin(x)\\)\\)\\)\\) + \\(\\(sin(x)\\)\\)\\)\\) + k\"\>", StringForm["`1` = `2` + k", analyse`Integrale[(1 + $CellContext`x) Cos[$CellContext`x], $CellContext`x], Cos[$CellContext`x] + Sin[$CellContext`x] + $CellContext`x Sin[$CellContext`x]], Editable->False], TraditionalForm]], "Output", CellChangeTimes->{{3.44647365995258*^9, 3.4464736807613907`*^9}}], Cell[BoxData[ FormBox[ InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\(\ \[Integral] \\(\\(\\(\\(TraditionalForm\\`\\(Arcsin(x)\\)\\)\\) \\(\\(\ \[DifferentialD] x\\)\\)\\)\\)\\)\\)\\) = \ \\!\\(TraditionalForm\\`\\(\\(\\(x\\\\ \ \\(\\(TraditionalForm\\`\\(Arcsin(x)\\)\\)\\)\\)\\) + \\@\\(1 - \ x\\^2\\)\\)\\) + k\"\>", StringForm["`1` = `2` + k", analyse`Integrale[ ArcSin[$CellContext`x], $CellContext`x], (1 - $CellContext`x^2)^ Rational[1, 2] + $CellContext`x ArcSin[$CellContext`x]], Editable->False], TraditionalForm]], "Output", CellChangeTimes->{{3.44647365995258*^9, 3.446473680792233*^9}}], Cell[BoxData[ FormBox[ InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\(\ \[Integral] \\(\\(\\(\\(x\\^2\\\\ \\(\\(cos(\\(\\(3\\\\ x\\)\\))\\)\\)\\)\\) \ \\(\\(\[DifferentialD] x\\)\\)\\)\\)\\)\\)\\) = \ \\!\\(TraditionalForm\\`\\(\\(\\(2\\/9\\\\ x\\\\ \\(\\(cos(\\(\\(3\\\\ \ x\\)\\))\\)\\)\\)\\) + \\(\\(1\\/27\\\\ \\(\\((\\(\\(9\\\\ x\\^2\\)\\) - \ 2)\\)\\)\\\\ \\(\\(sin(\\(\\(3\\\\ x\\)\\))\\)\\)\\)\\)\\)\\) + k\"\>", StringForm["`1` = `2` + k", analyse`Integrale[$CellContext`x^2 Cos[3 $CellContext`x], $CellContext`x], Rational[2, 9] $CellContext`x Cos[3 $CellContext`x] + Rational[1, 27] (-2 + 9 $CellContext`x^2) Sin[3 $CellContext`x]], Editable->False], TraditionalForm]], "Output", CellChangeTimes->{{3.44647365995258*^9, 3.4464736808301687`*^9}}], Cell[BoxData[ FormBox[ InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\(\ \[Integral] \\(\\(\\(TraditionalForm\\`\\(ln(t)\\)\\)\\/t\\^2 \\(\\(\ \[DifferentialD] t\\)\\)\\)\\)\\)\\)\\) = \ \\!\\(TraditionalForm\\`\\(\\(\\(-\\(\\(\\(TraditionalForm\\`\\(ln(t)\\)\\)\\/\ t\\)\\)\\)\\) - 1\\/t\\)\\) + k\"\>", StringForm["`1` = `2` + k", analyse`Integrale[$CellContext`t^(-2) Log[$CellContext`t], $CellContext`t], (-1)/$CellContext`t - \ $CellContext`t^(-1) Log[$CellContext`t]], Editable->False], TraditionalForm]], "Output", CellChangeTimes->{{3.44647365995258*^9, 3.446473680861704*^9}}], Cell[BoxData[ FormBox[ InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\(\ \[Integral] \\(\\(\\(\\(x\\\\ \\@\\(1 + x\\)\\)\\) \\(\\(\[DifferentialD] \ x\\)\\)\\)\\)\\)\\)\\) = \\!\\(TraditionalForm\\`\\(2\\/15\\\\ \\((x + \ 1)\\)\\^\\(3/2\\)\\\\ \\(\\((\\(\\(3\\\\ x\\)\\) - 2)\\)\\)\\)\\) + k\"\>", StringForm["`1` = `2` + k", analyse`Integrale[$CellContext`x (1 + $CellContext`x)^ Rational[1, 2], $CellContext`x], Rational[2, 15] (1 + $CellContext`x)^Rational[3, 2] (-2 + 3 $CellContext`x)], Editable->False], TraditionalForm]], "Output", CellChangeTimes->{{3.44647365995258*^9, 3.446473680896591*^9}}], Cell[BoxData[ FormBox[ InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\(\ \[Integral] \\(\\(\\(\\(\[ExponentialE]\\^x\\\\ \\(\\(sin(x)\\)\\)\\)\\) \ \\(\\(\[DifferentialD] x\\)\\)\\)\\)\\)\\)\\) = \ \\!\\(TraditionalForm\\`\\(1\\/2\\\\ \[ExponentialE]\\^x\\\\ \ \\(\\((\\(\\(sin(x)\\)\\) - \\(\\(cos(x)\\)\\))\\)\\)\\)\\) + k\"\>", StringForm["`1` = `2` + k", analyse`Integrale[E^$CellContext`x Sin[$CellContext`x], $CellContext`x], Rational[1, 2] E^$CellContext`x (-Cos[$CellContext`x] + Sin[$CellContext`x])], Editable->False], TraditionalForm]], "Output", CellChangeTimes->{{3.44647365995258*^9, 3.4464736809273777`*^9}}], Cell[BoxData[ FormBox[ InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\(\ \[Integral] \\(\\(\\(\\(\[ExponentialE]\\^\\(1 - x\\)\\\\ x\\)\\) \\(\\(\ \[DifferentialD] x\\)\\)\\)\\)\\)\\)\\) = \\!\\(TraditionalForm\\`\\(\ \[ExponentialE]\\^\\(-x\\)\\\\ \\(\\((\\(\\(\\(\\(-\[ExponentialE]\\)\\)\\\\ \ x\\)\\) - \[ExponentialE])\\)\\)\\)\\) + k\"\>", StringForm["`1` = `2` + k", analyse`Integrale[E^(1 - $CellContext`x) $CellContext`x, $CellContext`x], E^(-$CellContext`x) (-E - E $CellContext`x)], Editable->False], TraditionalForm]], "Output", CellChangeTimes->{{3.44647365995258*^9, 3.446473680960659*^9}}] }, Open ]] }, Closed]] }, Open ]] }, WindowSize->{786, 814}, WindowMargins->{{81, Automatic}, {Automatic, 14}}, PrintingCopies->1, PrintingPageRange->{1, Automatic}, CellLabelAutoDelete->True, FrontEndVersion->"7.0 for Mac OS X x86 (32-bit) (February 18, 2009)", StyleDefinitions->"stylemath.nb" ] (* End of Notebook Content *) (* Internal cache information *) (*CellTagsOutline CellTagsIndex->{} *) (*CellTagsIndex CellTagsIndex->{} *) (*NotebookFileOutline Notebook[{ Cell[CellGroupData[{ Cell[567, 22, 50, 0, 44, "Section"], Cell[CellGroupData[{ Cell[642, 26, 2130, 71, 19, "Input", CellOpen->False], Cell[2775, 99, 378, 12, 49, "Output"], Cell[3156, 113, 366, 11, 49, "Output"], Cell[3525, 126, 401, 12, 49, "Output"], Cell[3929, 140, 374, 11, 49, "Output"], Cell[4306, 153, 408, 13, 49, "Output"], Cell[4717, 168, 395, 12, 49, "Output"], Cell[5115, 182, 353, 11, 49, "Output"], Cell[5471, 195, 394, 12, 49, "Output"], Cell[5868, 209, 404, 13, 52, "Output"], Cell[6275, 224, 350, 11, 49, "Output"], Cell[6628, 237, 380, 11, 49, "Output"], Cell[7011, 250, 373, 11, 49, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[7421, 266, 34, 0, 28, "Subsubsection"], Cell[CellGroupData[{ Cell[7480, 270, 2572, 85, 19, "Input", CellOpen->False], Cell[10055, 357, 680, 12, 53, "Output"], Cell[10738, 371, 682, 12, 49, "Output"], Cell[11423, 385, 603, 12, 49, "Output"], Cell[12029, 399, 628, 10, 50, "Output"], Cell[12660, 411, 686, 12, 53, "Output"], Cell[13349, 425, 669, 12, 49, "Output"], Cell[14021, 439, 648, 13, 50, "Output"], Cell[14672, 454, 805, 13, 50, "Output"], Cell[15480, 469, 629, 12, 52, "Output"], Cell[16112, 483, 657, 12, 50, "Output"], Cell[16772, 497, 671, 12, 50, "Output"], Cell[17446, 511, 647, 11, 49, "Output"] }, Open ]] }, Closed]] }, Open ]] } ] *) (* End of internal cache information *)