(* Content-type: application/mathematica *)
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
(* CreatedBy='Mathematica 6.0' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 145, 7]
NotebookDataLength[ 111588, 2823]
NotebookOptionsPosition[ 100529, 2684]
NotebookOutlinePosition[ 100942, 2702]
CellTagsIndexPosition[ 100899, 2699]
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[CellGroupData[{
Cell["\<\
Exercices 3 - D\[EAcute]terminer les \[EAcute]ventuelles asymptotes des \
fonctions suivantes\
\>", "Section",
CellChangeTimes->{
3.436075579090706*^9, {3.744542188946415*^9,
3.744542199056692*^9}},ExpressionUUID->"851b59b4-7a4e-4cff-8216-\
7c7e59c9a77f"],
Cell[CellGroupData[{
Cell[BoxData[{
RowBox[{
RowBox[{"q", "=", "0"}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"q", "+=", "1"}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"f", "[",
RowBox[{"x_", ",", "q"}], "]"}], ":=",
RowBox[{"Sqrt", "[",
RowBox[{
RowBox[{"x", "^", "2"}], "-",
RowBox[{"4", "x"}]}], "]"}]}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"Print", "[",
RowBox[{"q", ",", "\"\<. f(x) = \>\"", ",",
RowBox[{"f", "[",
RowBox[{"x", ",", "q"}], "]"}]}], "]"}], ";"}],
"\[IndentingNewLine]"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"q", "+=", "1"}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"f", "[",
RowBox[{"x_", ",", "q"}], "]"}], ":=",
RowBox[{"3", "+",
RowBox[{"1", "/",
RowBox[{"Sqrt", "[",
RowBox[{
RowBox[{"2", "x"}], "-", "1"}], "]"}]}]}]}],
";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"Print", "[",
RowBox[{"q", ",", "\"\<. f(x) = \>\"", ",",
RowBox[{"f", "[",
RowBox[{"x", ",", "q"}], "]"}]}], "]"}], ";"}],
"\[IndentingNewLine]"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"q", "+=", "1"}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"f", "[",
RowBox[{"x_", ",", "q"}], "]"}], ":=",
RowBox[{"Sqrt", "[",
RowBox[{
RowBox[{"x", "^", "2"}], "+",
RowBox[{"2", "x"}], "+", "3"}], "]"}]}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"Print", "[",
RowBox[{"q", ",", "\"\<. f(x) = \>\"", ",",
RowBox[{"f", "[",
RowBox[{"x", ",", "q"}], "]"}]}], "]"}], ";"}],
"\[IndentingNewLine]"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"q", "+=", "1"}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"f", "[",
RowBox[{"x_", ",", "q"}], "]"}], ":=",
RowBox[{
RowBox[{"Sqrt", "[",
RowBox[{
RowBox[{"x", "^", "2"}], "-", "x", "-", "6"}], "]"}], "+", "x"}]}],
";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"Print", "[",
RowBox[{"q", ",", "\"\<. f(x) = \>\"", ",",
RowBox[{"f", "[",
RowBox[{"x", ",", "q"}], "]"}]}], "]"}], ";"}],
"\[IndentingNewLine]"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"q", "+=", "1"}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"f", "[",
RowBox[{"x_", ",", "q"}], "]"}], ":=",
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"Sqrt", "[",
RowBox[{
RowBox[{"2",
RowBox[{"x", "^", "2"}]}], "+", "1"}], "]"}], "-",
RowBox[{"Sqrt", "[",
RowBox[{
RowBox[{"3",
RowBox[{"x", "^", "2"}]}], "-", "1"}], "]"}]}], ")"}], "/",
RowBox[{"(",
RowBox[{"1", "-",
RowBox[{"2", "x"}]}], ")"}]}]}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"Print", "[",
RowBox[{"q", ",", "\"\<. f(x) = \>\"", ",",
RowBox[{"f", "[",
RowBox[{"x", ",", "q"}], "]"}]}], "]"}], ";"}],
"\[IndentingNewLine]"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"q", "+=", "1"}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"f", "[",
RowBox[{"x_", ",", "q"}], "]"}], ":=",
RowBox[{
RowBox[{"(",
RowBox[{"1", "-",
RowBox[{"5", "x"}]}], ")"}], "/",
RowBox[{"Sqrt", "[",
RowBox[{
RowBox[{"3",
RowBox[{"x", "^", "2"}]}], "-", "x", "+", "1"}], "]"}]}]}],
";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"Print", "[",
RowBox[{"q", ",", "\"\<. f(x) = \>\"", ",",
RowBox[{"f", "[",
RowBox[{"x", ",", "q"}], "]"}]}], "]"}], ";"}],
"\[IndentingNewLine]"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"q", "+=", "1"}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"f", "[",
RowBox[{"x_", ",", "q"}], "]"}], ":=",
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"Sqrt", "[",
RowBox[{
RowBox[{"x", "^", "3"}], "-", "1"}], "]"}], "-",
RowBox[{"Sqrt", "[",
RowBox[{
RowBox[{"2",
RowBox[{"x", "^", "2"}]}], "-", "1"}], "]"}]}], ")"}], "/",
RowBox[{"(",
RowBox[{"1", "-",
RowBox[{"3", "x"}]}], ")"}]}]}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"Print", "[",
RowBox[{"q", ",", "\"\<. f(x) = \>\"", ",",
RowBox[{"f", "[",
RowBox[{"x", ",", "q"}], "]"}]}], "]"}], ";"}],
"\[IndentingNewLine]"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"q", "+=", "1"}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"f", "[",
RowBox[{"x_", ",", "q"}], "]"}], ":=",
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"3", "x"}], "+", "7"}], ")"}], "/",
RowBox[{"(",
RowBox[{
RowBox[{"Sqrt", "[",
RowBox[{
RowBox[{"x", "^", "2"}], "-", "4"}], "]"}], "-", "1"}], ")"}]}]}],
";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"Print", "[",
RowBox[{"q", ",", "\"\<. f(x) = \>\"", ",",
RowBox[{"f", "[",
RowBox[{"x", ",", "q"}], "]"}]}], "]"}], ";"}], "\[IndentingNewLine]",
"\[IndentingNewLine]"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"q", "+=", "1"}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"f", "[",
RowBox[{"x_", ",", "q"}], "]"}], ":=",
RowBox[{
RowBox[{"Sqrt", "[",
RowBox[{
RowBox[{"x", "^", "2"}], "+", "1"}], "]"}], "-",
RowBox[{"Sqrt", "[",
RowBox[{"4", "+",
RowBox[{"x", "^", "2"}]}], "]"}]}]}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"Print", "[",
RowBox[{"q", ",", "\"\<. f(x) = \>\"", ",",
RowBox[{"f", "[",
RowBox[{"x", ",", "q"}], "]"}]}], "]"}], ";"}], "\[IndentingNewLine]",
"\[IndentingNewLine]"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"q", "+=", "1"}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"f", "[",
RowBox[{"x_", ",", "q"}], "]"}], ":=",
RowBox[{
RowBox[{"Sqrt", "[",
RowBox[{
RowBox[{"4",
RowBox[{"x", "^", "2"}]}], "+", "1"}], "]"}], "-",
RowBox[{"2",
RowBox[{"Sqrt", "[",
RowBox[{
RowBox[{"x", "^", "2"}], "-",
RowBox[{"4", "x"}]}], "]"}]}]}]}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"Print", "[",
RowBox[{"q", ",", "\"\<. f(x) = \>\"", ",",
RowBox[{"f", "[",
RowBox[{"x", ",", "q"}], "]"}]}], "]"}], ";"}],
"\[IndentingNewLine]"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"q", "+=", "1"}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"f", "[",
RowBox[{"x_", ",", "q"}], "]"}], ":=",
RowBox[{
RowBox[{"(",
RowBox[{"x", "-",
RowBox[{"Sqrt", "[",
RowBox[{
RowBox[{"x", "^", "2"}], "+",
RowBox[{"2", "x"}], "+", "4"}], "]"}]}], ")"}], "/",
RowBox[{"(",
RowBox[{
RowBox[{"3", "x"}], "-",
RowBox[{"Sqrt", "[",
RowBox[{
RowBox[{"9",
RowBox[{"x", "^", "2"}]}], "+",
RowBox[{"3", "x"}]}], "]"}]}], ")"}]}]}],
";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"Print", "[",
RowBox[{"q", ",", "\"\<. f(x) = \>\"", ",",
RowBox[{"f", "[",
RowBox[{"x", ",", "q"}], "]"}]}], "]"}], ";"}],
"\[IndentingNewLine]"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"q", "+=", "1"}], ";"}], "\n",
RowBox[{
RowBox[{
RowBox[{"f", "[",
RowBox[{"x_", ",", "q"}], "]"}], ":=",
RowBox[{
RowBox[{"Sqrt", "[",
RowBox[{
RowBox[{"x", "^", "2"}], "+", "1"}], "]"}], "/",
RowBox[{"Sqrt", "[",
RowBox[{
RowBox[{"4",
RowBox[{"x", "^", "3"}]}], "-", "4"}], "]"}]}]}], ";"}], "\n",
RowBox[{
RowBox[{
RowBox[{"Print", "[",
RowBox[{"q", ",", "\"\<. f(x) = \>\"", ",",
RowBox[{"f", "[",
RowBox[{"x", ",", "q"}], "]"}]}], "]"}], ";"}],
"\[IndentingNewLine]"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"q", "+=", "1"}], ";"}], "\n",
RowBox[{
RowBox[{
RowBox[{"f", "[",
RowBox[{"x_", ",", "q"}], "]"}], ":=",
RowBox[{
RowBox[{"Sqrt", "[",
RowBox[{
RowBox[{"4", "x"}], "-", "1"}], "]"}], "-",
RowBox[{"Sqrt", "[",
RowBox[{
RowBox[{"4",
RowBox[{"x", "^", "2"}]}], "-", "4"}], "]"}]}]}], ";"}], "\n",
RowBox[{
RowBox[{
RowBox[{"Print", "[",
RowBox[{"q", ",", "\"\<. f(x) = \>\"", ",",
RowBox[{"f", "[",
RowBox[{"x", ",", "q"}], "]"}]}], "]"}], ";"}],
"\[IndentingNewLine]"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"q", "+=", "1"}], ";"}], "\n",
RowBox[{
RowBox[{
RowBox[{"f", "[",
RowBox[{"x_", ",", "q"}], "]"}], ":=",
RowBox[{
RowBox[{"Sqrt", "[",
RowBox[{
RowBox[{"x", "^", "2"}], "-",
RowBox[{"3", "x"}], "+", "2"}], "]"}], "/",
RowBox[{"(",
RowBox[{
RowBox[{"4", "x"}], "-", "1"}], ")"}]}]}], ";"}], "\n",
RowBox[{
RowBox[{
RowBox[{"Print", "[",
RowBox[{"q", ",", "\"\<. f(x) = \>\"", ",",
RowBox[{"f", "[",
RowBox[{"x", ",", "q"}], "]"}]}], "]"}], ";"}],
"\[IndentingNewLine]"}], "\[IndentingNewLine]"}], "Input",
CellOpen->False,ExpressionUUID->"0cbb56d7-6d53-413c-8199-19811e1bc2ff"],
Cell[CellGroupData[{
Cell[BoxData[
FormBox[
InterpretationBox[
RowBox[{
"1", "\[InvisibleSpace]", "\<\". f(x) = \"\>", "\[InvisibleSpace]",
SqrtBox[
RowBox[{
SuperscriptBox["x", "2"], "-",
RowBox[{"4", " ", "x"}]}]]}],
SequenceForm[
1, ". f(x) = ", ((-4) $CellContext`x + $CellContext`x^2)^Rational[1, 2]],
Editable->False], TraditionalForm]], "Print",
CellChangeTimes->{
3.4360755472795343`*^9},ExpressionUUID->"4ee1e055-db18-46d8-9f85-\
06a0202c52cf"],
Cell[BoxData[
FormBox[
InterpretationBox[
RowBox[{
"2", "\[InvisibleSpace]", "\<\". f(x) = \"\>", "\[InvisibleSpace]",
RowBox[{"3", "+",
FractionBox["1",
SqrtBox[
RowBox[{
RowBox[{"2", " ", "x"}], "-", "1"}]]]}]}],
SequenceForm[2, ". f(x) = ", 3 + (-1 + 2 $CellContext`x)^Rational[-1, 2]],
Editable->False], TraditionalForm]], "Print",
CellChangeTimes->{
3.4360755472824583`*^9},ExpressionUUID->"9f4e81b8-7fa2-4538-8f21-\
f2d4ffa018d9"],
Cell[BoxData[
FormBox[
InterpretationBox[
RowBox[{
"3", "\[InvisibleSpace]", "\<\". f(x) = \"\>", "\[InvisibleSpace]",
SqrtBox[
RowBox[{
SuperscriptBox["x", "2"], "+",
RowBox[{"2", " ", "x"}], "+", "3"}]]}],
SequenceForm[
3, ". f(x) = ", (3 + 2 $CellContext`x + $CellContext`x^2)^Rational[1, 2]],
Editable->False], TraditionalForm]], "Print",
CellChangeTimes->{
3.436075547285592*^9},ExpressionUUID->"b44af049-259c-47b2-8fd4-\
4222a1339e84"],
Cell[BoxData[
FormBox[
InterpretationBox[
RowBox[{
"4", "\[InvisibleSpace]", "\<\". f(x) = \"\>", "\[InvisibleSpace]",
RowBox[{"x", "+",
SqrtBox[
RowBox[{
SuperscriptBox["x", "2"], "-", "x", "-", "6"}]]}]}],
SequenceForm[
4, ". f(x) = ", $CellContext`x + (-6 - $CellContext`x + $CellContext`x^2)^
Rational[1, 2]],
Editable->False], TraditionalForm]], "Print",
CellChangeTimes->{
3.436075547288706*^9},ExpressionUUID->"507dc0bf-fe44-453c-8213-\
2cc11356fe40"],
Cell[BoxData[
FormBox[
InterpretationBox[
RowBox[{
"5", "\[InvisibleSpace]", "\<\". f(x) = \"\>", "\[InvisibleSpace]",
FractionBox[
RowBox[{
SqrtBox[
RowBox[{
RowBox[{"2", " ",
SuperscriptBox["x", "2"]}], "+", "1"}]], "-",
SqrtBox[
RowBox[{
RowBox[{"3", " ",
SuperscriptBox["x", "2"]}], "-", "1"}]]}],
RowBox[{"1", "-",
RowBox[{"2", " ", "x"}]}]]}],
SequenceForm[
5, ". f(x) = ", (1 - 2 $CellContext`x)^(-1) ((1 + 2 $CellContext`x^2)^
Rational[1, 2] - (-1 + 3 $CellContext`x^2)^Rational[1, 2])],
Editable->False], TraditionalForm]], "Print",
CellChangeTimes->{
3.4360755472921*^9},ExpressionUUID->"6bec991f-19e7-49d0-ac42-0957dfd59678"],
Cell[BoxData[
FormBox[
InterpretationBox[
RowBox[{
"6", "\[InvisibleSpace]", "\<\". f(x) = \"\>", "\[InvisibleSpace]",
FractionBox[
RowBox[{"1", "-",
RowBox[{"5", " ", "x"}]}],
SqrtBox[
RowBox[{
RowBox[{"3", " ",
SuperscriptBox["x", "2"]}], "-", "x", "+", "1"}]]]}],
SequenceForm[
6, ". f(x) = ", (1 -
5 $CellContext`x) (1 - $CellContext`x + 3 $CellContext`x^2)^
Rational[-1, 2]],
Editable->False], TraditionalForm]], "Print",
CellChangeTimes->{
3.436075547295273*^9},ExpressionUUID->"934727ee-9980-44de-825c-\
7d19b4a60592"],
Cell[BoxData[
FormBox[
InterpretationBox[
RowBox[{
"7", "\[InvisibleSpace]", "\<\". f(x) = \"\>", "\[InvisibleSpace]",
FractionBox[
RowBox[{
SqrtBox[
RowBox[{
SuperscriptBox["x", "3"], "-", "1"}]], "-",
SqrtBox[
RowBox[{
RowBox[{"2", " ",
SuperscriptBox["x", "2"]}], "-", "1"}]]}],
RowBox[{"1", "-",
RowBox[{"3", " ", "x"}]}]]}],
SequenceForm[
7, ". f(x) = ", (1 -
3 $CellContext`x)^(-1) (-(-1 + 2 $CellContext`x^2)^
Rational[1, 2] + (-1 + $CellContext`x^3)^Rational[1, 2])],
Editable->False], TraditionalForm]], "Print",
CellChangeTimes->{
3.436075547298573*^9},ExpressionUUID->"1e42268e-4abe-44c9-b791-\
3b03a23afcfa"],
Cell[BoxData[
FormBox[
InterpretationBox[
RowBox[{
"8", "\[InvisibleSpace]", "\<\". f(x) = \"\>", "\[InvisibleSpace]",
FractionBox[
RowBox[{
RowBox[{"3", " ", "x"}], "+", "7"}],
RowBox[{
SqrtBox[
RowBox[{
SuperscriptBox["x", "2"], "-", "4"}]], "-", "1"}]]}],
SequenceForm[
8, ". f(x) = ", (7 + 3 $CellContext`x)/(-1 + (-4 + $CellContext`x^2)^
Rational[1, 2])],
Editable->False], TraditionalForm]], "Print",
CellChangeTimes->{
3.4360755473017273`*^9},ExpressionUUID->"2c046679-223a-4ed5-9574-\
9582ba5ddeb0"],
Cell[BoxData[
FormBox[
InterpretationBox[
RowBox[{
"9", "\[InvisibleSpace]", "\<\". f(x) = \"\>", "\[InvisibleSpace]",
RowBox[{
SqrtBox[
RowBox[{
SuperscriptBox["x", "2"], "+", "1"}]], "-",
SqrtBox[
RowBox[{
SuperscriptBox["x", "2"], "+", "4"}]]}]}],
SequenceForm[
9, ". f(x) = ", (1 + $CellContext`x^2)^Rational[1, 2] - (
4 + $CellContext`x^2)^Rational[1, 2]],
Editable->False], TraditionalForm]], "Print",
CellChangeTimes->{
3.4360755473048973`*^9},ExpressionUUID->"c4df3edc-2635-4c90-b2db-\
9fff993b3fe9"],
Cell[BoxData[
FormBox[
InterpretationBox[
RowBox[{
"10", "\[InvisibleSpace]", "\<\". f(x) = \"\>", "\[InvisibleSpace]",
RowBox[{
SqrtBox[
RowBox[{
RowBox[{"4", " ",
SuperscriptBox["x", "2"]}], "+", "1"}]], "-",
RowBox[{"2", " ",
SqrtBox[
RowBox[{
SuperscriptBox["x", "2"], "-",
RowBox[{"4", " ", "x"}]}]]}]}]}],
SequenceForm[
10, ". f(x) = ", (-2) ((-4) $CellContext`x + $CellContext`x^2)^
Rational[1, 2] + (1 + 4 $CellContext`x^2)^Rational[1, 2]],
Editable->False], TraditionalForm]], "Print",
CellChangeTimes->{
3.4360755473080883`*^9},ExpressionUUID->"f041fa50-b903-4a62-b8da-\
1332d37e3da0"],
Cell[BoxData[
FormBox[
InterpretationBox[
RowBox[{
"11", "\[InvisibleSpace]", "\<\". f(x) = \"\>", "\[InvisibleSpace]",
FractionBox[
RowBox[{"x", "-",
SqrtBox[
RowBox[{
SuperscriptBox["x", "2"], "+",
RowBox[{"2", " ", "x"}], "+", "4"}]]}],
RowBox[{
RowBox[{"3", " ", "x"}], "-",
SqrtBox[
RowBox[{
RowBox[{"9", " ",
SuperscriptBox["x", "2"]}], "+",
RowBox[{"3", " ", "x"}]}]]}]]}],
SequenceForm[
11, ". f(x) = ", ($CellContext`x - (4 +
2 $CellContext`x + $CellContext`x^2)^Rational[1, 2])/(
3 $CellContext`x - (3 $CellContext`x + 9 $CellContext`x^2)^
Rational[1, 2])],
Editable->False], TraditionalForm]], "Print",
CellChangeTimes->{
3.436075547311404*^9},ExpressionUUID->"5108068f-7f4a-4d4b-92cc-\
d1ede5fb3cce"],
Cell[BoxData[
FormBox[
InterpretationBox[
RowBox[{
"12", "\[InvisibleSpace]", "\<\". f(x) = \"\>", "\[InvisibleSpace]",
FractionBox[
SqrtBox[
RowBox[{
SuperscriptBox["x", "2"], "+", "1"}]],
SqrtBox[
RowBox[{
RowBox[{"4", " ",
SuperscriptBox["x", "3"]}], "-", "4"}]]]}],
SequenceForm[
12, ". f(x) = ", (1 + $CellContext`x^2)^
Rational[1, 2] (-4 + 4 $CellContext`x^3)^Rational[-1, 2]],
Editable->False], TraditionalForm]], "Print",
CellChangeTimes->{
3.436075547314549*^9},ExpressionUUID->"c9940bbc-48fa-4689-bf9a-\
c22c2f54d041"],
Cell[BoxData[
FormBox[
InterpretationBox[
RowBox[{
"13", "\[InvisibleSpace]", "\<\". f(x) = \"\>", "\[InvisibleSpace]",
RowBox[{
SqrtBox[
RowBox[{
RowBox[{"4", " ", "x"}], "-", "1"}]], "-",
SqrtBox[
RowBox[{
RowBox[{"4", " ",
SuperscriptBox["x", "2"]}], "-", "4"}]]}]}],
SequenceForm[
13, ". f(x) = ", (-1 + 4 $CellContext`x)^Rational[1, 2] - (-4 +
4 $CellContext`x^2)^Rational[1, 2]],
Editable->False], TraditionalForm]], "Print",
CellChangeTimes->{
3.4360755473175583`*^9},ExpressionUUID->"5765b1df-b46b-4127-956c-\
156f3288da17"],
Cell[BoxData[
FormBox[
InterpretationBox[
RowBox[{
"14", "\[InvisibleSpace]", "\<\". f(x) = \"\>", "\[InvisibleSpace]",
FractionBox[
SqrtBox[
RowBox[{
SuperscriptBox["x", "2"], "-",
RowBox[{"3", " ", "x"}], "+", "2"}]],
RowBox[{
RowBox[{"4", " ", "x"}], "-", "1"}]]}],
SequenceForm[
14, ". f(x) = ", (-1 + 4 $CellContext`x)^(-1) (2 -
3 $CellContext`x + $CellContext`x^2)^Rational[1, 2]],
Editable->False], TraditionalForm]], "Print",
CellChangeTimes->{
3.436075547342228*^9},ExpressionUUID->"fe85dcd3-bf3c-45a8-829f-\
d09986524dae"]
}, Open ]]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell["Solutions", "Section",ExpressionUUID->"02282864-0550-4a33-8d3a-fd96cf853786"],
Cell[CellGroupData[{
Cell[BoxData[{
RowBox[{
RowBox[{"q", "=", "0"}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"q", "+=", "1"}], ";"}],
"\[IndentingNewLine]"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"Print", "[",
RowBox[{"q", ",", "\"\<. Dom f = \>\"", ",",
RowBox[{"Domaine", "[",
RowBox[{
RowBox[{"f", "[",
RowBox[{"x", ",", "q"}], "]"}], ",", "x"}], "]"}]}], "]"}],
";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"AV", "[",
RowBox[{
RowBox[{"f", "[",
RowBox[{"x", ",", "q"}], "]"}], ",", "x"}], "]"}],
";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"AO", "[",
RowBox[{
RowBox[{"f", "[",
RowBox[{"x", ",", "q"}], "]"}], ",", "x"}], "]"}], ";"}],
"\[IndentingNewLine]"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"q", "+=", "1"}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"Print", "[",
RowBox[{"q", ",", "\"\<. Dom f = \>\"", ",",
RowBox[{"Domaine", "[",
RowBox[{
RowBox[{"f", "[",
RowBox[{"x", ",", "q"}], "]"}], ",", "x"}], "]"}]}], "]"}],
";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"AV", "[",
RowBox[{
RowBox[{"f", "[",
RowBox[{"x", ",", "q"}], "]"}], ",", "x"}], "]"}],
";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"AO", "[",
RowBox[{
RowBox[{"f", "[",
RowBox[{"x", ",", "q"}], "]"}], ",", "x"}], "]"}], ";"}],
"\[IndentingNewLine]", "\[IndentingNewLine]"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"q", "+=", "1"}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"Print", "[",
RowBox[{"q", ",", "\"\<. Dom f = \>\"", ",",
RowBox[{"Domaine", "[",
RowBox[{
RowBox[{"f", "[",
RowBox[{"x", ",", "q"}], "]"}], ",", "x"}], "]"}]}], "]"}],
";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"AV", "[",
RowBox[{
RowBox[{"f", "[",
RowBox[{"x", ",", "q"}], "]"}], ",", "x"}], "]"}],
";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"AO", "[",
RowBox[{
RowBox[{"f", "[",
RowBox[{"x", ",", "q"}], "]"}], ",", "x"}], "]"}], ";"}],
"\[IndentingNewLine]", "\[IndentingNewLine]"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"q", "+=", "1"}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"Print", "[",
RowBox[{"q", ",", "\"\<. Dom f = \>\"", ",",
RowBox[{"Domaine", "[",
RowBox[{
RowBox[{"f", "[",
RowBox[{"x", ",", "q"}], "]"}], ",", "x"}], "]"}]}], "]"}],
";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"AV", "[",
RowBox[{
RowBox[{"f", "[",
RowBox[{"x", ",", "q"}], "]"}], ",", "x"}], "]"}],
";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"AO", "[",
RowBox[{
RowBox[{"f", "[",
RowBox[{"x", ",", "q"}], "]"}], ",", "x"}], "]"}], ";"}],
"\[IndentingNewLine]", "\[IndentingNewLine]"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"q", "+=", "1"}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"Print", "[",
RowBox[{"q", ",", "\"\<. Dom f = \>\"", ",",
RowBox[{"Domaine", "[",
RowBox[{
RowBox[{"f", "[",
RowBox[{"x", ",", "q"}], "]"}], ",", "x"}], "]"}]}], "]"}],
";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"AV", "[",
RowBox[{
RowBox[{"f", "[",
RowBox[{"x", ",", "q"}], "]"}], ",", "x"}], "]"}],
";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"AO", "[",
RowBox[{
RowBox[{"f", "[",
RowBox[{"x", ",", "q"}], "]"}], ",", "x"}], "]"}], ";"}],
"\[IndentingNewLine]", "\[IndentingNewLine]"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"q", "+=", "1"}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"Print", "[",
RowBox[{"q", ",", "\"\<. Dom f = \>\"", ",",
RowBox[{"Domaine", "[",
RowBox[{
RowBox[{"f", "[",
RowBox[{"x", ",", "q"}], "]"}], ",", "x"}], "]"}]}], "]"}],
";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"AV", "[",
RowBox[{
RowBox[{"f", "[",
RowBox[{"x", ",", "q"}], "]"}], ",", "x"}], "]"}],
";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"AO", "[",
RowBox[{
RowBox[{"f", "[",
RowBox[{"x", ",", "q"}], "]"}], ",", "x"}], "]"}], ";"}],
"\[IndentingNewLine]", "\[IndentingNewLine]"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"q", "+=", "1"}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"Print", "[",
RowBox[{"q", ",", "\"\<. Dom f = \>\"", ",",
RowBox[{"Domaine", "[",
RowBox[{
RowBox[{"f", "[",
RowBox[{"x", ",", "q"}], "]"}], ",", "x"}], "]"}]}], "]"}],
";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"AV", "[",
RowBox[{
RowBox[{"f", "[",
RowBox[{"x", ",", "q"}], "]"}], ",", "x"}], "]"}],
";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"AO", "[",
RowBox[{
RowBox[{"f", "[",
RowBox[{"x", ",", "q"}], "]"}], ",", "x"}], "]"}], ";"}],
"\[IndentingNewLine]", "\[IndentingNewLine]"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"q", "+=", "1"}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"Print", "[",
RowBox[{"q", ",", "\"\<. Dom f = \>\"", ",",
RowBox[{"Domaine", "[",
RowBox[{
RowBox[{"f", "[",
RowBox[{"x", ",", "q"}], "]"}], ",", "x"}], "]"}]}], "]"}],
";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"AV", "[",
RowBox[{
RowBox[{"f", "[",
RowBox[{"x", ",", "q"}], "]"}], ",", "x"}], "]"}],
";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"AO", "[",
RowBox[{
RowBox[{"f", "[",
RowBox[{"x", ",", "q"}], "]"}], ",", "x"}], "]"}], ";"}],
"\[IndentingNewLine]", "\[IndentingNewLine]"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"q", "+=", "1"}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"Print", "[",
RowBox[{"q", ",", "\"\<. Dom f = \>\"", ",",
RowBox[{"Domaine", "[",
RowBox[{
RowBox[{"f", "[",
RowBox[{"x", ",", "q"}], "]"}], ",", "x"}], "]"}]}], "]"}],
";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"AV", "[",
RowBox[{
RowBox[{"f", "[",
RowBox[{"x", ",", "q"}], "]"}], ",", "x"}], "]"}],
";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"AO", "[",
RowBox[{
RowBox[{"f", "[",
RowBox[{"x", ",", "q"}], "]"}], ",", "x"}], "]"}], ";"}],
"\[IndentingNewLine]"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"q", "+=", "1"}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"Print", "[",
RowBox[{"q", ",", "\"\<. Dom f = \>\"", ",",
RowBox[{"Domaine", "[",
RowBox[{
RowBox[{"f", "[",
RowBox[{"x", ",", "q"}], "]"}], ",", "x"}], "]"}]}], "]"}],
";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"AV", "[",
RowBox[{
RowBox[{"f", "[",
RowBox[{"x", ",", "q"}], "]"}], ",", "x"}], "]"}],
";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"AO", "[",
RowBox[{
RowBox[{"f", "[",
RowBox[{"x", ",", "q"}], "]"}], ",", "x"}], "]"}], ";"}],
"\[IndentingNewLine]"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"q", "+=", "1"}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"Print", "[",
RowBox[{"q", ",", "\"\<. Dom f = \>\"", ",",
RowBox[{"Domaine", "[",
RowBox[{
RowBox[{"f", "[",
RowBox[{"x", ",", "q"}], "]"}], ",", "x"}], "]"}]}], "]"}],
";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"AV", "[",
RowBox[{
RowBox[{"f", "[",
RowBox[{"x", ",", "q"}], "]"}], ",", "x"}], "]"}],
";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"AO", "[",
RowBox[{
RowBox[{"f", "[",
RowBox[{"x", ",", "q"}], "]"}], ",", "x"}], "]"}], ";"}],
"\[IndentingNewLine]"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"q", "+=", "1"}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"Print", "[",
RowBox[{"q", ",", "\"\<. Dom f = \>\"", ",",
RowBox[{"Domaine", "[",
RowBox[{
RowBox[{"f", "[",
RowBox[{"x", ",", "q"}], "]"}], ",", "x"}], "]"}]}], "]"}],
";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"AV", "[",
RowBox[{
RowBox[{"f", "[",
RowBox[{"x", ",", "q"}], "]"}], ",", "x"}], "]"}],
";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"AO", "[",
RowBox[{
RowBox[{"f", "[",
RowBox[{"x", ",", "q"}], "]"}], ",", "x"}], "]"}], ";"}],
"\[IndentingNewLine]"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"q", "+=", "1"}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"Print", "[",
RowBox[{"q", ",", "\"\<. Dom f = \>\"", ",",
RowBox[{"Domaine", "[",
RowBox[{
RowBox[{"f", "[",
RowBox[{"x", ",", "q"}], "]"}], ",", "x"}], "]"}]}], "]"}],
";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"AV", "[",
RowBox[{
RowBox[{"f", "[",
RowBox[{"x", ",", "q"}], "]"}], ",", "x"}], "]"}],
";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"AO", "[",
RowBox[{
RowBox[{"f", "[",
RowBox[{"x", ",", "q"}], "]"}], ",", "x"}], "]"}], ";"}],
"\[IndentingNewLine]", "\[IndentingNewLine]"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"q", "+=", "1"}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"Print", "[",
RowBox[{"q", ",", "\"\<. Dom f = \>\"", ",",
RowBox[{"Domaine", "[",
RowBox[{
RowBox[{"f", "[",
RowBox[{"x", ",", "q"}], "]"}], ",", "x"}], "]"}]}], "]"}],
";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"AV", "[",
RowBox[{
RowBox[{"f", "[",
RowBox[{"x", ",", "q"}], "]"}], ",", "x"}], "]"}],
";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"AO", "[",
RowBox[{
RowBox[{"f", "[",
RowBox[{"x", ",", "q"}], "]"}], ",", "x"}], "]"}], ";"}],
"\[IndentingNewLine]"}], "\[IndentingNewLine]"}], "Input",
CellOpen->False,ExpressionUUID->"655b0707-de5d-4c7d-a03f-9cb013e36caa"],
Cell[CellGroupData[{
Cell[BoxData[
FormBox[
InterpretationBox[
RowBox[{
"1", "\[InvisibleSpace]", "\<\". Dom f = \"\>", "\[InvisibleSpace]",
FormBox[
InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\
\\\\[LongLeftArrow], \\\\!\\\\(TraditionalForm\\\\`0\\\\)]\\\"\\)\\) \[Union] \
\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"[\\\\!\\\\(TraditionalForm\\\
\\`4\\\\), \\\\[LongRightArrow]\\\"\\)\\)\"\>",
StringForm["`1` \[Union] `2`",
analyse`Ens[$CellContext`x <= 0, $CellContext`x],
analyse`Ens[$CellContext`x >= 4, $CellContext`x]],
Editable->False],
TraditionalForm]}],
SequenceForm[1, ". Dom f = ",
analyse`Ens[
Or[$CellContext`x <= 0, $CellContext`x >= 4], $CellContext`x]],
Editable->False], TraditionalForm]], "Print",
CellChangeTimes->{
3.436075551244114*^9},ExpressionUUID->"a86918df-17e2-4f99-81ba-\
40b0c65fd644"],
Cell[BoxData[
FormBox[
InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\\\\\
!\\\\(TraditionalForm\\\\`\\\\\\\"lim\\\\\\\"\\\\+\\\\(x \\\\[Rule] \
0\\\\)\\\\) \\\\!\\\\(TraditionalForm\\\\`\\\\@\\\\(x\\\\^2 - \\\\(\\\\(4\\\\\
\\\\ x\\\\)\\\\)\\\\)\\\\)\\\"\\)\\) = \\!\\(TraditionalForm\\`0\\)\"\>",
StringForm["`1` = `2`",
analyse`Limite[((-4) $CellContext`x + $CellContext`x^2)^
Rational[1, 2], $CellContext`x, 0], 0],
Editable->False], TraditionalForm]], "Print",
CellChangeTimes->{
3.4360755512576923`*^9},ExpressionUUID->"3042b550-8f08-42f6-befd-\
d12debf36c93"],
Cell[BoxData[
FormBox[
InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\\\\\
!\\\\(TraditionalForm\\\\`\\\\\\\"lim\\\\\\\"\\\\+\\\\(x \\\\[Rule] \
4\\\\)\\\\) \\\\!\\\\(TraditionalForm\\\\`\\\\@\\\\(x\\\\^2 - \\\\(\\\\(4\\\\\
\\\\ x\\\\)\\\\)\\\\)\\\\)\\\"\\)\\) = \\!\\(TraditionalForm\\`0\\)\"\>",
StringForm["`1` = `2`",
analyse`Limite[((-4) $CellContext`x + $CellContext`x^2)^
Rational[1, 2], $CellContext`x, 4], 0],
Editable->False], TraditionalForm]], "Print",
CellChangeTimes->{
3.436075551291437*^9},ExpressionUUID->"7cc00021-416e-42c0-ab15-\
05a0365b23eb"],
Cell[BoxData[
FormBox[
InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\\\\\
!\\\\(TraditionalForm\\\\`\\\\\\\"lim\\\\\\\"\\\\+\\\\(x \\\\[Rule] \\\\\\\"+\
\\\\\\\\!\\\\\\\\(TraditionalForm\\\\\\\\`\\\\\\\\[Infinity]\\\\\\\\)\\\\\\\"\
\\\\)\\\\) \\\\!\\\\(TraditionalForm\\\\`\\\\@\\\\(x\\\\^2 - \
\\\\(\\\\(4\\\\\\\\ x\\\\)\\\\)\\\\)\\\\)\\\"\\)\\) = \
\\!\\(TraditionalForm\\`\\\"+\\\\!\\\\(TraditionalForm\\\\`\\\\[Infinity]\\\\)\
\\\"\\)\"\>",
StringForm["`1` = `2`",
analyse`Limite[((-4) $CellContext`x + $CellContext`x^2)^
Rational[1, 2], $CellContext`x,
DirectedInfinity[1]],
StringForm["+`1`",
DirectedInfinity[1]]],
Editable->False], TraditionalForm]], "Print",
CellChangeTimes->{
3.436075551326417*^9},ExpressionUUID->"0d2ae301-6dbf-49e7-98bc-\
f466cfe1df59"],
Cell[BoxData[
FormBox[
InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\\\\\
!\\\\(TraditionalForm\\\\`\\\\\\\"lim\\\\\\\"\\\\+\\\\(x \\\\[Rule] \
\\\\(\\\\(-\\\\[Infinity]\\\\)\\\\)\\\\)\\\\) \
\\\\!\\\\(TraditionalForm\\\\`\\\\@\\\\(x\\\\^2 - \\\\(\\\\(4\\\\\\\\ \
x\\\\)\\\\)\\\\)\\\\)\\\"\\)\\) = \
\\!\\(TraditionalForm\\`\\\"+\\\\!\\\\(TraditionalForm\\\\`\\\\[Infinity]\\\\)\
\\\"\\)\"\>",
StringForm["`1` = `2`",
analyse`Limite[((-4) $CellContext`x + $CellContext`x^2)^
Rational[1, 2], $CellContext`x,
DirectedInfinity[-1]],
StringForm["+`1`",
DirectedInfinity[1]]],
Editable->False], TraditionalForm]], "Print",
CellChangeTimes->{
3.436075551342074*^9},ExpressionUUID->"22a2feb9-3cce-489d-9c93-\
7cd57656c49c"],
Cell[BoxData[
FormBox[
InterpretationBox[
RowBox[{"\<\"AO\"\>", "\[InvisibleSpace]", "\<\" \[Congruent] \"\>",
"\[InvisibleSpace]",
RowBox[{"y", "\[LongEqual]",
RowBox[{"x", "-", "2"}]}],
"\[InvisibleSpace]", "\<\" \[AGrave] droite\"\>"}],
SequenceForm[
"AO", " \[Congruent] ", $CellContext`y == -2 + $CellContext`x,
" \[AGrave] droite"],
Editable->False], TraditionalForm]], "Print",
CellChangeTimes->{
3.436075551391955*^9},ExpressionUUID->"c37d4a81-b2b0-4137-a20b-\
c8860804ff64"],
Cell[BoxData[
FormBox[
InterpretationBox[
RowBox[{"\<\"AO\"\>", "\[InvisibleSpace]", "\<\" \[Congruent] \"\>",
"\[InvisibleSpace]",
RowBox[{"y", "\[LongEqual]",
RowBox[{"2", "-", "x"}]}],
"\[InvisibleSpace]", "\<\" \[AGrave] gauche\"\>"}],
SequenceForm[
"AO", " \[Congruent] ", $CellContext`y == 2 - $CellContext`x,
" \[AGrave] gauche"],
Editable->False], TraditionalForm]], "Print",
CellChangeTimes->{
3.4360755513940353`*^9},ExpressionUUID->"d1348762-c4d9-4431-bc5f-\
c108cfc415e5"],
Cell[BoxData[
FormBox[
InterpretationBox[
RowBox[{
"2", "\[InvisibleSpace]", "\<\". Dom f = \"\>", "\[InvisibleSpace]",
FormBox[
InterpretationBox["\<\"]\\!\\(TraditionalForm\\`1\\/2\\), \
\[LongRightArrow]\"\>",
StringForm["]`1`, \[LongRightArrow]",
Rational[1, 2]],
Editable->False],
TraditionalForm]}],
SequenceForm[2, ". Dom f = ",
analyse`Ens[$CellContext`x > Rational[1, 2], $CellContext`x]],
Editable->False], TraditionalForm]], "Print",
CellChangeTimes->{
3.43607555140786*^9},ExpressionUUID->"dfea10c9-f6ca-4de4-a2fb-a940cf955cad"],
Cell[BoxData[
FormBox[
InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\\\\\
!\\\\(TraditionalForm\\\\`\\\\\\\"lim\\\\\\\"\\\\+\\\\(\\\\(x \\\\[Rule] \
1\\\\/2\\\\)\\\\+\\\\\\\">\\\\\\\"\\\\)\\\\) \\\\!\\\\(TraditionalForm\\\\`\\\
\\(3 + 1\\\\/\\\\@\\\\(\\\\(\\\\(2\\\\\\\\ x\\\\)\\\\) - 1\\\\)\\\\)\\\\)\\\"\
\\)\\) = \\!\\(TraditionalForm\\`\\\"+\\\\!\\\\(TraditionalForm\\\\`\\\\[\
Infinity]\\\\)\\\"\\)\"\>",
StringForm["`1` = `2`",
analyse`Limite[
3 + (-1 + 2 $CellContext`x)^Rational[-1, 2], $CellContext`x,
Rational[1, 2], 1],
StringForm["+`1`",
DirectedInfinity[1]]],
Editable->False], TraditionalForm]], "Print",
CellChangeTimes->{
3.436075551442747*^9},ExpressionUUID->"36800d91-fbe8-44e1-aea2-\
4612d54d23ec"],
Cell[BoxData[
FormBox[
InterpretationBox["\<\"AV \[Congruent] \\!\\(TraditionalForm\\`x\\) = \
\\!\\(TraditionalForm\\`1\\/2\\) a droite\"\>",
StringForm["AV \[Congruent] `1` = `2` a droite", $CellContext`x,
Rational[1, 2]],
Editable->False], TraditionalForm]], "Print",
CellChangeTimes->{
3.436075551464753*^9},ExpressionUUID->"364ba158-f618-4356-bb87-\
69fa6caf9da1"],
Cell[BoxData[
FormBox[
InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\\\\\
!\\\\(TraditionalForm\\\\`\\\\\\\"lim\\\\\\\"\\\\+\\\\(x \\\\[Rule] \\\\\\\"+\
\\\\\\\\!\\\\\\\\(TraditionalForm\\\\\\\\`\\\\\\\\[Infinity]\\\\\\\\)\\\\\\\"\
\\\\)\\\\) \\\\!\\\\(TraditionalForm\\\\`\\\\(3 + 1\\\\/\\\\@\\\\(\\\\(\\\\(2\
\\\\\\\\ x\\\\)\\\\) - 1\\\\)\\\\)\\\\)\\\"\\)\\) = \\!\\(TraditionalForm\\`3\
\\)\"\>",
StringForm["`1` = `2`",
analyse`Limite[
3 + (-1 + 2 $CellContext`x)^Rational[-1, 2], $CellContext`x,
DirectedInfinity[1]], 3],
Editable->False], TraditionalForm]], "Print",
CellChangeTimes->{
3.436075551490712*^9},ExpressionUUID->"cbf7b4c0-e299-4f1c-83e3-\
c1f5e0ffa3af"],
Cell[BoxData[
FormBox[
InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\\\\\
!\\\\(TraditionalForm\\\\`\\\\\\\"lim\\\\\\\"\\\\+\\\\(x \\\\[Rule] \
\\\\(\\\\(-\\\\[Infinity]\\\\)\\\\)\\\\)\\\\) \
\\\\!\\\\(TraditionalForm\\\\`\\\\(3 + 1\\\\/\\\\@\\\\(\\\\(\\\\(2\\\\\\\\ \
x\\\\)\\\\) - 1\\\\)\\\\)\\\\)\\\"\\)\\) n'existe pas\"\>",
StringForm["`1` `2`",
analyse`Limite[
3 + (-1 + 2 $CellContext`x)^Rational[-1, 2], $CellContext`x,
DirectedInfinity[-1]], " n'existe pas"],
Editable->False], TraditionalForm]], "Print",
CellChangeTimes->{
3.43607555152343*^9},ExpressionUUID->"edf7a810-2b95-4a43-a882-d1b416a10a09"],
Cell[BoxData[
FormBox[
InterpretationBox[
RowBox[{"\<\"AH\"\>", "\[InvisibleSpace]", "\<\" \[Congruent] \"\>",
"\[InvisibleSpace]",
RowBox[{"y", "\[LongEqual]", "3"}],
"\[InvisibleSpace]", "\<\" \[AGrave] droite\"\>"}],
SequenceForm[
"AH", " \[Congruent] ", $CellContext`y == 3, " \[AGrave] droite"],
Editable->False], TraditionalForm]], "Print",
CellChangeTimes->{
3.436075551557743*^9},ExpressionUUID->"f2414ca8-a83e-4bd1-863e-\
7471e43ea755"],
Cell[BoxData[
FormBox[
InterpretationBox[
RowBox[{
"3", "\[InvisibleSpace]", "\<\". Dom f = \"\>", "\[InvisibleSpace]",
FormBox[
TagBox["\[DoubleStruckCapitalR]",
Function[{}, Reals]],
TraditionalForm]}],
SequenceForm[3, ". Dom f = ",
analyse`Ens[True, $CellContext`x]],
Editable->False], TraditionalForm]], "Print",
CellChangeTimes->{
3.436075551591865*^9},ExpressionUUID->"1faf506b-06e8-4836-9788-\
88259c62584f"],
Cell[BoxData[
FormBox["\<\"pas d'asymptote verticale\"\>", TraditionalForm]], "Print",
CellChangeTimes->{
3.436075551623801*^9},ExpressionUUID->"8a4ded6f-e1cd-45f4-82b4-\
31c443b9b9c8"],
Cell[BoxData[
FormBox[
InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\\\\\
!\\\\(TraditionalForm\\\\`\\\\\\\"lim\\\\\\\"\\\\+\\\\(x \\\\[Rule] \\\\\\\"+\
\\\\\\\\!\\\\\\\\(TraditionalForm\\\\\\\\`\\\\\\\\[Infinity]\\\\\\\\)\\\\\\\"\
\\\\)\\\\) \\\\!\\\\(TraditionalForm\\\\`\\\\@\\\\(x\\\\^2 + \
\\\\(\\\\(2\\\\\\\\ x\\\\)\\\\) + 3\\\\)\\\\)\\\"\\)\\) = \
\\!\\(TraditionalForm\\`\\\"+\\\\!\\\\(TraditionalForm\\\\`\\\\[Infinity]\\\\)\
\\\"\\)\"\>",
StringForm["`1` = `2`",
analyse`Limite[(3 + 2 $CellContext`x + $CellContext`x^2)^
Rational[1, 2], $CellContext`x,
DirectedInfinity[1]],
StringForm["+`1`",
DirectedInfinity[1]]],
Editable->False], TraditionalForm]], "Print",
CellChangeTimes->{
3.4360755516574297`*^9},ExpressionUUID->"f510bc15-775e-4c56-8c1e-\
44f9d6274d5a"],
Cell[BoxData[
FormBox[
InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\\\\\
!\\\\(TraditionalForm\\\\`\\\\\\\"lim\\\\\\\"\\\\+\\\\(x \\\\[Rule] \
\\\\(\\\\(-\\\\[Infinity]\\\\)\\\\)\\\\)\\\\) \
\\\\!\\\\(TraditionalForm\\\\`\\\\@\\\\(x\\\\^2 + \\\\(\\\\(2\\\\\\\\ \
x\\\\)\\\\) + 3\\\\)\\\\)\\\"\\)\\) = \
\\!\\(TraditionalForm\\`\\\"+\\\\!\\\\(TraditionalForm\\\\`\\\\[Infinity]\\\\)\
\\\"\\)\"\>",
StringForm["`1` = `2`",
analyse`Limite[(3 + 2 $CellContext`x + $CellContext`x^2)^
Rational[1, 2], $CellContext`x,
DirectedInfinity[-1]],
StringForm["+`1`",
DirectedInfinity[1]]],
Editable->False], TraditionalForm]], "Print",
CellChangeTimes->{
3.436075551691565*^9},ExpressionUUID->"c5215492-48e1-46b6-a3db-\
53ac08057b6e"],
Cell[BoxData[
FormBox[
InterpretationBox[
RowBox[{"\<\"AO\"\>", "\[InvisibleSpace]", "\<\" \[Congruent] \"\>",
"\[InvisibleSpace]",
RowBox[{"y", "\[LongEqual]",
RowBox[{"x", "+", "1"}]}],
"\[InvisibleSpace]", "\<\" \[AGrave] droite\"\>"}],
SequenceForm[
"AO", " \[Congruent] ", $CellContext`y == 1 + $CellContext`x,
" \[AGrave] droite"],
Editable->False], TraditionalForm]], "Print",
CellChangeTimes->{
3.436075551724711*^9},ExpressionUUID->"7784695b-999a-47f4-a562-\
572c6394f0e3"],
Cell[BoxData[
FormBox[
InterpretationBox[
RowBox[{"\<\"AO\"\>", "\[InvisibleSpace]", "\<\" \[Congruent] \"\>",
"\[InvisibleSpace]",
RowBox[{"y", "\[LongEqual]",
RowBox[{
RowBox[{"-", "x"}], "-", "1"}]}],
"\[InvisibleSpace]", "\<\" \[AGrave] gauche\"\>"}],
SequenceForm[
"AO", " \[Congruent] ", $CellContext`y == -1 - $CellContext`x,
" \[AGrave] gauche"],
Editable->False], TraditionalForm]], "Print",
CellChangeTimes->{
3.4360755517581*^9},ExpressionUUID->"1cc227d2-99b9-4ae0-8af4-ff6d8a8784d3"],
Cell[BoxData[
FormBox[
InterpretationBox[
RowBox[{
"4", "\[InvisibleSpace]", "\<\". Dom f = \"\>", "\[InvisibleSpace]",
FormBox[
InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\
\\\\[LongLeftArrow], \
\\\\!\\\\(TraditionalForm\\\\`\\\\(-2\\\\)\\\\)]\\\"\\)\\) \[Union] \
\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"[\\\\!\\\\(TraditionalForm\\\
\\`3\\\\), \\\\[LongRightArrow]\\\"\\)\\)\"\>",
StringForm["`1` \[Union] `2`",
analyse`Ens[$CellContext`x <= -2, $CellContext`x],
analyse`Ens[$CellContext`x >= 3, $CellContext`x]],
Editable->False],
TraditionalForm]}],
SequenceForm[4, ". Dom f = ",
analyse`Ens[
Or[$CellContext`x <= -2, $CellContext`x >= 3], $CellContext`x]],
Editable->False], TraditionalForm]], "Print",
CellChangeTimes->{
3.4360755517914867`*^9},ExpressionUUID->"6f6bb0c3-ae06-4ddb-afbd-\
9d0ec41790b1"],
Cell[BoxData[
FormBox[
InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\\\\\
!\\\\(TraditionalForm\\\\`\\\\\\\"lim\\\\\\\"\\\\+\\\\(x \\\\[Rule] \
\\\\(\\\\(-2\\\\)\\\\)\\\\)\\\\) \\\\!\\\\(TraditionalForm\\\\`\\\\(x + \\\\@\
\\\\(x\\\\^2 - x - 6\\\\)\\\\)\\\\)\\\"\\)\\) = \\!\\(TraditionalForm\\`\\(-2\
\\)\\)\"\>",
StringForm["`1` = `2`",
analyse`Limite[$CellContext`x + (-6 - $CellContext`x + $CellContext`x^2)^
Rational[1, 2], $CellContext`x, -2], -2],
Editable->False], TraditionalForm]], "Print",
CellChangeTimes->{
3.436075551824614*^9},ExpressionUUID->"4f75449b-11b6-4a8b-b648-\
a68b008b3441"],
Cell[BoxData[
FormBox[
InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\\\\\
!\\\\(TraditionalForm\\\\`\\\\\\\"lim\\\\\\\"\\\\+\\\\(x \\\\[Rule] \
3\\\\)\\\\) \\\\!\\\\(TraditionalForm\\\\`\\\\(x + \\\\@\\\\(x\\\\^2 - x - \
6\\\\)\\\\)\\\\)\\\"\\)\\) = \\!\\(TraditionalForm\\`3\\)\"\>",
StringForm["`1` = `2`",
analyse`Limite[$CellContext`x + (-6 - $CellContext`x + $CellContext`x^2)^
Rational[1, 2], $CellContext`x, 3], 3],
Editable->False], TraditionalForm]], "Print",
CellChangeTimes->{
3.436075551858543*^9},ExpressionUUID->"2d3c8354-cf3d-4f49-9c1a-\
d53ba2b3ae67"],
Cell[BoxData[
FormBox[
InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\\\\\
!\\\\(TraditionalForm\\\\`\\\\\\\"lim\\\\\\\"\\\\+\\\\(x \\\\[Rule] \\\\\\\"+\
\\\\\\\\!\\\\\\\\(TraditionalForm\\\\\\\\`\\\\\\\\[Infinity]\\\\\\\\)\\\\\\\"\
\\\\)\\\\) \\\\!\\\\(TraditionalForm\\\\`\\\\(x + \\\\@\\\\(x\\\\^2 - x - 6\\\
\\)\\\\)\\\\)\\\"\\)\\) = \
\\!\\(TraditionalForm\\`\\\"+\\\\!\\\\(TraditionalForm\\\\`\\\\[Infinity]\\\\)\
\\\"\\)\"\>",
StringForm["`1` = `2`",
analyse`Limite[$CellContext`x + (-6 - $CellContext`x + $CellContext`x^2)^
Rational[1, 2], $CellContext`x,
DirectedInfinity[1]],
StringForm["+`1`",
DirectedInfinity[1]]],
Editable->False], TraditionalForm]], "Print",
CellChangeTimes->{
3.436075551892296*^9},ExpressionUUID->"2ba78f60-cf47-4721-9a83-\
25b970c3c2f9"],
Cell[BoxData[
FormBox[
InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\\\\\
!\\\\(TraditionalForm\\\\`\\\\\\\"lim\\\\\\\"\\\\+\\\\(x \\\\[Rule] \
\\\\(\\\\(-\\\\[Infinity]\\\\)\\\\)\\\\)\\\\) \
\\\\!\\\\(TraditionalForm\\\\`\\\\(x + \\\\@\\\\(x\\\\^2 - x - \
6\\\\)\\\\)\\\\)\\\"\\)\\) = \\!\\(TraditionalForm\\`1\\/2\\)\"\>",
StringForm["`1` = `2`",
analyse`Limite[$CellContext`x + (-6 - $CellContext`x + $CellContext`x^2)^
Rational[1, 2], $CellContext`x,
DirectedInfinity[-1]],
Rational[1, 2]],
Editable->False], TraditionalForm]], "Print",
CellChangeTimes->{
3.436075551929509*^9},ExpressionUUID->"6c1cf9ec-aa50-492f-96d4-\
dc34a0ad69ae"],
Cell[BoxData[
FormBox[
InterpretationBox[
RowBox[{"\<\"AH\"\>", "\[InvisibleSpace]", "\<\" \[Congruent] \"\>",
"\[InvisibleSpace]",
RowBox[{"y", "\[LongEqual]",
FractionBox["1", "2"]}],
"\[InvisibleSpace]", "\<\" \[AGrave] gauche\"\>"}],
SequenceForm[
"AH", " \[Congruent] ", $CellContext`y == Rational[1, 2],
" \[AGrave] gauche"],
Editable->False], TraditionalForm]], "Print",
CellChangeTimes->{
3.436075551959133*^9},ExpressionUUID->"b413d597-9b12-41a4-b815-\
4031dc306a06"],
Cell[BoxData[
FormBox[
InterpretationBox[
RowBox[{
"5", "\[InvisibleSpace]", "\<\". Dom f = \"\>", "\[InvisibleSpace]",
FormBox[
InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\
\\\\[LongLeftArrow], \
\\\\!\\\\(TraditionalForm\\\\`\\\\(-\\\\(\\\\(1\\\\/\\\\@3\\\\)\\\\)\\\\)\\\\)\
]\\\"\\)\\) \[Union] \
\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"[\\\\!\\\\(TraditionalForm\\\
\\`1\\\\/\\\\@3\\\\), \\\\[LongRightArrow]\\\"\\)\\)\"\>",
StringForm["`1` \[Union] `2`",
analyse`Ens[$CellContext`x <= -3^Rational[-1, 2], $CellContext`x],
analyse`Ens[$CellContext`x >= 3^Rational[-1, 2], $CellContext`x]],
Editable->False],
TraditionalForm]}],
SequenceForm[5, ". Dom f = ",
analyse`Ens[
Or[$CellContext`x <= -3^Rational[-1, 2], $CellContext`x >=
3^Rational[-1, 2]], $CellContext`x]],
Editable->False], TraditionalForm]], "Print",
CellChangeTimes->{
3.4360755519928617`*^9},ExpressionUUID->"0daae26a-9e5f-433d-8238-\
fafdc91d2393"],
Cell[BoxData[
FormBox[
InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\\\\\
!\\\\(TraditionalForm\\\\`\\\\\\\"lim\\\\\\\"\\\\+\\\\(x \\\\[Rule] \
\\\\(\\\\(-\\\\(\\\\(1\\\\/\\\\@3\\\\)\\\\)\\\\)\\\\)\\\\)\\\\) \
\\\\!\\\\(TraditionalForm\\\\`\\\\(\\\\@\\\\(\\\\(\\\\(2\\\\\\\\ x\\\\^2\\\\)\
\\\\) + 1\\\\) - \\\\@\\\\(\\\\(\\\\(3\\\\\\\\ x\\\\^2\\\\)\\\\) - \
1\\\\)\\\\)\\\\/\\\\(1 - \\\\(\\\\(2\\\\\\\\ x\\\\)\\\\)\\\\)\\\\)\\\"\\)\\) \
= \\!\\(TraditionalForm\\`\\@15\\/\\(3 + \\(\\(2\\\\ \\@3\\)\\)\\)\\)\"\>",
StringForm["`1` = `2`",
analyse`Limite[(1 - 2 $CellContext`x)^(-1) ((1 + 2 $CellContext`x^2)^
Rational[1, 2] - (-1 + 3 $CellContext`x^2)^
Rational[1, 2]), $CellContext`x, -3^Rational[-1, 2]],
15^Rational[1, 2]/(3 + 2 3^Rational[1, 2])],
Editable->False], TraditionalForm]], "Print",
CellChangeTimes->{
3.436075552295627*^9},ExpressionUUID->"2cd3c441-4b57-49ba-9b7d-\
ae6476852c19"],
Cell[BoxData[
FormBox[
InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\\\\\
!\\\\(TraditionalForm\\\\`\\\\\\\"lim\\\\\\\"\\\\+\\\\(x \\\\[Rule] \
1\\\\/\\\\@3\\\\)\\\\) \
\\\\!\\\\(TraditionalForm\\\\`\\\\(\\\\@\\\\(\\\\(\\\\(2\\\\\\\\ x\\\\^2\\\\)\
\\\\) + 1\\\\) - \\\\@\\\\(\\\\(\\\\(3\\\\\\\\ x\\\\^2\\\\)\\\\) - \
1\\\\)\\\\)\\\\/\\\\(1 - \\\\(\\\\(2\\\\\\\\ x\\\\)\\\\)\\\\)\\\\)\\\"\\)\\) \
= \\!\\(TraditionalForm\\`\\@15\\/\\(3 - \\(\\(2\\\\ \\@3\\)\\)\\)\\)\"\>",
StringForm["`1` = `2`",
analyse`Limite[(1 - 2 $CellContext`x)^(-1) ((1 + 2 $CellContext`x^2)^
Rational[1, 2] - (-1 + 3 $CellContext`x^2)^
Rational[1, 2]), $CellContext`x, 3^Rational[-1, 2]], 15^Rational[1, 2]/(
3 - 2 3^Rational[1, 2])],
Editable->False], TraditionalForm]], "Print",
CellChangeTimes->{
3.436075552680986*^9},ExpressionUUID->"16108d40-2b33-4292-a034-\
694411898109"],
Cell[BoxData[
FormBox[
InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\\\\\
!\\\\(TraditionalForm\\\\`\\\\\\\"lim\\\\\\\"\\\\+\\\\(x \\\\[Rule] \\\\\\\"+\
\\\\\\\\!\\\\\\\\(TraditionalForm\\\\\\\\`\\\\\\\\[Infinity]\\\\\\\\)\\\\\\\"\
\\\\)\\\\) \\\\!\\\\(TraditionalForm\\\\`\\\\(\\\\@\\\\(\\\\(\\\\(2\\\\\\\\ x\
\\\\^2\\\\)\\\\) + 1\\\\) - \\\\@\\\\(\\\\(\\\\(3\\\\\\\\ x\\\\^2\\\\)\\\\) - \
1\\\\)\\\\)\\\\/\\\\(1 - \\\\(\\\\(2\\\\\\\\ x\\\\)\\\\)\\\\)\\\\)\\\"\\)\\) \
= \\!\\(TraditionalForm\\`\\(\\(\\(-\\(\\(1\\/\\@2\\)\\)\\)\\) + \
\\@3\\/2\\)\\)\"\>",
StringForm["`1` = `2`",
analyse`Limite[(1 - 2 $CellContext`x)^(-1) ((1 + 2 $CellContext`x^2)^
Rational[1, 2] - (-1 + 3 $CellContext`x^2)^
Rational[1, 2]), $CellContext`x,
DirectedInfinity[1]], -2^Rational[-1, 2] +
Rational[1, 2] 3^Rational[1, 2]],
Editable->False], TraditionalForm]], "Print",
CellChangeTimes->{
3.436075552893558*^9},ExpressionUUID->"0ae8e625-1136-4162-8d78-\
019a6bc313e1"],
Cell[BoxData[
FormBox[
InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\\\\\
!\\\\(TraditionalForm\\\\`\\\\\\\"lim\\\\\\\"\\\\+\\\\(x \\\\[Rule] \
\\\\(\\\\(-\\\\[Infinity]\\\\)\\\\)\\\\)\\\\) \
\\\\!\\\\(TraditionalForm\\\\`\\\\(\\\\@\\\\(\\\\(\\\\(2\\\\\\\\ x\\\\^2\\\\)\
\\\\) + 1\\\\) - \\\\@\\\\(\\\\(\\\\(3\\\\\\\\ x\\\\^2\\\\)\\\\) - \
1\\\\)\\\\)\\\\/\\\\(1 - \\\\(\\\\(2\\\\\\\\ x\\\\)\\\\)\\\\)\\\\)\\\"\\)\\) \
= \\!\\(TraditionalForm\\`\\(1\\/\\@2 - \\@3\\/2\\)\\)\"\>",
StringForm["`1` = `2`",
analyse`Limite[(1 - 2 $CellContext`x)^(-1) ((1 + 2 $CellContext`x^2)^
Rational[1, 2] - (-1 + 3 $CellContext`x^2)^
Rational[1, 2]), $CellContext`x,
DirectedInfinity[-1]], 2^Rational[-1, 2] +
Rational[-1, 2] 3^Rational[1, 2]],
Editable->False], TraditionalForm]], "Print",
CellChangeTimes->{
3.436075552960555*^9},ExpressionUUID->"43d3e7e8-0c72-4697-9464-\
d67a6343e0d8"],
Cell[BoxData[
FormBox[
InterpretationBox[
RowBox[{"\<\"AH\"\>", "\[InvisibleSpace]", "\<\" \[Congruent] \"\>",
"\[InvisibleSpace]",
RowBox[{"y", "\[LongEqual]",
RowBox[{
RowBox[{"-",
FractionBox["1",
SqrtBox["2"]]}], "+",
FractionBox[
SqrtBox["3"], "2"]}]}],
"\[InvisibleSpace]", "\<\" \[AGrave] droite\"\>"}],
SequenceForm[
"AH", " \[Congruent] ", $CellContext`y == -2^Rational[-1, 2] +
Rational[1, 2] 3^Rational[1, 2], " \[AGrave] droite"],
Editable->False], TraditionalForm]], "Print",
CellChangeTimes->{
3.436075553062352*^9},ExpressionUUID->"7ed462cb-fe72-4ea6-b635-\
575c590a7410"],
Cell[BoxData[
FormBox[
InterpretationBox[
RowBox[{"\<\"AH\"\>", "\[InvisibleSpace]", "\<\" \[Congruent] \"\>",
"\[InvisibleSpace]",
RowBox[{"y", "\[LongEqual]",
RowBox[{
FractionBox["1",
SqrtBox["2"]], "-",
FractionBox[
SqrtBox["3"], "2"]}]}],
"\[InvisibleSpace]", "\<\" \[AGrave] gauche\"\>"}],
SequenceForm[
"AH", " \[Congruent] ", $CellContext`y ==
2^Rational[-1, 2] + Rational[-1, 2] 3^Rational[1, 2], " \[AGrave] gauche"],
Editable->False], TraditionalForm]], "Print",
CellChangeTimes->{
3.436075553082355*^9},ExpressionUUID->"22a4cd80-ca3a-40e3-b3cd-\
cc07f1874f9e"],
Cell[BoxData[
FormBox[
InterpretationBox[
RowBox[{
"6", "\[InvisibleSpace]", "\<\". Dom f = \"\>", "\[InvisibleSpace]",
FormBox[
TagBox["\[DoubleStruckCapitalR]",
Function[{}, Reals]],
TraditionalForm]}],
SequenceForm[6, ". Dom f = ",
analyse`Ens[True, $CellContext`x]],
Editable->False], TraditionalForm]], "Print",
CellChangeTimes->{
3.43607555311259*^9},ExpressionUUID->"0ba18544-4da0-482d-a03e-0db6f8609093"],
Cell[BoxData[
FormBox["\<\"pas d'asymptote verticale\"\>", TraditionalForm]], "Print",
CellChangeTimes->{
3.436075553146687*^9},ExpressionUUID->"dfa2121a-bb65-4eb3-a961-\
5496940e235a"],
Cell[BoxData[
FormBox[
InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\\\\\
!\\\\(TraditionalForm\\\\`\\\\\\\"lim\\\\\\\"\\\\+\\\\(x \\\\[Rule] \\\\\\\"+\
\\\\\\\\!\\\\\\\\(TraditionalForm\\\\\\\\`\\\\\\\\[Infinity]\\\\\\\\)\\\\\\\"\
\\\\)\\\\) \\\\!\\\\(TraditionalForm\\\\`\\\\(1 - \\\\(\\\\(5\\\\\\\\ \
x\\\\)\\\\)\\\\)\\\\/\\\\@\\\\(\\\\(\\\\(3\\\\\\\\ x\\\\^2\\\\)\\\\) - x + \
1\\\\)\\\\)\\\"\\)\\) = \
\\!\\(TraditionalForm\\`\\(-\\(\\(5\\/\\@3\\)\\)\\)\\)\"\>",
StringForm["`1` = `2`",
analyse`Limite[(1 -
5 $CellContext`x) (1 - $CellContext`x + 3 $CellContext`x^2)^
Rational[-1, 2], $CellContext`x,
DirectedInfinity[1]], (-5) 3^Rational[-1, 2]],
Editable->False], TraditionalForm]], "Print",
CellChangeTimes->{
3.436075553180492*^9},ExpressionUUID->"64779bb2-f206-403a-a90a-\
2ca24db86d8d"],
Cell[BoxData[
FormBox[
InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\\\\\
!\\\\(TraditionalForm\\\\`\\\\\\\"lim\\\\\\\"\\\\+\\\\(x \\\\[Rule] \
\\\\(\\\\(-\\\\[Infinity]\\\\)\\\\)\\\\)\\\\) \
\\\\!\\\\(TraditionalForm\\\\`\\\\(1 - \\\\(\\\\(5\\\\\\\\ x\\\\)\\\\)\\\\)\\\
\\/\\\\@\\\\(\\\\(\\\\(3\\\\\\\\ x\\\\^2\\\\)\\\\) - x + \
1\\\\)\\\\)\\\"\\)\\) = \\!\\(TraditionalForm\\`5\\/\\@3\\)\"\>",
StringForm["`1` = `2`",
analyse`Limite[(1 -
5 $CellContext`x) (1 - $CellContext`x + 3 $CellContext`x^2)^
Rational[-1, 2], $CellContext`x,
DirectedInfinity[-1]], 5 3^Rational[-1, 2]],
Editable->False], TraditionalForm]], "Print",
CellChangeTimes->{
3.436075553213975*^9},ExpressionUUID->"9488a61c-300d-4089-ab24-\
89fddb303214"],
Cell[BoxData[
FormBox[
InterpretationBox[
RowBox[{"\<\"AH\"\>", "\[InvisibleSpace]", "\<\" \[Congruent] \"\>",
"\[InvisibleSpace]",
RowBox[{"y", "\[LongEqual]",
RowBox[{"-",
FractionBox["5",
SqrtBox["3"]]}]}], "\[InvisibleSpace]", "\<\" \[AGrave] droite\"\>"}],
SequenceForm[
"AH", " \[Congruent] ", $CellContext`y == (-5) 3^Rational[-1, 2],
" \[AGrave] droite"],
Editable->False], TraditionalForm]], "Print",
CellChangeTimes->{
3.4360755532806168`*^9},ExpressionUUID->"fd3d3dc6-81d5-43cd-8537-\
22abbc75cc64"],
Cell[BoxData[
FormBox[
InterpretationBox[
RowBox[{"\<\"AH\"\>", "\[InvisibleSpace]", "\<\" \[Congruent] \"\>",
"\[InvisibleSpace]",
RowBox[{"y", "\[LongEqual]",
FractionBox["5",
SqrtBox["3"]]}], "\[InvisibleSpace]", "\<\" \[AGrave] gauche\"\>"}],
SequenceForm[
"AH", " \[Congruent] ", $CellContext`y == 5 3^Rational[-1, 2],
" \[AGrave] gauche"],
Editable->False], TraditionalForm]], "Print",
CellChangeTimes->{
3.436075553301564*^9},ExpressionUUID->"454119a0-febc-4b7e-983c-\
e8454b3538cb"],
Cell[BoxData[
FormBox[
InterpretationBox[
RowBox[{
"7", "\[InvisibleSpace]", "\<\". Dom f = \"\>", "\[InvisibleSpace]",
FormBox[
InterpretationBox["\<\"[\\!\\(TraditionalForm\\`1\\), \
\[LongRightArrow]\"\>",
StringForm["[`1`, \[LongRightArrow]", 1],
Editable->False],
TraditionalForm]}],
SequenceForm[7, ". Dom f = ",
analyse`Ens[$CellContext`x >= 1, $CellContext`x]],
Editable->False], TraditionalForm]], "Print",
CellChangeTimes->{
3.4360755533303223`*^9},ExpressionUUID->"7f7f8088-eeaf-4389-b3ad-\
1a37ffb70544"],
Cell[BoxData[
FormBox[
InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\\\\\
!\\\\(TraditionalForm\\\\`\\\\\\\"lim\\\\\\\"\\\\+\\\\(x \\\\[Rule] \
1\\\\)\\\\) \\\\!\\\\(TraditionalForm\\\\`\\\\(\\\\@\\\\(x\\\\^3 - 1\\\\) - \
\\\\@\\\\(\\\\(\\\\(2\\\\\\\\ x\\\\^2\\\\)\\\\) - 1\\\\)\\\\)\\\\/\\\\(1 - \\\
\\(\\\\(3\\\\\\\\ x\\\\)\\\\)\\\\)\\\\)\\\"\\)\\) = \\!\\(TraditionalForm\\`1\
\\/2\\)\"\>",
StringForm["`1` = `2`",
analyse`Limite[(1 -
3 $CellContext`x)^(-1) (-(-1 + 2 $CellContext`x^2)^
Rational[1, 2] + (-1 + $CellContext`x^3)^
Rational[1, 2]), $CellContext`x, 1],
Rational[1, 2]],
Editable->False], TraditionalForm]], "Print",
CellChangeTimes->{
3.4360755533939953`*^9},ExpressionUUID->"2a8ca3f5-e7b8-4b89-9c4a-\
aa791709f651"],
Cell[BoxData[
FormBox[
InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\\\\\
!\\\\(TraditionalForm\\\\`\\\\\\\"lim\\\\\\\"\\\\+\\\\(x \\\\[Rule] \\\\\\\"+\
\\\\\\\\!\\\\\\\\(TraditionalForm\\\\\\\\`\\\\\\\\[Infinity]\\\\\\\\)\\\\\\\"\
\\\\)\\\\) \\\\!\\\\(TraditionalForm\\\\`\\\\(\\\\@\\\\(x\\\\^3 - 1\\\\) - \\\
\\@\\\\(\\\\(\\\\(2\\\\\\\\ x\\\\^2\\\\)\\\\) - 1\\\\)\\\\)\\\\/\\\\(1 - \
\\\\(\\\\(3\\\\\\\\ x\\\\)\\\\)\\\\)\\\\)\\\"\\)\\) = \
\\!\\(TraditionalForm\\`\\(-\[Infinity]\\)\\)\"\>",
StringForm["`1` = `2`",
analyse`Limite[(1 -
3 $CellContext`x)^(-1) (-(-1 + 2 $CellContext`x^2)^
Rational[1, 2] + (-1 + $CellContext`x^3)^
Rational[1, 2]), $CellContext`x,
DirectedInfinity[1]],
DirectedInfinity[-1]],
Editable->False], TraditionalForm]], "Print",
CellChangeTimes->{
3.436075553553657*^9},ExpressionUUID->"50886295-f85f-42f4-bc77-\
92878de006f7"],
Cell[BoxData[
FormBox[
InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\\\\\
!\\\\(TraditionalForm\\\\`\\\\\\\"lim\\\\\\\"\\\\+\\\\(x \\\\[Rule] \
\\\\(\\\\(-\\\\[Infinity]\\\\)\\\\)\\\\)\\\\) \
\\\\!\\\\(TraditionalForm\\\\`\\\\(\\\\@\\\\(x\\\\^3 - 1\\\\) - \
\\\\@\\\\(\\\\(\\\\(2\\\\\\\\ x\\\\^2\\\\)\\\\) - 1\\\\)\\\\)\\\\/\\\\(1 - \\\
\\(\\\\(3\\\\\\\\ x\\\\)\\\\)\\\\)\\\\)\\\"\\)\\) n'existe pas\"\>",
StringForm["`1` `2`",
analyse`Limite[(1 -
3 $CellContext`x)^(-1) (-(-1 + 2 $CellContext`x^2)^
Rational[1, 2] + (-1 + $CellContext`x^3)^
Rational[1, 2]), $CellContext`x,
DirectedInfinity[-1]], " n'existe pas"],
Editable->False], TraditionalForm]], "Print",
CellChangeTimes->{
3.436075553602208*^9},ExpressionUUID->"d15d5a5c-c0bc-414e-8bba-\
510088b68c0a"],
Cell[BoxData[
FormBox[
InterpretationBox[
RowBox[{
"8", "\[InvisibleSpace]", "\<\". Dom f = \"\>", "\[InvisibleSpace]",
FormBox[
InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\
\\\\[LongLeftArrow], \
\\\\!\\\\(TraditionalForm\\\\`\\\\(-\\\\@5\\\\)\\\\)[\\\"\\)\\) \[Union] \
\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\\\\!\\\\(TraditionalForm\\\\\
`\\\\(TraditionalForm\\\\`\\\\\\\"]\\\\\\\\!\\\\\\\\(TraditionalForm\\\\\\\\`\
\\\\\\\\(-\\\\\\\\@5\\\\\\\\)\\\\\\\\), \\\\\\\\!\\\\\\\\(TraditionalForm\\\\\
\\\\`\\\\\\\\(-2\\\\\\\\)\\\\\\\\)]\\\\\\\"\\\\)\\\\) \\\\[Union] \
\\\\!\\\\(TraditionalForm\\\\`\\\\(TraditionalForm\\\\`\\\\\\\"\\\\\\\\!\\\\\\\
\\(TraditionalForm\\\\\\\\`\\\\\\\\(TraditionalForm\\\\\\\\`\\\\\\\\\\\\\\\"[\
\\\\\\\\\\\\\\\\!\\\\\\\\\\\\\\\\(TraditionalForm\\\\\\\\\\\\\\\\`2\\\\\\\\\\\
\\\\\\), \\\\\\\\\\\\\\\\!\\\\\\\\\\\\\\\\(TraditionalForm\\\\\\\\\\\\\\\\`\\\
\\\\\\\\\\\\\\@5\\\\\\\\\\\\\\\\)[\\\\\\\\\\\\\\\"\\\\\\\\)\\\\\\\\) \
\\\\\\\\[Union] \
\\\\\\\\!\\\\\\\\(TraditionalForm\\\\\\\\`\\\\\\\\(TraditionalForm\\\\\\\\`\\\
\\\\\\\\\\\\\"]\\\\\\\\\\\\\\\\!\\\\\\\\\\\\\\\\(TraditionalForm\\\\\\\\\\\\\\\
\\`\\\\\\\\\\\\\\\\@5\\\\\\\\\\\\\\\\), \
\\\\\\\\\\\\\\\\[LongRightArrow]\\\\\\\\\\\\\\\"\\\\\\\\)\\\\\\\\)\\\\\\\"\\\\\
)\\\\)\\\"\\)\\)\"\>",
StringForm["`1` \[Union] `2`",
analyse`Ens[$CellContext`x < -5^Rational[1, 2], $CellContext`x],
analyse`Ens[
Or[
Inequality[-5^Rational[1, 2], Less, $CellContext`x, LessEqual, -2],
Inequality[
2, LessEqual, $CellContext`x, Less, 5^
Rational[1, 2]], $CellContext`x >
5^Rational[1, 2]], $CellContext`x]],
Editable->False],
TraditionalForm]}],
SequenceForm[8, ". Dom f = ",
analyse`Ens[
Or[$CellContext`x < -5^Rational[1, 2],
Inequality[-5^Rational[1, 2], Less, $CellContext`x, LessEqual, -2],
Inequality[
2, LessEqual, $CellContext`x, Less, 5^Rational[1, 2]], $CellContext`x >
5^Rational[1, 2]], $CellContext`x]],
Editable->False], TraditionalForm]], "Print",
CellChangeTimes->{
3.436075553684392*^9},ExpressionUUID->"1eeea42e-c91e-4dcf-8d2a-\
0ac9d31e8ee6"],
Cell[BoxData[
FormBox[
InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(\[Piecewise] \
\\*GridBox[{{\\\"\\\\\\\"\\\\\\\\!\\\\\\\\(TraditionalForm\\\\\\\\`\\\\\\\\(\
TraditionalForm\\\\\\\\`\\\\\\\\\\\\\\\"\\\\\\\\\\\\\\\\!\\\\\\\\\\\\\\\\(\
TraditionalForm\\\\\\\\\\\\\\\\`\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\"lim\\\\\\\\\\\
\\\\\\\\\\\\\\\\\\\\\"\\\\\\\\\\\\\\\\+\\\\\\\\\\\\\\\\(\\\\\\\\\\\\\\\\(x \\\
\\\\\\\\\\\\\\[Rule] \
\\\\\\\\\\\\\\\\(\\\\\\\\\\\\\\\\(-\\\\\\\\\\\\\\\\@5\\\\\\\\\\\\\\\\)\\\\\\\\\
\\\\\\\\)\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\+\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\"<\\\
\\\\\\\\\\\\\\\\\\\\\\\\\\\\\"\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\) \\\\\\\\\\\\\
\\\\!\\\\\\\\\\\\\\\\(TraditionalForm\\\\\\\\\\\\\\\\`\\\\\\\\\\\\\\\\(\\\\\\\
\\\\\\\\\\(\\\\\\\\\\\\\\\\(3\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\ x\\\\\\\\\\\\\\\
\\)\\\\\\\\\\\\\\\\) + 7\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\/\\\\\\\\\\\\\\\\(\\\
\\\\\\\\\\\\\\@\\\\\\\\\\\\\\\\(x\\\\\\\\\\\\\\\\^2 - 4\\\\\\\\\\\\\\\\) - \
1\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\"\\\\\\\\)\\\\\\\\) = \
\\\\\\\\!\\\\\\\\(TraditionalForm\\\\\\\\`\\\\\\\\\\\\\\\"+\\\\\\\\\\\\\\\\!\\\
\\\\\\\\\\\\\\(TraditionalForm\\\\\\\\\\\\\\\\`\\\\\\\\\\\\\\\\[Infinity]\\\\\
\\\\\\\\\\\\)\\\\\\\\\\\\\\\"\\\\\\\\)\\\\\\\"\\\", \\\"\\\\\\\" \
\\\\\\\"\\\"}, \
{\\\"\\\\\\\"\\\\\\\\!\\\\\\\\(TraditionalForm\\\\\\\\`\\\\\\\\(\
TraditionalForm\\\\\\\\`\\\\\\\\\\\\\\\"\\\\\\\\\\\\\\\\!\\\\\\\\\\\\\\\\(\
TraditionalForm\\\\\\\\\\\\\\\\`\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\"lim\\\\\\\\\\\
\\\\\\\\\\\\\\\\\\\\\"\\\\\\\\\\\\\\\\+\\\\\\\\\\\\\\\\(\\\\\\\\\\\\\\\\(x \\\
\\\\\\\\\\\\\\[Rule] \
\\\\\\\\\\\\\\\\(\\\\\\\\\\\\\\\\(-\\\\\\\\\\\\\\\\@5\\\\\\\\\\\\\\\\)\\\\\\\\\
\\\\\\\\)\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\+\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\">\\\
\\\\\\\\\\\\\\\\\\\\\\\\\\\\\"\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\) \\\\\\\\\\\\\
\\\\!\\\\\\\\\\\\\\\\(TraditionalForm\\\\\\\\\\\\\\\\`\\\\\\\\\\\\\\\\(\\\\\\\
\\\\\\\\\\(\\\\\\\\\\\\\\\\(3\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\ x\\\\\\\\\\\\\\\
\\)\\\\\\\\\\\\\\\\) + 7\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\/\\\\\\\\\\\\\\\\(\\\
\\\\\\\\\\\\\\@\\\\\\\\\\\\\\\\(x\\\\\\\\\\\\\\\\^2 - 4\\\\\\\\\\\\\\\\) - \
1\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\"\\\\\\\\)\\\\\\\\) = \
\\\\\\\\!\\\\\\\\(TraditionalForm\\\\\\\\`\\\\\\\\(-\[Infinity]\\\\\\\\)\\\\\\\
\\)\\\\\\\"\\\", \\\"\\\\\\\" \\\\\\\"\\\"}}, ColumnAlignments -> {Left}, \
ColumnSpacings -> 1.2, ColumnWidths -> Automatic]\\)\\)\"\>",
StringForm["`1`",
Piecewise[{{
StringForm["`1` = `2`",
analyse`Limite[(7 + 3 $CellContext`x)/(-1 + (-4 + $CellContext`x^2)^
Rational[1, 2]), $CellContext`x, -5^Rational[1, 2], -1],
StringForm["+`1`",
DirectedInfinity[1]]], " "}, {
StringForm["`1` = `2`",
analyse`Limite[(7 + 3 $CellContext`x)/(-1 + (-4 + $CellContext`x^2)^
Rational[1, 2]), $CellContext`x, -5^Rational[1, 2], 1],
DirectedInfinity[-1]], " "}}, 0]],
Editable->False], TraditionalForm]], "Print",
CellChangeTimes->{
3.436075554040057*^9},ExpressionUUID->"dd8705d3-725b-45d6-9e92-\
f3031968157d"],
Cell[BoxData[
FormBox[
InterpretationBox["\<\"AV \[Congruent] \\!\\(TraditionalForm\\`x\\) = \
\\!\\(TraditionalForm\\`\\(-\\@5\\)\\)\"\>",
StringForm["AV \[Congruent] `1` = `2`", $CellContext`x, -5^Rational[1, 2]],
Editable->False], TraditionalForm]], "Print",
CellChangeTimes->{
3.436075554092464*^9},ExpressionUUID->"99514485-1457-4baa-8060-\
87c62cd11c23"],
Cell[BoxData[
FormBox[
InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\\\\\
!\\\\(TraditionalForm\\\\`\\\\\\\"lim\\\\\\\"\\\\+\\\\(x \\\\[Rule] \
\\\\(\\\\(-2\\\\)\\\\)\\\\)\\\\) \
\\\\!\\\\(TraditionalForm\\\\`\\\\(\\\\(\\\\(3\\\\\\\\ x\\\\)\\\\) + 7\\\\)\\\
\\/\\\\(\\\\@\\\\(x\\\\^2 - 4\\\\) - 1\\\\)\\\\)\\\"\\)\\) = \
\\!\\(TraditionalForm\\`\\(-1\\)\\)\"\>",
StringForm["`1` = `2`",
analyse`Limite[(7 + 3 $CellContext`x)/(-1 + (-4 + $CellContext`x^2)^
Rational[1, 2]), $CellContext`x, -2], -1],
Editable->False], TraditionalForm]], "Print",
CellChangeTimes->{
3.4360755541390743`*^9},ExpressionUUID->"be1413d5-31d6-498e-b60d-\
dbf4d4c6efe4"],
Cell[BoxData[
FormBox[
InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\\\\\
!\\\\(TraditionalForm\\\\`\\\\\\\"lim\\\\\\\"\\\\+\\\\(x \\\\[Rule] \
2\\\\)\\\\) \\\\!\\\\(TraditionalForm\\\\`\\\\(\\\\(\\\\(3\\\\\\\\ \
x\\\\)\\\\) + 7\\\\)\\\\/\\\\(\\\\@\\\\(x\\\\^2 - 4\\\\) - 1\\\\)\\\\)\\\"\\)\
\\) = \\!\\(TraditionalForm\\`\\(-13\\)\\)\"\>",
StringForm["`1` = `2`",
analyse`Limite[(7 + 3 $CellContext`x)/(-1 + (-4 + $CellContext`x^2)^
Rational[1, 2]), $CellContext`x, 2], -13],
Editable->False], TraditionalForm]], "Print",
CellChangeTimes->{
3.436075554227322*^9},ExpressionUUID->"e8a45c3b-a415-4d44-a86e-\
7b101e55831a"],
Cell[BoxData[
FormBox[
InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(\[Piecewise] \
\\*GridBox[{{\\\"\\\\\\\"\\\\\\\\!\\\\\\\\(TraditionalForm\\\\\\\\`\\\\\\\\(\
TraditionalForm\\\\\\\\`\\\\\\\\\\\\\\\"\\\\\\\\\\\\\\\\!\\\\\\\\\\\\\\\\(\
TraditionalForm\\\\\\\\\\\\\\\\`\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\"lim\\\\\\\\\\\
\\\\\\\\\\\\\\\\\\\\\"\\\\\\\\\\\\\\\\+\\\\\\\\\\\\\\\\(\\\\\\\\\\\\\\\\(x \\\
\\\\\\\\\\\\\\[Rule] \\\\\\\\\\\\\\\\@5\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\+\\\\\
\\\\\\\\\\\\\\\\\\\\\\\\\\\"<\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\"\\\\\\\\\\\\\\\\)\
\\\\\\\\\\\\\\\\) \\\\\\\\\\\\\\\\!\\\\\\\\\\\\\\\\(TraditionalForm\\\\\\\\\\\
\\\\\\`\\\\\\\\\\\\\\\\(\\\\\\\\\\\\\\\\(\\\\\\\\\\\\\\\\(3\\\\\\\\\\\\\\\\\\\
\\\\\\\\\\\\\\ x\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\) + 7\\\\\\\\\\\\\\\\)\\\\\\\
\\\\\\\\\\/\\\\\\\\\\\\\\\\(\\\\\\\\\\\\\\\\@\\\\\\\\\\\\\\\\(x\\\\\\\\\\\\\\\
\\^2 - 4\\\\\\\\\\\\\\\\) - 1\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\
\"\\\\\\\\)\\\\\\\\) = \\\\\\\\!\\\\\\\\(TraditionalForm\\\\\\\\`\\\\\\\\(-\
\[Infinity]\\\\\\\\)\\\\\\\\)\\\\\\\"\\\", \\\"\\\\\\\" \\\\\\\"\\\"}, \
{\\\"\\\\\\\"\\\\\\\\!\\\\\\\\(TraditionalForm\\\\\\\\`\\\\\\\\(\
TraditionalForm\\\\\\\\`\\\\\\\\\\\\\\\"\\\\\\\\\\\\\\\\!\\\\\\\\\\\\\\\\(\
TraditionalForm\\\\\\\\\\\\\\\\`\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\"lim\\\\\\\\\\\
\\\\\\\\\\\\\\\\\\\\\"\\\\\\\\\\\\\\\\+\\\\\\\\\\\\\\\\(\\\\\\\\\\\\\\\\(x \\\
\\\\\\\\\\\\\\[Rule] \\\\\\\\\\\\\\\\@5\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\+\\\\\
\\\\\\\\\\\\\\\\\\\\\\\\\\\">\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\"\\\\\\\\\\\\\\\\)\
\\\\\\\\\\\\\\\\) \\\\\\\\\\\\\\\\!\\\\\\\\\\\\\\\\(TraditionalForm\\\\\\\\\\\
\\\\\\`\\\\\\\\\\\\\\\\(\\\\\\\\\\\\\\\\(\\\\\\\\\\\\\\\\(3\\\\\\\\\\\\\\\\\\\
\\\\\\\\\\\\\\ x\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\) + 7\\\\\\\\\\\\\\\\)\\\\\\\
\\\\\\\\\\/\\\\\\\\\\\\\\\\(\\\\\\\\\\\\\\\\@\\\\\\\\\\\\\\\\(x\\\\\\\\\\\\\\\
\\^2 - 4\\\\\\\\\\\\\\\\) - 1\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\
\"\\\\\\\\)\\\\\\\\) = \\\\\\\\!\\\\\\\\(TraditionalForm\\\\\\\\`\\\\\\\\\\\\\
\\\"+\\\\\\\\\\\\\\\\!\\\\\\\\\\\\\\\\(TraditionalForm\\\\\\\\\\\\\\\\`\\\\\\\
\\\\\\\\\\[Infinity]\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\"\\\\\\\\)\\\\\\\"\\\", \
\\\"\\\\\\\" \\\\\\\"\\\"}}, ColumnAlignments -> {Left}, ColumnSpacings -> \
1.2, ColumnWidths -> Automatic]\\)\\)\"\>",
StringForm["`1`",
Piecewise[{{
StringForm["`1` = `2`",
analyse`Limite[(7 + 3 $CellContext`x)/(-1 + (-4 + $CellContext`x^2)^
Rational[1, 2]), $CellContext`x, 5^Rational[1, 2], -1],
DirectedInfinity[-1]], " "}, {
StringForm["`1` = `2`",
analyse`Limite[(7 + 3 $CellContext`x)/(-1 + (-4 + $CellContext`x^2)^
Rational[1, 2]), $CellContext`x, 5^Rational[1, 2], 1],
StringForm["+`1`",
DirectedInfinity[1]]], " "}}, 0]],
Editable->False], TraditionalForm]], "Print",
CellChangeTimes->{
3.436075554334455*^9},ExpressionUUID->"20d59376-aff8-4ae6-8703-\
8157a9a8bea5"],
Cell[BoxData[
FormBox[
InterpretationBox["\<\"AV \[Congruent] \\!\\(TraditionalForm\\`x\\) = \
\\!\\(TraditionalForm\\`\\@5\\)\"\>",
StringForm["AV \[Congruent] `1` = `2`", $CellContext`x, 5^Rational[1, 2]],
Editable->False], TraditionalForm]], "Print",
CellChangeTimes->{
3.436075554386053*^9},ExpressionUUID->"afb58625-0af6-4228-88e2-\
6d2de6784e05"],
Cell[BoxData[
FormBox[
InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\\\\\
!\\\\(TraditionalForm\\\\`\\\\\\\"lim\\\\\\\"\\\\+\\\\(x \\\\[Rule] \\\\\\\"+\
\\\\\\\\!\\\\\\\\(TraditionalForm\\\\\\\\`\\\\\\\\[Infinity]\\\\\\\\)\\\\\\\"\
\\\\)\\\\) \\\\!\\\\(TraditionalForm\\\\`\\\\(\\\\(\\\\(3\\\\\\\\ x\\\\)\\\\) \
+ 7\\\\)\\\\/\\\\(\\\\@\\\\(x\\\\^2 - 4\\\\) - 1\\\\)\\\\)\\\"\\)\\) = \
\\!\\(TraditionalForm\\`3\\)\"\>",
StringForm["`1` = `2`",
analyse`Limite[(7 + 3 $CellContext`x)/(-1 + (-4 + $CellContext`x^2)^
Rational[1, 2]), $CellContext`x,
DirectedInfinity[1]], 3],
Editable->False], TraditionalForm]], "Print",
CellChangeTimes->{
3.436075554442678*^9},ExpressionUUID->"fb21065a-abb6-48d5-a883-\
22f1bae7971e"],
Cell[BoxData[
FormBox[
InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\\\\\
!\\\\(TraditionalForm\\\\`\\\\\\\"lim\\\\\\\"\\\\+\\\\(x \\\\[Rule] \
\\\\(\\\\(-\\\\[Infinity]\\\\)\\\\)\\\\)\\\\) \
\\\\!\\\\(TraditionalForm\\\\`\\\\(\\\\(\\\\(3\\\\\\\\ x\\\\)\\\\) + 7\\\\)\\\
\\/\\\\(\\\\@\\\\(x\\\\^2 - 4\\\\) - 1\\\\)\\\\)\\\"\\)\\) = \
\\!\\(TraditionalForm\\`\\(-3\\)\\)\"\>",
StringForm["`1` = `2`",
analyse`Limite[(7 + 3 $CellContext`x)/(-1 + (-4 + $CellContext`x^2)^
Rational[1, 2]), $CellContext`x,
DirectedInfinity[-1]], -3],
Editable->False], TraditionalForm]], "Print",
CellChangeTimes->{
3.436075554476448*^9},ExpressionUUID->"868dc322-33ec-4799-b594-\
7f90f335859a"],
Cell[BoxData[
FormBox[
InterpretationBox[
RowBox[{"\<\"AH\"\>", "\[InvisibleSpace]", "\<\" \[Congruent] \"\>",
"\[InvisibleSpace]",
RowBox[{"y", "\[LongEqual]", "3"}],
"\[InvisibleSpace]", "\<\" \[AGrave] droite\"\>"}],
SequenceForm[
"AH", " \[Congruent] ", $CellContext`y == 3, " \[AGrave] droite"],
Editable->False], TraditionalForm]], "Print",
CellChangeTimes->{
3.436075554540721*^9},ExpressionUUID->"645f9572-f326-4d59-b4b1-\
16c9d157f208"],
Cell[BoxData[
FormBox[
InterpretationBox[
RowBox[{"\<\"AH\"\>", "\[InvisibleSpace]", "\<\" \[Congruent] \"\>",
"\[InvisibleSpace]",
RowBox[{"y", "\[LongEqual]",
RowBox[{"-", "3"}]}], "\[InvisibleSpace]", "\<\" \[AGrave] gauche\"\>"}],
SequenceForm[
"AH", " \[Congruent] ", $CellContext`y == -3, " \[AGrave] gauche"],
Editable->False], TraditionalForm]], "Print",
CellChangeTimes->{
3.4360755545548973`*^9},ExpressionUUID->"bf22fd52-600b-48fb-b4f1-\
d2c560568d21"],
Cell[BoxData[
FormBox[
InterpretationBox[
RowBox[{
"9", "\[InvisibleSpace]", "\<\". Dom f = \"\>", "\[InvisibleSpace]",
FormBox[
TagBox["\[DoubleStruckCapitalR]",
Function[{}, Reals]],
TraditionalForm]}],
SequenceForm[9, ". Dom f = ",
analyse`Ens[True, $CellContext`x]],
Editable->False], TraditionalForm]], "Print",
CellChangeTimes->{
3.436075554585145*^9},ExpressionUUID->"16c13ccf-454b-4c4d-87de-\
5588688c4924"],
Cell[BoxData[
FormBox["\<\"pas d'asymptote verticale\"\>", TraditionalForm]], "Print",
CellChangeTimes->{
3.43607555461939*^9},ExpressionUUID->"bbbde2a9-80c8-406f-936a-5de9a25f4bbd"],
Cell[BoxData[
FormBox[
InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\\\\\
!\\\\(TraditionalForm\\\\`\\\\\\\"lim\\\\\\\"\\\\+\\\\(x \\\\[Rule] \\\\\\\"+\
\\\\\\\\!\\\\\\\\(TraditionalForm\\\\\\\\`\\\\\\\\[Infinity]\\\\\\\\)\\\\\\\"\
\\\\)\\\\) \\\\!\\\\(TraditionalForm\\\\`\\\\(\\\\@\\\\(x\\\\^2 + 1\\\\) - \\\
\\@\\\\(x\\\\^2 + 4\\\\)\\\\)\\\\)\\\"\\)\\) = \\!\\(TraditionalForm\\`0\\)\"\
\>",
StringForm["`1` = `2`",
analyse`Limite[(1 + $CellContext`x^2)^Rational[1, 2] - (
4 + $CellContext`x^2)^Rational[1, 2], $CellContext`x,
DirectedInfinity[1]], 0],
Editable->False], TraditionalForm]], "Print",
CellChangeTimes->{
3.4360755546517076`*^9},ExpressionUUID->"3133f423-a47b-453c-b70c-\
0b6409e5feaa"],
Cell[BoxData[
FormBox[
InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\\\\\
!\\\\(TraditionalForm\\\\`\\\\\\\"lim\\\\\\\"\\\\+\\\\(x \\\\[Rule] \
\\\\(\\\\(-\\\\[Infinity]\\\\)\\\\)\\\\)\\\\) \
\\\\!\\\\(TraditionalForm\\\\`\\\\(\\\\@\\\\(x\\\\^2 + 1\\\\) - \\\\@\\\\(x\\\
\\^2 + 4\\\\)\\\\)\\\\)\\\"\\)\\) = \\!\\(TraditionalForm\\`0\\)\"\>",
StringForm["`1` = `2`",
analyse`Limite[(1 + $CellContext`x^2)^Rational[1, 2] - (
4 + $CellContext`x^2)^Rational[1, 2], $CellContext`x,
DirectedInfinity[-1]], 0],
Editable->False], TraditionalForm]], "Print",
CellChangeTimes->{
3.436075554685566*^9},ExpressionUUID->"04800f0c-9bc7-4868-a1ed-\
5c84528d3318"],
Cell[BoxData[
FormBox[
InterpretationBox[
RowBox[{"\<\"AH\"\>", "\[InvisibleSpace]", "\<\" \[Congruent] \"\>",
"\[InvisibleSpace]",
RowBox[{"y", "\[LongEqual]", "0"}]}],
SequenceForm["AH", " \[Congruent] ", $CellContext`y == 0],
Editable->False], TraditionalForm]], "Print",
CellChangeTimes->{
3.436075554718636*^9},ExpressionUUID->"ce59d0c7-e653-48bd-8555-\
7622beeb31cc"],
Cell[BoxData[
FormBox[
InterpretationBox[
RowBox[{
"10", "\[InvisibleSpace]", "\<\". Dom f = \"\>", "\[InvisibleSpace]",
FormBox[
InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\
\\\\[LongLeftArrow], \\\\!\\\\(TraditionalForm\\\\`0\\\\)]\\\"\\)\\) \[Union] \
\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"[\\\\!\\\\(TraditionalForm\\\
\\`4\\\\), \\\\[LongRightArrow]\\\"\\)\\)\"\>",
StringForm["`1` \[Union] `2`",
analyse`Ens[$CellContext`x <= 0, $CellContext`x],
analyse`Ens[$CellContext`x >= 4, $CellContext`x]],
Editable->False],
TraditionalForm]}],
SequenceForm[10, ". Dom f = ",
analyse`Ens[
Or[$CellContext`x <= 0, $CellContext`x >= 4], $CellContext`x]],
Editable->False], TraditionalForm]], "Print",
CellChangeTimes->{
3.436075554752935*^9},ExpressionUUID->"92255b76-d865-4c0f-b9c5-\
068decb10181"],
Cell[BoxData[
FormBox[
InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\\\\\
!\\\\(TraditionalForm\\\\`\\\\\\\"lim\\\\\\\"\\\\+\\\\(x \\\\[Rule] \
0\\\\)\\\\) \\\\!\\\\(TraditionalForm\\\\`\\\\(\\\\@\\\\(\\\\(\\\\(4\\\\\\\\ \
x\\\\^2\\\\)\\\\) + 1\\\\) - \\\\(\\\\(2\\\\\\\\ \\\\@\\\\(x\\\\^2 - \
\\\\(\\\\(4\\\\\\\\ x\\\\)\\\\)\\\\)\\\\)\\\\)\\\\)\\\\)\\\"\\)\\) = \
\\!\\(TraditionalForm\\`1\\)\"\>",
StringForm["`1` = `2`",
analyse`Limite[(-2) ((-4) $CellContext`x + $CellContext`x^2)^
Rational[1, 2] + (1 + 4 $CellContext`x^2)^
Rational[1, 2], $CellContext`x, 0], 1],
Editable->False], TraditionalForm]], "Print",
CellChangeTimes->{
3.43607555478533*^9},ExpressionUUID->"1f8a8d77-d069-4dfc-8d98-56444413c795"],
Cell[BoxData[
FormBox[
InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\\\\\
!\\\\(TraditionalForm\\\\`\\\\\\\"lim\\\\\\\"\\\\+\\\\(x \\\\[Rule] \
4\\\\)\\\\) \\\\!\\\\(TraditionalForm\\\\`\\\\(\\\\@\\\\(\\\\(\\\\(4\\\\\\\\ \
x\\\\^2\\\\)\\\\) + 1\\\\) - \\\\(\\\\(2\\\\\\\\ \\\\@\\\\(x\\\\^2 - \
\\\\(\\\\(4\\\\\\\\ x\\\\)\\\\)\\\\)\\\\)\\\\)\\\\)\\\\)\\\"\\)\\) = \
\\!\\(TraditionalForm\\`\\@65\\)\"\>",
StringForm["`1` = `2`",
analyse`Limite[(-2) ((-4) $CellContext`x + $CellContext`x^2)^
Rational[1, 2] + (1 + 4 $CellContext`x^2)^
Rational[1, 2], $CellContext`x, 4], 65^Rational[1, 2]],
Editable->False], TraditionalForm]], "Print",
CellChangeTimes->{
3.4360755548296022`*^9},ExpressionUUID->"7f7f4fcb-141a-4e88-8cf5-\
456956b7172d"],
Cell[BoxData[
FormBox[
InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\\\\\
!\\\\(TraditionalForm\\\\`\\\\\\\"lim\\\\\\\"\\\\+\\\\(x \\\\[Rule] \\\\\\\"+\
\\\\\\\\!\\\\\\\\(TraditionalForm\\\\\\\\`\\\\\\\\[Infinity]\\\\\\\\)\\\\\\\"\
\\\\)\\\\) \\\\!\\\\(TraditionalForm\\\\`\\\\(\\\\@\\\\(\\\\(\\\\(4\\\\\\\\ x\
\\\\^2\\\\)\\\\) + 1\\\\) - \\\\(\\\\(2\\\\\\\\ \\\\@\\\\(x\\\\^2 - \
\\\\(\\\\(4\\\\\\\\ x\\\\)\\\\)\\\\)\\\\)\\\\)\\\\)\\\\)\\\"\\)\\) = \
\\!\\(TraditionalForm\\`4\\)\"\>",
StringForm["`1` = `2`",
analyse`Limite[(-2) ((-4) $CellContext`x + $CellContext`x^2)^
Rational[1, 2] + (1 + 4 $CellContext`x^2)^
Rational[1, 2], $CellContext`x,
DirectedInfinity[1]], 4],
Editable->False], TraditionalForm]], "Print",
CellChangeTimes->{
3.436075554926344*^9},ExpressionUUID->"b1c21555-e0c8-4e6e-97bf-\
9cbe139ad997"],
Cell[BoxData[
FormBox[
InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\\\\\
!\\\\(TraditionalForm\\\\`\\\\\\\"lim\\\\\\\"\\\\+\\\\(x \\\\[Rule] \
\\\\(\\\\(-\\\\[Infinity]\\\\)\\\\)\\\\)\\\\) \
\\\\!\\\\(TraditionalForm\\\\`\\\\(\\\\@\\\\(\\\\(\\\\(4\\\\\\\\ x\\\\^2\\\\)\
\\\\) + 1\\\\) - \\\\(\\\\(2\\\\\\\\ \\\\@\\\\(x\\\\^2 - \\\\(\\\\(4\\\\\\\\ \
x\\\\)\\\\)\\\\)\\\\)\\\\)\\\\)\\\\)\\\"\\)\\) = \
\\!\\(TraditionalForm\\`\\(-4\\)\\)\"\>",
StringForm["`1` = `2`",
analyse`Limite[(-2) ((-4) $CellContext`x + $CellContext`x^2)^
Rational[1, 2] + (1 + 4 $CellContext`x^2)^
Rational[1, 2], $CellContext`x,
DirectedInfinity[-1]], -4],
Editable->False], TraditionalForm]], "Print",
CellChangeTimes->{
3.4360755549600773`*^9},ExpressionUUID->"9f78479a-5c8b-4209-b785-\
be0d8b43d505"],
Cell[BoxData[
FormBox[
InterpretationBox[
RowBox[{"\<\"AH\"\>", "\[InvisibleSpace]", "\<\" \[Congruent] \"\>",
"\[InvisibleSpace]",
RowBox[{"y", "\[LongEqual]", "4"}],
"\[InvisibleSpace]", "\<\" \[AGrave] droite\"\>"}],
SequenceForm[
"AH", " \[Congruent] ", $CellContext`y == 4, " \[AGrave] droite"],
Editable->False], TraditionalForm]], "Print",
CellChangeTimes->{
3.4360755550267563`*^9},ExpressionUUID->"882efc52-d94e-4f49-b76c-\
881485d63bf9"],
Cell[BoxData[
FormBox[
InterpretationBox[
RowBox[{"\<\"AH\"\>", "\[InvisibleSpace]", "\<\" \[Congruent] \"\>",
"\[InvisibleSpace]",
RowBox[{"y", "\[LongEqual]",
RowBox[{"-", "4"}]}], "\[InvisibleSpace]", "\<\" \[AGrave] gauche\"\>"}],
SequenceForm[
"AH", " \[Congruent] ", $CellContext`y == -4, " \[AGrave] gauche"],
Editable->False], TraditionalForm]], "Print",
CellChangeTimes->{
3.436075555054484*^9},ExpressionUUID->"bbab4f0a-df43-4558-ab39-\
3c68c73d50ca"],
Cell[BoxData[
FormBox[
InterpretationBox[
RowBox[{
"11", "\[InvisibleSpace]", "\<\". Dom f = \"\>", "\[InvisibleSpace]",
FormBox[
InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\
\\\\[LongLeftArrow], \
\\\\!\\\\(TraditionalForm\\\\`\\\\(-\\\\(\\\\(1\\\\/3\\\\)\\\\)\\\\)\\\\)]\\\"\
\\)\\) \[Union] \
\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"]\\\\!\\\\(TraditionalForm\\\
\\`0\\\\), \\\\[LongRightArrow]\\\"\\)\\)\"\>",
StringForm["`1` \[Union] `2`",
analyse`Ens[$CellContext`x <= Rational[-1, 3], $CellContext`x],
analyse`Ens[$CellContext`x > 0, $CellContext`x]],
Editable->False],
TraditionalForm]}],
SequenceForm[11, ". Dom f = ",
analyse`Ens[
Or[$CellContext`x <= Rational[-1, 3], $CellContext`x >
0], $CellContext`x]],
Editable->False], TraditionalForm]], "Print",
CellChangeTimes->{
3.436075555086714*^9},ExpressionUUID->"47384324-f110-40e4-8e5d-\
fa9df6ead11e"],
Cell[BoxData[
FormBox[
InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\\\\\
!\\\\(TraditionalForm\\\\`\\\\\\\"lim\\\\\\\"\\\\+\\\\(x \\\\[Rule] \
\\\\(\\\\(-\\\\(\\\\(1\\\\/3\\\\)\\\\)\\\\)\\\\)\\\\)\\\\) \
\\\\!\\\\(TraditionalForm\\\\`\\\\(x - \\\\@\\\\(x\\\\^2 + \
\\\\(\\\\(2\\\\\\\\ x\\\\)\\\\) + 4\\\\)\\\\)\\\\/\\\\(\\\\(\\\\(3\\\\\\\\ \
x\\\\)\\\\) - \\\\@\\\\(\\\\(\\\\(9\\\\\\\\ x\\\\^2\\\\)\\\\) + \\\\(\\\\(3\\\
\\\\\\ x\\\\)\\\\)\\\\)\\\\)\\\\)\\\"\\)\\) = \
\\!\\(TraditionalForm\\`\\(1\\/3 + \\@31\\/3\\)\\)\"\>",
StringForm["`1` = `2`",
analyse`Limite[($CellContext`x - (4 +
2 $CellContext`x + $CellContext`x^2)^Rational[1, 2])/(
3 $CellContext`x - (3 $CellContext`x + 9 $CellContext`x^2)^
Rational[1, 2]), $CellContext`x,
Rational[-1, 3]], Rational[1, 3] + Rational[1, 3] 31^Rational[1, 2]],
Editable->False], TraditionalForm]], "Print",
CellChangeTimes->{
3.436075555269207*^9},ExpressionUUID->"be598530-2f39-4445-ae21-\
cd91b15b6a9b"],
Cell[BoxData[
FormBox[
InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\\\\\
!\\\\(TraditionalForm\\\\`\\\\\\\"lim\\\\\\\"\\\\+\\\\(\\\\(x \\\\[Rule] \
0\\\\)\\\\+\\\\\\\">\\\\\\\"\\\\)\\\\) \\\\!\\\\(TraditionalForm\\\\`\\\\(x - \
\\\\@\\\\(x\\\\^2 + \\\\(\\\\(2\\\\\\\\ x\\\\)\\\\) + 4\\\\)\\\\)\\\\/\\\\(\\\
\\(\\\\(3\\\\\\\\ x\\\\)\\\\) - \\\\@\\\\(\\\\(\\\\(9\\\\\\\\ \
x\\\\^2\\\\)\\\\) + \\\\(\\\\(3\\\\\\\\ x\\\\)\\\\)\\\\)\\\\)\\\\)\\\"\\)\\) \
= \\!\\(TraditionalForm\\`\\\"+\\\\!\\\\(TraditionalForm\\\\`\\\\[Infinity]\\\
\\)\\\"\\)\"\>",
StringForm["`1` = `2`",
analyse`Limite[($CellContext`x - (4 +
2 $CellContext`x + $CellContext`x^2)^Rational[1, 2])/(
3 $CellContext`x - (3 $CellContext`x + 9 $CellContext`x^2)^
Rational[1, 2]), $CellContext`x, 0, 1],
StringForm["+`1`",
DirectedInfinity[1]]],
Editable->False], TraditionalForm]], "Print",
CellChangeTimes->{
3.4360755554656973`*^9},ExpressionUUID->"3b0c2931-d48a-4bc9-a3e4-\
caaff19b01ce"],
Cell[BoxData[
FormBox[
InterpretationBox["\<\"AV \[Congruent] \\!\\(TraditionalForm\\`x\\) = \
\\!\\(TraditionalForm\\`0\\) a droite\"\>",
StringForm["AV \[Congruent] `1` = `2` a droite", $CellContext`x, 0],
Editable->False], TraditionalForm]], "Print",
CellChangeTimes->{
3.436075555544776*^9},ExpressionUUID->"a3915f35-88c3-49ef-8c7d-\
985b0deaebcd"],
Cell[BoxData[
FormBox[
InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\\\\\
!\\\\(TraditionalForm\\\\`\\\\\\\"lim\\\\\\\"\\\\+\\\\(x \\\\[Rule] \\\\\\\"+\
\\\\\\\\!\\\\\\\\(TraditionalForm\\\\\\\\`\\\\\\\\[Infinity]\\\\\\\\)\\\\\\\"\
\\\\)\\\\) \\\\!\\\\(TraditionalForm\\\\`\\\\(x - \\\\@\\\\(x\\\\^2 + \\\\(\\\
\\(2\\\\\\\\ x\\\\)\\\\) + 4\\\\)\\\\)\\\\/\\\\(\\\\(\\\\(3\\\\\\\\ \
x\\\\)\\\\) - \\\\@\\\\(\\\\(\\\\(9\\\\\\\\ x\\\\^2\\\\)\\\\) + \\\\(\\\\(3\\\
\\\\\\ x\\\\)\\\\)\\\\)\\\\)\\\\)\\\"\\)\\) = \
\\!\\(TraditionalForm\\`2\\)\"\>",
StringForm["`1` = `2`",
analyse`Limite[($CellContext`x - (4 +
2 $CellContext`x + $CellContext`x^2)^Rational[1, 2])/(
3 $CellContext`x - (3 $CellContext`x + 9 $CellContext`x^2)^
Rational[1, 2]), $CellContext`x,
DirectedInfinity[1]], 2],
Editable->False], TraditionalForm]], "Print",
CellChangeTimes->{
3.436075555661826*^9},ExpressionUUID->"8c337457-d3b8-403a-94c5-\
7bd269d4e75d"],
Cell[BoxData[
FormBox[
InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\\\\\
!\\\\(TraditionalForm\\\\`\\\\\\\"lim\\\\\\\"\\\\+\\\\(x \\\\[Rule] \
\\\\(\\\\(-\\\\[Infinity]\\\\)\\\\)\\\\)\\\\) \
\\\\!\\\\(TraditionalForm\\\\`\\\\(x - \\\\@\\\\(x\\\\^2 + \
\\\\(\\\\(2\\\\\\\\ x\\\\)\\\\) + 4\\\\)\\\\)\\\\/\\\\(\\\\(\\\\(3\\\\\\\\ \
x\\\\)\\\\) - \\\\@\\\\(\\\\(\\\\(9\\\\\\\\ x\\\\^2\\\\)\\\\) + \\\\(\\\\(3\\\
\\\\\\ x\\\\)\\\\)\\\\)\\\\)\\\\)\\\"\\)\\) = \
\\!\\(TraditionalForm\\`1\\/3\\)\"\>",
StringForm["`1` = `2`",
analyse`Limite[($CellContext`x - (4 +
2 $CellContext`x + $CellContext`x^2)^Rational[1, 2])/(
3 $CellContext`x - (3 $CellContext`x + 9 $CellContext`x^2)^
Rational[1, 2]), $CellContext`x,
DirectedInfinity[-1]],
Rational[1, 3]],
Editable->False], TraditionalForm]], "Print",
CellChangeTimes->{
3.436075555741003*^9},ExpressionUUID->"0cabed16-fc88-401f-afec-\
b85adf7e6766"],
Cell[BoxData[
FormBox[
InterpretationBox[
RowBox[{"\<\"AH\"\>", "\[InvisibleSpace]", "\<\" \[Congruent] \"\>",
"\[InvisibleSpace]",
RowBox[{"y", "\[LongEqual]", "2"}],
"\[InvisibleSpace]", "\<\" \[AGrave] droite\"\>"}],
SequenceForm[
"AH", " \[Congruent] ", $CellContext`y == 2, " \[AGrave] droite"],
Editable->False], TraditionalForm]], "Print",
CellChangeTimes->{
3.436075555855056*^9},ExpressionUUID->"7e92aa4a-6be1-40ed-97f0-\
ab91e091c5cf"],
Cell[BoxData[
FormBox[
InterpretationBox[
RowBox[{"\<\"AH\"\>", "\[InvisibleSpace]", "\<\" \[Congruent] \"\>",
"\[InvisibleSpace]",
RowBox[{"y", "\[LongEqual]",
FractionBox["1", "3"]}],
"\[InvisibleSpace]", "\<\" \[AGrave] gauche\"\>"}],
SequenceForm[
"AH", " \[Congruent] ", $CellContext`y == Rational[1, 3],
" \[AGrave] gauche"],
Editable->False], TraditionalForm]], "Print",
CellChangeTimes->{
3.4360755558775997`*^9},ExpressionUUID->"d52e9e23-79b2-42b7-9bba-\
58c85d8a27ee"],
Cell[BoxData[
FormBox[
InterpretationBox[
RowBox[{
"12", "\[InvisibleSpace]", "\<\". Dom f = \"\>", "\[InvisibleSpace]",
FormBox[
InterpretationBox["\<\"]\\!\\(TraditionalForm\\`1\\), \
\[LongRightArrow]\"\>",
StringForm["]`1`, \[LongRightArrow]", 1],
Editable->False],
TraditionalForm]}],
SequenceForm[12, ". Dom f = ",
analyse`Ens[$CellContext`x > 1, $CellContext`x]],
Editable->False], TraditionalForm]], "Print",
CellChangeTimes->{
3.436075555906331*^9},ExpressionUUID->"ee0995a7-3f54-4a11-a25d-\
966eae52e093"],
Cell[BoxData[
FormBox[
InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\\\\\
!\\\\(TraditionalForm\\\\`\\\\\\\"lim\\\\\\\"\\\\+\\\\(\\\\(x \\\\[Rule] \
1\\\\)\\\\+\\\\\\\">\\\\\\\"\\\\)\\\\) \
\\\\!\\\\(TraditionalForm\\\\`\\\\@\\\\(x\\\\^2 + \
1\\\\)\\\\/\\\\@\\\\(\\\\(\\\\(4\\\\\\\\ x\\\\^3\\\\)\\\\) - \
4\\\\)\\\\)\\\"\\)\\) = \
\\!\\(TraditionalForm\\`\\\"+\\\\!\\\\(TraditionalForm\\\\`\\\\[Infinity]\\\\)\
\\\"\\)\"\>",
StringForm["`1` = `2`",
analyse`Limite[(1 + $CellContext`x^2)^
Rational[1, 2] (-4 + 4 $CellContext`x^3)^
Rational[-1, 2], $CellContext`x, 1, 1],
StringForm["+`1`",
DirectedInfinity[1]]],
Editable->False], TraditionalForm]], "Print",
CellChangeTimes->{
3.436075556000559*^9},ExpressionUUID->"659210c2-4431-4734-b240-\
d25f77f8c8e2"],
Cell[BoxData[
FormBox[
InterpretationBox["\<\"AV \[Congruent] \\!\\(TraditionalForm\\`x\\) = \
\\!\\(TraditionalForm\\`1\\) a droite\"\>",
StringForm["AV \[Congruent] `1` = `2` a droite", $CellContext`x, 1],
Editable->False], TraditionalForm]], "Print",
CellChangeTimes->{
3.436075556041666*^9},ExpressionUUID->"c4cf710b-1847-49b8-ad62-\
2ba379fcc029"],
Cell[BoxData[
FormBox[
InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\\\\\
!\\\\(TraditionalForm\\\\`\\\\\\\"lim\\\\\\\"\\\\+\\\\(x \\\\[Rule] \\\\\\\"+\
\\\\\\\\!\\\\\\\\(TraditionalForm\\\\\\\\`\\\\\\\\[Infinity]\\\\\\\\)\\\\\\\"\
\\\\)\\\\) \\\\!\\\\(TraditionalForm\\\\`\\\\@\\\\(x\\\\^2 + 1\\\\)\\\\/\\\\@\
\\\\(\\\\(\\\\(4\\\\\\\\ x\\\\^3\\\\)\\\\) - 4\\\\)\\\\)\\\"\\)\\) = \
\\!\\(TraditionalForm\\`0\\)\"\>",
StringForm["`1` = `2`",
analyse`Limite[(1 + $CellContext`x^2)^
Rational[1, 2] (-4 + 4 $CellContext`x^3)^
Rational[-1, 2], $CellContext`x,
DirectedInfinity[1]], 0],
Editable->False], TraditionalForm]], "Print",
CellChangeTimes->{
3.436075556089634*^9},ExpressionUUID->"10f0b294-3d84-475d-9c0e-\
d3e904da6612"],
Cell[BoxData[
FormBox[
InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\\\\\
!\\\\(TraditionalForm\\\\`\\\\\\\"lim\\\\\\\"\\\\+\\\\(x \\\\[Rule] \
\\\\(\\\\(-\\\\[Infinity]\\\\)\\\\)\\\\)\\\\) \
\\\\!\\\\(TraditionalForm\\\\`\\\\@\\\\(x\\\\^2 + \
1\\\\)\\\\/\\\\@\\\\(\\\\(\\\\(4\\\\\\\\ x\\\\^3\\\\)\\\\) - \
4\\\\)\\\\)\\\"\\)\\) n'existe pas\"\>",
StringForm["`1` `2`",
analyse`Limite[(1 + $CellContext`x^2)^
Rational[1, 2] (-4 + 4 $CellContext`x^3)^
Rational[-1, 2], $CellContext`x,
DirectedInfinity[-1]], " n'existe pas"],
Editable->False], TraditionalForm]], "Print",
CellChangeTimes->{
3.4360755561247272`*^9},ExpressionUUID->"ba557bd1-0b4e-4424-96fd-\
246ef59ed0ea"],
Cell[BoxData[
FormBox[
InterpretationBox[
RowBox[{"\<\"AH\"\>", "\[InvisibleSpace]", "\<\" \[Congruent] \"\>",
"\[InvisibleSpace]",
RowBox[{"y", "\[LongEqual]", "0"}],
"\[InvisibleSpace]", "\<\" \[AGrave] droite\"\>"}],
SequenceForm[
"AH", " \[Congruent] ", $CellContext`y == 0, " \[AGrave] droite"],
Editable->False], TraditionalForm]], "Print",
CellChangeTimes->{
3.4360755561687803`*^9},ExpressionUUID->"95bc3cc7-4ca8-491f-bd90-\
c6ec39522073"],
Cell[BoxData[
FormBox[
InterpretationBox[
RowBox[{
"13", "\[InvisibleSpace]", "\<\". Dom f = \"\>", "\[InvisibleSpace]",
FormBox[
InterpretationBox["\<\"[\\!\\(TraditionalForm\\`1\\), \
\[LongRightArrow]\"\>",
StringForm["[`1`, \[LongRightArrow]", 1],
Editable->False],
TraditionalForm]}],
SequenceForm[13, ". Dom f = ",
analyse`Ens[$CellContext`x >= 1, $CellContext`x]],
Editable->False], TraditionalForm]], "Print",
CellChangeTimes->{
3.436075556191207*^9},ExpressionUUID->"79aaf363-ee11-48a5-ab0e-\
cf39e5d02669"],
Cell[BoxData[
FormBox[
InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\\\\\
!\\\\(TraditionalForm\\\\`\\\\\\\"lim\\\\\\\"\\\\+\\\\(x \\\\[Rule] \
1\\\\)\\\\) \\\\!\\\\(TraditionalForm\\\\`\\\\(\\\\@\\\\(\\\\(\\\\(4\\\\\\\\ \
x\\\\)\\\\) - 1\\\\) - \\\\@\\\\(\\\\(\\\\(4\\\\\\\\ x\\\\^2\\\\)\\\\) - \
4\\\\)\\\\)\\\\)\\\"\\)\\) = \\!\\(TraditionalForm\\`\\@3\\)\"\>",
StringForm["`1` = `2`",
analyse`Limite[(-1 + 4 $CellContext`x)^Rational[1, 2] - (-4 +
4 $CellContext`x^2)^Rational[1, 2], $CellContext`x, 1], 3^
Rational[1, 2]],
Editable->False], TraditionalForm]], "Print",
CellChangeTimes->{
3.4360755562637033`*^9},ExpressionUUID->"4169232d-6927-4cfc-99e9-\
90c0310b1e3c"],
Cell[BoxData[
FormBox[
InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\\\\\
!\\\\(TraditionalForm\\\\`\\\\\\\"lim\\\\\\\"\\\\+\\\\(x \\\\[Rule] \\\\\\\"+\
\\\\\\\\!\\\\\\\\(TraditionalForm\\\\\\\\`\\\\\\\\[Infinity]\\\\\\\\)\\\\\\\"\
\\\\)\\\\) \\\\!\\\\(TraditionalForm\\\\`\\\\(\\\\@\\\\(\\\\(\\\\(4\\\\\\\\ x\
\\\\)\\\\) - 1\\\\) - \\\\@\\\\(\\\\(\\\\(4\\\\\\\\ x\\\\^2\\\\)\\\\) - \
4\\\\)\\\\)\\\\)\\\"\\)\\) = \
\\!\\(TraditionalForm\\`\\(-\[Infinity]\\)\\)\"\>",
StringForm["`1` = `2`",
analyse`Limite[(-1 + 4 $CellContext`x)^Rational[1, 2] - (-4 +
4 $CellContext`x^2)^Rational[1, 2], $CellContext`x,
DirectedInfinity[1]],
DirectedInfinity[-1]],
Editable->False], TraditionalForm]], "Print",
CellChangeTimes->{
3.4360755563493423`*^9},ExpressionUUID->"0e76a762-1272-4420-a520-\
df258650d194"],
Cell[BoxData[
FormBox[
InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\\\\\
!\\\\(TraditionalForm\\\\`\\\\\\\"lim\\\\\\\"\\\\+\\\\(x \\\\[Rule] \
\\\\(\\\\(-\\\\[Infinity]\\\\)\\\\)\\\\)\\\\) \
\\\\!\\\\(TraditionalForm\\\\`\\\\(\\\\@\\\\(\\\\(\\\\(4\\\\\\\\ x\\\\)\\\\) \
- 1\\\\) - \\\\@\\\\(\\\\(\\\\(4\\\\\\\\ x\\\\^2\\\\)\\\\) - 4\\\\)\\\\)\\\\)\
\\\"\\)\\) n'existe pas\"\>",
StringForm["`1` `2`",
analyse`Limite[(-1 + 4 $CellContext`x)^Rational[1, 2] - (-4 +
4 $CellContext`x^2)^Rational[1, 2], $CellContext`x,
DirectedInfinity[-1]], " n'existe pas"],
Editable->False], TraditionalForm]], "Print",
CellChangeTimes->{
3.4360755563783903`*^9},ExpressionUUID->"5eaebb35-39c1-4d6b-98ad-\
c448a6a4edc8"],
Cell[BoxData[
FormBox[
InterpretationBox[
RowBox[{
"14", "\[InvisibleSpace]", "\<\". Dom f = \"\>", "\[InvisibleSpace]",
FormBox[
InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\
\\\\[LongLeftArrow], \\\\!\\\\(TraditionalForm\\\\`1\\\\/4\\\\)[\\\"\\)\\) \
\[Union] \\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\\\\!\\\\(\
TraditionalForm\\\\`\\\\(TraditionalForm\\\\`\\\\\\\"]\\\\\\\\!\\\\\\\\(\
TraditionalForm\\\\\\\\`1\\\\\\\\/4\\\\\\\\), \
\\\\\\\\!\\\\\\\\(TraditionalForm\\\\\\\\`1\\\\\\\\)]\\\\\\\"\\\\)\\\\) \
\\\\[Union] \
\\\\!\\\\(TraditionalForm\\\\`\\\\(TraditionalForm\\\\`\\\\\\\"[\\\\\\\\!\\\\\
\\\\(TraditionalForm\\\\\\\\`2\\\\\\\\), \
\\\\\\\\[LongRightArrow]\\\\\\\"\\\\)\\\\)\\\"\\)\\)\"\>",
StringForm["`1` \[Union] `2`",
analyse`Ens[$CellContext`x < Rational[1, 4], $CellContext`x],
analyse`Ens[
Or[
Inequality[
Rational[1, 4], Less, $CellContext`x, LessEqual, 1], $CellContext`x >=
2], $CellContext`x]],
Editable->False],
TraditionalForm]}],
SequenceForm[14, ". Dom f = ",
analyse`Ens[
Or[$CellContext`x < Rational[1, 4],
Inequality[
Rational[1, 4], Less, $CellContext`x, LessEqual, 1], $CellContext`x >=
2], $CellContext`x]],
Editable->False], TraditionalForm]], "Print",
CellChangeTimes->{
3.4360755564491243`*^9},ExpressionUUID->"f7dd7ee8-2036-4c18-8824-\
e0b0a0d1526a"],
Cell[BoxData[
FormBox[
InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(\[Piecewise] \
\\*GridBox[{{\\\"\\\\\\\"\\\\\\\\!\\\\\\\\(TraditionalForm\\\\\\\\`\\\\\\\\(\
TraditionalForm\\\\\\\\`\\\\\\\\\\\\\\\"\\\\\\\\\\\\\\\\!\\\\\\\\\\\\\\\\(\
TraditionalForm\\\\\\\\\\\\\\\\`\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\"lim\\\\\\\\\\\
\\\\\\\\\\\\\\\\\\\\\"\\\\\\\\\\\\\\\\+\\\\\\\\\\\\\\\\(\\\\\\\\\\\\\\\\(x \\\
\\\\\\\\\\\\\\[Rule] \
1\\\\\\\\\\\\\\\\/4\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\+\\\\\\\\\\\\\\\\\\\\\\\\\
\\\\\\\"<\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\"\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\) \
\\\\\\\\\\\\\\\\!\\\\\\\\\\\\\\\\(TraditionalForm\\\\\\\\\\\\\\\\`\\\\\\\\\\\\\
\\\\@\\\\\\\\\\\\\\\\(x\\\\\\\\\\\\\\\\^2 - \
\\\\\\\\\\\\\\\\(\\\\\\\\\\\\\\\\(3\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\ x\\\\\\\\\
\\\\\\\\)\\\\\\\\\\\\\\\\) + \
2\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\/\\\\\\\\\\\\\\\\(\\\\\\\\\\\\\\\\(\\\\\\\\\
\\\\\\\\(4\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\ \
x\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\) - 1\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\)\\\\\
\\\\\\\\\\\"\\\\\\\\)\\\\\\\\) = \\\\\\\\!\\\\\\\\(TraditionalForm\\\\\\\\`\\\
\\\\\\(-\[Infinity]\\\\\\\\)\\\\\\\\)\\\\\\\"\\\", \\\"\\\\\\\" \
\\\\\\\"\\\"}, \
{\\\"\\\\\\\"\\\\\\\\!\\\\\\\\(TraditionalForm\\\\\\\\`\\\\\\\\(\
TraditionalForm\\\\\\\\`\\\\\\\\\\\\\\\"\\\\\\\\\\\\\\\\!\\\\\\\\\\\\\\\\(\
TraditionalForm\\\\\\\\\\\\\\\\`\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\"lim\\\\\\\\\\\
\\\\\\\\\\\\\\\\\\\\\"\\\\\\\\\\\\\\\\+\\\\\\\\\\\\\\\\(\\\\\\\\\\\\\\\\(x \\\
\\\\\\\\\\\\\\[Rule] \
1\\\\\\\\\\\\\\\\/4\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\+\\\\\\\\\\\\\\\\\\\\\\\\\
\\\\\\\">\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\"\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\) \
\\\\\\\\\\\\\\\\!\\\\\\\\\\\\\\\\(TraditionalForm\\\\\\\\\\\\\\\\`\\\\\\\\\\\\\
\\\\@\\\\\\\\\\\\\\\\(x\\\\\\\\\\\\\\\\^2 - \
\\\\\\\\\\\\\\\\(\\\\\\\\\\\\\\\\(3\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\ x\\\\\\\\\
\\\\\\\\)\\\\\\\\\\\\\\\\) + \
2\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\/\\\\\\\\\\\\\\\\(\\\\\\\\\\\\\\\\(\\\\\\\\\
\\\\\\\\(4\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\ \
x\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\) - 1\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\)\\\\\
\\\\\\\\\\\"\\\\\\\\)\\\\\\\\) = \\\\\\\\!\\\\\\\\(TraditionalForm\\\\\\\\`\\\
\\\\\\\\\\\\\"+\\\\\\\\\\\\\\\\!\\\\\\\\\\\\\\\\(TraditionalForm\\\\\\\\\\\\\\\
\\`\\\\\\\\\\\\\\\\[Infinity]\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\"\\\\\\\\)\\\\\\\
\"\\\", \\\"\\\\\\\" \\\\\\\"\\\"}}, ColumnAlignments -> {Left}, \
ColumnSpacings -> 1.2, ColumnWidths -> Automatic]\\)\\)\"\>",
StringForm["`1`",
Piecewise[{{
StringForm["`1` = `2`",
analyse`Limite[(-1 + 4 $CellContext`x)^(-1) (2 -
3 $CellContext`x + $CellContext`x^2)^
Rational[1, 2], $CellContext`x,
Rational[1, 4], -1],
DirectedInfinity[-1]], " "}, {
StringForm["`1` = `2`",
analyse`Limite[(-1 + 4 $CellContext`x)^(-1) (2 -
3 $CellContext`x + $CellContext`x^2)^
Rational[1, 2], $CellContext`x,
Rational[1, 4], 1],
StringForm["+`1`",
DirectedInfinity[1]]], " "}}, 0]],
Editable->False], TraditionalForm]], "Print",
CellChangeTimes->{
3.436075556507649*^9},ExpressionUUID->"4e8f5996-d738-4ce3-8dc5-\
018c5be713bf"],
Cell[BoxData[
FormBox[
InterpretationBox["\<\"AV \[Congruent] \\!\\(TraditionalForm\\`x\\) = \
\\!\\(TraditionalForm\\`1\\/4\\)\"\>",
StringForm["AV \[Congruent] `1` = `2`", $CellContext`x,
Rational[1, 4]],
Editable->False], TraditionalForm]], "Print",
CellChangeTimes->{
3.43607555653662*^9},ExpressionUUID->"ef09c22b-c7c4-4e91-974b-8fb5f37271c4"],
Cell[BoxData[
FormBox[
InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\\\\\
!\\\\(TraditionalForm\\\\`\\\\\\\"lim\\\\\\\"\\\\+\\\\(x \\\\[Rule] \
1\\\\)\\\\) \\\\!\\\\(TraditionalForm\\\\`\\\\@\\\\(x\\\\^2 - \\\\(\\\\(3\\\\\
\\\\ x\\\\)\\\\) + 2\\\\)\\\\/\\\\(\\\\(\\\\(4\\\\\\\\ x\\\\)\\\\) - 1\\\\)\\\
\\)\\\"\\)\\) = \\!\\(TraditionalForm\\`0\\)\"\>",
StringForm["`1` = `2`",
analyse`Limite[(-1 + 4 $CellContext`x)^(-1) (2 -
3 $CellContext`x + $CellContext`x^2)^Rational[1, 2], $CellContext`x,
1], 0],
Editable->False], TraditionalForm]], "Print",
CellChangeTimes->{
3.436075556570024*^9},ExpressionUUID->"cce62cd9-0259-4720-aed5-\
05e08b3e633a"],
Cell[BoxData[
FormBox[
InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\\\\\
!\\\\(TraditionalForm\\\\`\\\\\\\"lim\\\\\\\"\\\\+\\\\(x \\\\[Rule] \
2\\\\)\\\\) \\\\!\\\\(TraditionalForm\\\\`\\\\@\\\\(x\\\\^2 - \\\\(\\\\(3\\\\\
\\\\ x\\\\)\\\\) + 2\\\\)\\\\/\\\\(\\\\(\\\\(4\\\\\\\\ x\\\\)\\\\) - 1\\\\)\\\
\\)\\\"\\)\\) = \\!\\(TraditionalForm\\`0\\)\"\>",
StringForm["`1` = `2`",
analyse`Limite[(-1 + 4 $CellContext`x)^(-1) (2 -
3 $CellContext`x + $CellContext`x^2)^Rational[1, 2], $CellContext`x,
2], 0],
Editable->False], TraditionalForm]], "Print",
CellChangeTimes->{
3.436075556631124*^9},ExpressionUUID->"29e57da9-8214-44b8-ab6c-\
daf9a3b556dc"],
Cell[BoxData[
FormBox[
InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\\\\\
!\\\\(TraditionalForm\\\\`\\\\\\\"lim\\\\\\\"\\\\+\\\\(x \\\\[Rule] \\\\\\\"+\
\\\\\\\\!\\\\\\\\(TraditionalForm\\\\\\\\`\\\\\\\\[Infinity]\\\\\\\\)\\\\\\\"\
\\\\)\\\\) \\\\!\\\\(TraditionalForm\\\\`\\\\@\\\\(x\\\\^2 - \
\\\\(\\\\(3\\\\\\\\ x\\\\)\\\\) + 2\\\\)\\\\/\\\\(\\\\(\\\\(4\\\\\\\\ \
x\\\\)\\\\) - 1\\\\)\\\\)\\\"\\)\\) = \\!\\(TraditionalForm\\`1\\/4\\)\"\>",
StringForm["`1` = `2`",
analyse`Limite[(-1 + 4 $CellContext`x)^(-1) (2 -
3 $CellContext`x + $CellContext`x^2)^Rational[1, 2], $CellContext`x,
DirectedInfinity[1]],
Rational[1, 4]],
Editable->False], TraditionalForm]], "Print",
CellChangeTimes->{
3.436075556691506*^9},ExpressionUUID->"cd78780f-ada1-446d-adad-\
b8d60e270786"],
Cell[BoxData[
FormBox[
InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\\\\\
!\\\\(TraditionalForm\\\\`\\\\\\\"lim\\\\\\\"\\\\+\\\\(x \\\\[Rule] \
\\\\(\\\\(-\\\\[Infinity]\\\\)\\\\)\\\\)\\\\) \
\\\\!\\\\(TraditionalForm\\\\`\\\\@\\\\(x\\\\^2 - \\\\(\\\\(3\\\\\\\\ \
x\\\\)\\\\) + 2\\\\)\\\\/\\\\(\\\\(\\\\(4\\\\\\\\ x\\\\)\\\\) - 1\\\\)\\\\)\\\
\"\\)\\) = \\!\\(TraditionalForm\\`\\(-\\(\\(1\\/4\\)\\)\\)\\)\"\>",
StringForm["`1` = `2`",
analyse`Limite[(-1 + 4 $CellContext`x)^(-1) (2 -
3 $CellContext`x + $CellContext`x^2)^Rational[1, 2], $CellContext`x,
DirectedInfinity[-1]],
Rational[-1, 4]],
Editable->False], TraditionalForm]], "Print",
CellChangeTimes->{
3.4360755567178707`*^9},ExpressionUUID->"7678323d-1ba5-4d17-998e-\
0c8fbbfed4bc"],
Cell[BoxData[
FormBox[
InterpretationBox[
RowBox[{"\<\"AH\"\>", "\[InvisibleSpace]", "\<\" \[Congruent] \"\>",
"\[InvisibleSpace]",
RowBox[{"y", "\[LongEqual]",
FractionBox["1", "4"]}],
"\[InvisibleSpace]", "\<\" \[AGrave] droite\"\>"}],
SequenceForm[
"AH", " \[Congruent] ", $CellContext`y == Rational[1, 4],
" \[AGrave] droite"],
Editable->False], TraditionalForm]], "Print",
CellChangeTimes->{
3.43607555676304*^9},ExpressionUUID->"8772df55-3288-46bb-ac03-5151fab92355"],
Cell[BoxData[
FormBox[
InterpretationBox[
RowBox[{"\<\"AH\"\>", "\[InvisibleSpace]", "\<\" \[Congruent] \"\>",
"\[InvisibleSpace]",
RowBox[{"y", "\[LongEqual]",
RowBox[{"-",
FractionBox["1", "4"]}]}],
"\[InvisibleSpace]", "\<\" \[AGrave] gauche\"\>"}],
SequenceForm[
"AH", " \[Congruent] ", $CellContext`y == Rational[-1, 4],
" \[AGrave] gauche"],
Editable->False], TraditionalForm]], "Print",
CellChangeTimes->{
3.43607555678058*^9},ExpressionUUID->"45803b61-951e-466c-baa3-ec61bb7481fa"]
}, Open ]]
}, Open ]]
}, Open ]]
},
WindowSize->{986, 729},
WindowMargins->{{190, Automatic}, {Automatic, 0}},
PrintingCopies->1,
PrintingPageRange->{1, Automatic},
FrontEndVersion->"11.3 for Mac OS X x86 (32-bit, 64-bit Kernel) (March 5, \
2018)",
StyleDefinitions->"stylemath_16.nb"
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{}
*)
(*CellTagsIndex
CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
Cell[CellGroupData[{
Cell[567, 22, 272, 7, 88, "Section",ExpressionUUID->"851b59b4-7a4e-4cff-8216-7c7e59c9a77f"],
Cell[CellGroupData[{
Cell[864, 33, 9194, 307, 23, "Input",ExpressionUUID->"0cbb56d7-6d53-413c-8199-19811e1bc2ff",
CellOpen->False],
Cell[CellGroupData[{
Cell[10083, 344, 478, 14, 41, "Print",ExpressionUUID->"4ee1e055-db18-46d8-9f85-06a0202c52cf"],
Cell[10564, 360, 493, 15, 58, "Print",ExpressionUUID->"9f4e81b8-7fa2-4538-8f21-f2d4ffa018d9"],
Cell[11060, 377, 491, 15, 41, "Print",ExpressionUUID->"b44af049-259c-47b2-8fd4-4222a1339e84"],
Cell[11554, 394, 510, 15, 41, "Print",ExpressionUUID->"507dc0bf-fe44-453c-8213-2cc11356fe40"],
Cell[12067, 411, 751, 22, 68, "Print",ExpressionUUID->"6bec991f-19e7-49d0-ac42-0957dfd59678"],
Cell[12821, 435, 604, 19, 66, "Print",ExpressionUUID->"934727ee-9980-44de-825c-7d19b4a60592"],
Cell[13428, 456, 733, 23, 68, "Print",ExpressionUUID->"1e42268e-4abe-44c9-b791-3b03a23afcfa"],
Cell[14164, 481, 578, 18, 66, "Print",ExpressionUUID->"2c046679-223a-4ed5-9574-9582ba5ddeb0"],
Cell[14745, 501, 578, 18, 41, "Print",ExpressionUUID->"c4df3edc-2635-4c90-b2db-9fff993b3fe9"],
Cell[15326, 521, 693, 21, 41, "Print",ExpressionUUID->"f041fa50-b903-4a62-b8da-1332d37e3da0"],
Cell[16022, 544, 844, 26, 78, "Print",ExpressionUUID->"5108068f-7f4a-4d4b-92cc-d1ede5fb3cce"],
Cell[16869, 572, 607, 19, 78, "Print",ExpressionUUID->"c9940bbc-48fa-4689-bf9a-c22c2f54d041"],
Cell[17479, 593, 612, 19, 43, "Print",ExpressionUUID->"5765b1df-b46b-4127-956c-156f3288da17"],
Cell[18094, 614, 605, 18, 68, "Print",ExpressionUUID->"fe85dcd3-bf3c-45a8-829f-d09986524dae"]
}, Open ]]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell[18760, 639, 83, 0, 58, "Section",ExpressionUUID->"02282864-0550-4a33-8d3a-fd96cf853786"],
Cell[CellGroupData[{
Cell[18868, 643, 9867, 327, 23, "Input",ExpressionUUID->"655b0707-de5d-4c7d-a03f-9cb013e36caa",
CellOpen->False],
Cell[CellGroupData[{
Cell[28760, 974, 904, 21, 34, "Print",ExpressionUUID->"a86918df-17e2-4f99-81ba-40b0c65fd644"],
Cell[29667, 997, 613, 12, 55, "Print",ExpressionUUID->"3042b550-8f08-42f6-befd-d12debf36c93"],
Cell[30283, 1011, 611, 12, 55, "Print",ExpressionUUID->"7cc00021-416e-42c0-ab15-05a0365b23eb"],
Cell[30897, 1025, 832, 18, 55, "Print",ExpressionUUID->"0d2ae301-6dbf-49e7-98bc-f466cfe1df59"],
Cell[31732, 1045, 782, 18, 55, "Print",ExpressionUUID->"22a2feb9-3cce-489d-9c93-7cd57656c49c"],
Cell[32517, 1065, 527, 14, 34, "Print",ExpressionUUID->"c37d4a81-b2b0-4137-a20b-c8860804ff64"],
Cell[33047, 1081, 528, 14, 35, "Print",ExpressionUUID->"d1348762-c4d9-4431-bc5f-c108cfc415e5"],
Cell[33578, 1097, 600, 16, 55, "Print",ExpressionUUID->"dfea10c9-f6ca-4de4-a2fb-a940cf955cad"],
Cell[34181, 1115, 782, 17, 88, "Print",ExpressionUUID->"36800d91-fbe8-44e1-aea2-4612d54d23ec"],
Cell[34966, 1134, 386, 9, 55, "Print",ExpressionUUID->"364ba158-f618-4356-bb87-69fa6caf9da1"],
Cell[35355, 1145, 725, 15, 58, "Print",ExpressionUUID->"cbf7b4c0-e299-4f1c-83e3-c1f5e0ffa3af"],
Cell[36083, 1162, 667, 13, 58, "Print",ExpressionUUID->"edf7a810-2b95-4a43-a882-d1b416a10a09"],
Cell[36753, 1177, 478, 12, 34, "Print",ExpressionUUID->"f2414ca8-a83e-4bd1-863e-7471e43ea755"],
Cell[37234, 1191, 461, 14, 34, "Print",ExpressionUUID->"1faf506b-06e8-4836-9788-88259c62584f"],
Cell[37698, 1207, 189, 4, 24, "Print",ExpressionUUID->"8a4ded6f-e1cd-45f4-82b4-31c443b9b9c8"],
Cell[37890, 1213, 839, 18, 42, "Print",ExpressionUUID->"f510bc15-775e-4c56-8c1e-44f9d6274d5a"],
Cell[38732, 1233, 787, 18, 42, "Print",ExpressionUUID->"c5215492-48e1-46b6-a3db-53ac08057b6e"],
Cell[39522, 1253, 526, 14, 24, "Print",ExpressionUUID->"7784695b-999a-47f4-a562-572c6394f0e3"],
Cell[40051, 1269, 545, 14, 24, "Print",ExpressionUUID->"1cc227d2-99b9-4ae0-8af4-ff6d8a8784d3"],
Cell[40599, 1285, 921, 22, 24, "Print",ExpressionUUID->"6f6bb0c3-ae06-4ddb-afbd-9d0ec41790b1"],
Cell[41523, 1309, 649, 13, 42, "Print",ExpressionUUID->"4f75449b-11b6-4a8b-b648-a68b008b3441"],
Cell[42175, 1324, 617, 12, 42, "Print",ExpressionUUID->"2d3c8354-cf3d-4f49-9c1a-d53ba2b3ae67"],
Cell[42795, 1338, 838, 18, 42, "Print",ExpressionUUID->"2ba78f60-cf47-4721-9a83-25b970c3c2f9"],
Cell[43636, 1358, 700, 15, 43, "Print",ExpressionUUID->"6c1cf9ec-aa50-492f-96d4-dc34a0ad69ae"],
Cell[44339, 1375, 520, 14, 42, "Print",ExpressionUUID->"b413d597-9b12-41a4-b815-4031dc306a06"],
Cell[44862, 1391, 1036, 24, 48, "Print",ExpressionUUID->"0daae26a-9e5f-433d-8238-fafdc91d2393"],
Cell[45901, 1417, 956, 17, 72, "Print",ExpressionUUID->"2cd3c441-4b57-49ba-9b7d-ae6476852c19"],
Cell[46860, 1436, 914, 17, 72, "Print",ExpressionUUID->"16108d40-2b33-4292-a034-694411898109"],
Cell[47777, 1455, 1018, 19, 58, "Print",ExpressionUUID->"0ae8e625-1136-4162-8d78-019a6bc313e1"],
Cell[48798, 1476, 941, 18, 58, "Print",ExpressionUUID->"43d3e7e8-0c72-4697-9464-d67a6343e0d8"],
Cell[49742, 1496, 669, 19, 53, "Print",ExpressionUUID->"7ed462cb-fe72-4ea6-b635-575c590a7410"],
Cell[50414, 1517, 644, 18, 53, "Print",ExpressionUUID->"22a4cd80-ca3a-40e3-b3cd-cc07f1874f9e"],
Cell[51061, 1537, 458, 13, 24, "Print",ExpressionUUID->"0ba18544-4da0-482d-a03e-0db6f8609093"],
Cell[51522, 1552, 189, 4, 24, "Print",ExpressionUUID->"dfa2121a-bb65-4eb3-a961-5496940e235a"],
Cell[51714, 1558, 860, 17, 55, "Print",ExpressionUUID->"64779bb2-f206-403a-a90a-2ca24db86d8d"],
Cell[52577, 1577, 786, 16, 55, "Print",ExpressionUUID->"9488a61c-300d-4089-ab24-89fddb303214"],
Cell[53366, 1595, 564, 15, 48, "Print",ExpressionUUID->"fd3d3dc6-81d5-43cd-8537-22abbc75cc64"],
Cell[53933, 1612, 536, 14, 48, "Print",ExpressionUUID->"454119a0-febc-4b7e-983c-e8454b3538cb"],
Cell[54472, 1628, 568, 16, 24, "Print",ExpressionUUID->"7f7f8088-eeaf-4389-b3ad-1a37ffb70544"],
Cell[55043, 1646, 804, 17, 53, "Print",ExpressionUUID->"2a8ca3f5-e7b8-4b89-9c4a-aa791709f651"],
Cell[55850, 1665, 932, 19, 53, "Print",ExpressionUUID->"50886295-f85f-42f4-bc77-92878de006f7"],
Cell[56785, 1686, 836, 17, 53, "Print",ExpressionUUID->"d15d5a5c-c0bc-414e-8bba-510088b68c0a"],
Cell[57624, 1705, 2229, 45, 35, "Print",ExpressionUUID->"1eeea42e-c91e-4dcf-8d2a-0ac9d31e8ee6"],
Cell[59856, 1752, 3119, 50, 95, "Print",ExpressionUUID->"dd8705d3-725b-45d6-9e92-f3031968157d"],
Cell[62978, 1804, 376, 9, 35, "Print",ExpressionUUID->"99514485-1457-4baa-8060-87c62cd11c23"],
Cell[63357, 1815, 695, 14, 55, "Print",ExpressionUUID->"be1413d5-31d6-498e-b60d-dbf4d4c6efe4"],
Cell[64055, 1831, 671, 13, 55, "Print",ExpressionUUID->"e8a45c3b-a415-4d44-a86e-7b101e55831a"],
Cell[64729, 1846, 2971, 46, 95, "Print",ExpressionUUID->"20d59376-aff8-4ae6-8703-8157a9a8bea5"],
Cell[67703, 1894, 364, 8, 35, "Print",ExpressionUUID->"afb58625-0af6-4228-88e2-6d2de6784e05"],
Cell[68070, 1904, 772, 15, 55, "Print",ExpressionUUID->"fb21065a-abb6-48d5-a883-22f1bae7971e"],
Cell[68845, 1921, 730, 15, 55, "Print",ExpressionUUID->"868dc322-33ec-4799-b594-7f90f335859a"],
Cell[69578, 1938, 478, 12, 24, "Print",ExpressionUUID->"645f9572-f326-4d59-b4b1-16c9d157f208"],
Cell[70059, 1952, 501, 13, 24, "Print",ExpressionUUID->"bf22fd52-600b-48fb-b4f1-d2c560568d21"],
Cell[70563, 1967, 461, 14, 24, "Print",ExpressionUUID->"16c13ccf-454b-4c4d-87de-5588688c4924"],
Cell[71027, 1983, 186, 3, 24, "Print",ExpressionUUID->"bbbde2a9-80c8-406f-936a-5de9a25f4bbd"],
Cell[71216, 1988, 758, 15, 42, "Print",ExpressionUUID->"3133f423-a47b-453c-b70c-0b6409e5feaa"],
Cell[71977, 2005, 704, 14, 42, "Print",ExpressionUUID->"04800f0c-9bc7-4868-a1ed-5c84528d3318"],
Cell[72684, 2021, 398, 10, 24, "Print",ExpressionUUID->"ce59d0c7-e653-48bd-8555-7622beeb31cc"],
Cell[73085, 2033, 906, 21, 24, "Print",ExpressionUUID->"92255b76-d865-4c0f-b9c5-068decb10181"],
Cell[73994, 2056, 767, 14, 42, "Print",ExpressionUUID->"1f8a8d77-d069-4dfc-8d98-56444413c795"],
Cell[74764, 2072, 792, 15, 42, "Print",ExpressionUUID->"7f7f4fcb-141a-4e88-8cf5-456956b7172d"],
Cell[75559, 2089, 881, 17, 42, "Print",ExpressionUUID->"b1c21555-e0c8-4e6e-97bf-9cbe139ad997"],
Cell[76443, 2108, 841, 17, 42, "Print",ExpressionUUID->"9f78479a-5c8b-4209-b785-be0d8b43d505"],
Cell[77287, 2127, 480, 12, 24, "Print",ExpressionUUID->"882efc52-d94e-4f49-b76c-881485d63bf9"],
Cell[77770, 2141, 499, 13, 24, "Print",ExpressionUUID->"bbab4f0a-df43-4558-ab39-3c68c73d50ca"],
Cell[78272, 2156, 980, 24, 43, "Print",ExpressionUUID->"47384324-f110-40e4-8e5d-fa9df6ead11e"],
Cell[79255, 2182, 1019, 19, 65, "Print",ExpressionUUID->"be598530-2f39-4445-ae21-cd91b15b6a9b"],
Cell[80277, 2203, 1025, 20, 65, "Print",ExpressionUUID->"3b0c2931-d48a-4bc9-a3e4-caaff19b01ce"],
Cell[81305, 2225, 364, 8, 24, "Print",ExpressionUUID->"a3915f35-88c3-49ef-8c7d-985b0deaebcd"],
Cell[81672, 2235, 991, 19, 65, "Print",ExpressionUUID->"8c337457-d3b8-403a-94c5-7bd269d4e75d"],
Cell[82666, 2256, 963, 20, 65, "Print",ExpressionUUID->"0cabed16-fc88-401f-afec-b85adf7e6766"],
Cell[83632, 2278, 478, 12, 24, "Print",ExpressionUUID->"7e92aa4a-6be1-40ed-97f0-ab91e091c5cf"],
Cell[84113, 2292, 522, 14, 43, "Print",ExpressionUUID->"d52e9e23-79b2-42b7-9bba-58c85d8a27ee"],
Cell[84638, 2308, 567, 16, 24, "Print",ExpressionUUID->"ee0995a7-3f54-4a11-a25d-966eae52e093"],
Cell[85208, 2326, 823, 19, 65, "Print",ExpressionUUID->"659210c2-4431-4734-b240-d25f77f8c8e2"],
Cell[86034, 2347, 364, 8, 24, "Print",ExpressionUUID->"c4cf710b-1847-49b8-ad62-2ba379fcc029"],
Cell[86401, 2357, 787, 16, 65, "Print",ExpressionUUID->"10f0b294-3d84-475d-9c0e-d3e904da6612"],
Cell[87191, 2375, 736, 16, 65, "Print",ExpressionUUID->"ba557bd1-0b4e-4424-96fd-246ef59ed0ea"],
Cell[87930, 2393, 480, 12, 24, "Print",ExpressionUUID->"95bc3cc7-4ca8-491f-bd90-c6ec39522073"],
Cell[88413, 2407, 568, 16, 24, "Print",ExpressionUUID->"79aaf363-ee11-48a5-ab0e-cf39e5d02669"],
Cell[88984, 2425, 728, 14, 55, "Print",ExpressionUUID->"4169232d-6927-4cfc-99e9-90c0310b1e3c"],
Cell[89715, 2441, 859, 17, 55, "Print",ExpressionUUID->"0e76a762-1272-4420-a520-df258650d194"],
Cell[90577, 2460, 763, 15, 55, "Print",ExpressionUUID->"5eaebb35-39c1-4d6b-98ad-c448a6a4edc8"],
Cell[91343, 2477, 1457, 34, 56, "Print",ExpressionUUID->"f7dd7ee8-2036-4c18-8824-e0b0a0d1526a"],
Cell[92803, 2513, 3197, 57, 183, "Print",ExpressionUUID->"4e8f5996-d738-4ce3-8dc5-018c5be713bf"],
Cell[96003, 2572, 365, 8, 56, "Print",ExpressionUUID->"ef09c22b-c7c4-4e91-974b-8fb5f37271c4"],
Cell[96371, 2582, 705, 14, 69, "Print",ExpressionUUID->"cce62cd9-0259-4720-aed5-05e08b3e633a"],
Cell[97079, 2598, 705, 14, 69, "Print",ExpressionUUID->"29e57da9-8214-44b8-ab6c-daf9a3b556dc"],
Cell[97787, 2614, 832, 16, 69, "Print",ExpressionUUID->"cd78780f-ada1-446d-adad-b8d60e270786"],
Cell[98622, 2632, 804, 16, 69, "Print",ExpressionUUID->"7678323d-1ba5-4d17-998e-0c8fbbfed4bc"],
Cell[99429, 2650, 517, 13, 56, "Print",ExpressionUUID->"8772df55-3288-46bb-ac03-5151fab92355"],
Cell[99949, 2665, 540, 14, 56, "Print",ExpressionUUID->"45803b61-951e-466c-baa3-ec61bb7481fa"]
}, Open ]]
}, Open ]]
}, Open ]]
}
]
*)