(*内容类型:application/vnd.wolfram.mathematica*)(***Wolfram笔记本文件***)(* http://www.wolfram.com/nb *)(*CreatedBy='Mathematica 9.0'*)(*CacheID:234*)(*内部缓存信息:笔记本文件断线测试笔记本文件断线测试笔记本数据位置[157,7]笔记本数据长度[10067,303]笔记本选项位置[9166,265]笔记本大纲位置[9520,281]单元格标签索引位置[9477,278]窗口框架->正常*)(*笔记本内容开头*)笔记本[{单元格[CellGroupData[{单元格[“Acnode”,“Title”],单元格[CellGroupData[{单元格[“作者”,“小节”],单元格[“\<\埃里克·韦斯特因2008年6月5日\\>“,”文本“],单元格[TextData[{“此笔记本下载自”,按钮框[“http://mathworld.wolfram.com/notes/PlaneCurves/Acnode.nb",BaseStyle->“超链接”,按钮数据:>{URL[“http://mathworld.wolfram.com/notebooks/PlaneCurves/Acnode.nb"], 无}],"."}],“文本”],单元格[TextData[{“有关更多信息,请参阅埃里克的”,StyleBox[“数学世界”,字体倾斜->“斜体”],“条目”,按钮框[“http://mathworld.wolfram.com/Acnode.html",BaseStyle->“超链接”,按钮数据:>{URL[“http://mathworld.wolfram.com/Acnode.html“],无}],"."}],“文本”],单元格[“\<\\[版权所有]2008 Wolfram Research,Inc.,除非另有说明\\>“,”文本“]},打开]],单元格[CellGroupData[{单元格[“Plot”,“Section”],单元格[CellGroupData[{单元格[BoxData[RowBox[{“ContourPlot”,“[”,行框[{行框[{行框[{行框[{“y”,“^”,“2”}],“+”,行框[{“x”,“^”,“2”}],“+”,行框[{“x”,“^”,“3”}]}],“\[Equal]”,“0”}],”,“,”,RowBox[{“{”,RowBox[{“x”,“,”,行框[{“-”,“4”}],“,”,RowBox[{“{”,行框[{“y”,“,”,行框[{“-”,“4”}],“,”,行框[{“轮廓样式”,“\[Rule]”,“红色”}],“,”,行框[{“轴”,“\[Rule]”,“True”}],“,”,行框[{“AxesStyle”,“\[Rule]”,“Gray”}],“,”,行框[{“Epilog”,“\[Rule]”,RowBox[{“{”,行框[{行框[{“PointSize”,“[”,“.02”,“]”}],“,”,“Red”,“,“,行框[{“点”,“[”,RowBox[{“{”,行框[{“0”,“,”,“0”}],“}”}],单元格[BoxData[GraphicsBox[GraphicsComplexBox[CompressedData[“1:eJxdl3tcjdkax/eti1CZNEgzk到5HZpBg6TWG0ohkWHqzEzmGJVMoptkChUyJZccMx2loZzOKQ6qKeniWUg5lbDdYjORQqj2pb3bN/boXeudP/b+fOr9vNe1nuvv+0xetzk4XMDj8至+/A0f3QY650lnmGEe+7NmLoY/nhkzwQwbzAwZhstWTM0mSfUmiSluW1tZ/PFkK2bLkU/uv442xVVVCcvDnC2ZwInpjWe9THH08GPV型o5kJJS6m22+a4DYbYcPLslGM2qPjTug1E+wYkOsUkDuKmaWFl96XTXCY609lPZmjmHgf+5QzHia4Y/j1TSOZkNBtdnZWJrikJLOnR2rB/IV9T4SzEkq3pzSOYO4G401zw0Q4b5/KUBYgkl0CJ+ew4iw3/BjTiOYmINHwuebi/CBDuesPcfM公司mVG3Ko+fLxXi9hcXvUwbzZgn7DpCPCQM0E2bY8Yk2dpXNTNC/Buxk9kiyxGMlQtwx4mf/XbMNGX2+Mpub68R4B9Y+0yYfw4vEyDAURenXFDUiphH0bZVazwF+DGviT/uhIjZrzxZ7u0uoPaKmMDfLhiSJwmwpIOXWxglYkrrbdpNSvj4IdkHMyvCInNNKh/LujKPy8cKmaWsHXx8LjY33m+VgNHuCVlp58DHh8i6zELxXFt3Oz7et/7bsCZvAePfeciuFfPwEt+apNB9fMaj5uFnjVk8vJh8hxGQwGIROTI8ek6PzHsD+wM9OaIhej5Az78/sXvOsXkGGOk5c7ZPynuUM/gg3rb1PWxk/fEO塔伊夫Vfdp4nu4ovWYlKfWozhyHcy6Vzc0pelQoNmu7pxz70CfdWq9KFGHFrpZfv267B08YO3XofzR+7yPFb4DXq/3mcTV-OuQ1563Hzh49JM8eSOlXatBU1o96uKyZLtoforE556frlm/TwyLWPg36JutpxH07PTRfKm+IS1IjYW7bryGPdKBjtz+EOsk6EKAYDvgQOi7uTBoM0sHgyii7zzUq9LqywVHirYMKNv4qVD5qrLVgpA52X017U7NNhTxf/fLgXq8WRpftj62fp0JvS3fUKwq1EMXaqURec1/6JqRr4XLz+NrsVCX6mY2TFjTNeW5hY5Qo9Yo6aLxBA5NYOwZRQeXH8TsqNXDb5YT2G+EgYlxzi2+UaaB1ueQLuUKBVp/tb7n3rYb6R4GWETthw6EtUXsNcuR0L69a80wN1c/uOjVky9FH5bf/53lRDQfYdeUIZbj7Z7irIc029LBtqAztGn+lM9lKDdeT10WNt5UhIRv2D+dxQVOmDUmRrM0vrG/TEKhZfw2g9L+tmt3vMQQbdlvzDQsGUC3xC7jV1s5IfdOHxvkP3KxqUUEEa38f0uWvrHOvUsGrOcVbozb2oaJe11kxESoQQntX1VdvkZ/bQkP+pyq4w9rzBsUSv0GheMjTv78Xtcl+bY86pISs8ODMxNhe1KGoFVgmKYFh7e5Fk1tKvno+VQlFm0WfFJm/Qlccv7/e7KyEkZ3p/KPvXqI1Bbv2WrcPwll2ny9Q7NXwHJ/aQZiY7N6Tkv2C5s8ggMyzqETVg/KqmzpvTBkEe/Z6N9I/WZVr0qOAbu216tPFz1G0r/Yzt+MKOOWzztPmv13IVx7cm5qmgCzWv100nxTg3HjnuzXqZ6j1iUd3/RgFOFRE9isupexotcWZ3fIQcr6s5Pmgxy+FIb83+WkBGl83lSgRXJgfHpClqRJUOSSbbf0jBxa2e9KkNPhFVHZc+Qg/PA/2EWCpF0ZqYZiGZSwt+8jXY3zAodUGfSJ74s9ku+hQNZPMqjmJS2NCRaj0+cOpl+eIgOLcwVnIpeJUevpnyJ9P5yns/sQo19qliZEOMrgdEOPdyIjRikFQdjQJgWfcFvHpa7tqGiLl8WDYinUsftpRbLesAOrd0lhReTWDRY/NKOF公司Kx/OX7RZCtFnbZL9rl5DBfa5k/oCpRDHfv8Kasjamz8TSeE/7WOrDwZhVO5YtWLtOCnYB+UfnwCVyCXTyf9HGykEs89XoN4b6n9Uj5GCuV993KXp5ahl8gjx7yIpfMTeL0Kkb0nhFH/4ONGLR88nuc7brVyQPp+0qQEg12/Vc/dPvrK+PzLgaT33vj/b4OwbWrnvO7PfB279H8n6MJXuT0z2BxV0/+Vk/wDUPgmxDwqp/RXEflhM/dNC/AMK6r+dxH/wb+pfHfEv7KD+jyH+h0Ian1ckPnCTxq+IxA/O0vg6kPgCF/8LJP7wnuaH8A6bHzBI86eJ5A+40fxaRvILomn+vSH5B3qan1+S/AQuf1eT/IV/xQdaPCuVg6ix38Ey9Xdwpfluzvr5KbTTevgrqQfg6sWJ1AsE0Ho6鲁JttJ6u07qDQy0HvtJPUIBrddppF7BqJ4hgda7M6l3+DvtB5dIPwBbv27BTQcl5EXujE9WvYRHT5+rmg4qYWdmy+y6uF4w6kewlPar56RfgeCu6lHWehWej37SMrXb8Ge9r+tpP8B1x8/J/0R9tD+GUf6Jyhpf+Xy0Kj/QgbtzdIf4YA2r+PkP4N42h/5+LgQvt/Hen/YKQPEEr1g/N7ANWXx0RfoJDqzwOiP5BO9YnzK6dfaqJfwFB9ayL6BjKqf5zfvKg+2hB9hItUP48S/YQBqq+cn05Q/dUQ/QUjfQZzqt+cn9ZSfW8j+g6Hqf5zdhvxATCUH3YQfoBiyhfWhC9gMeUPbt0VlE/42SyfAMcv5oRfwJ7yTTPhGzhM+Yd7LoLykTXhIzDiK8ynR4HRudDoOuUzPI/年G8eBAZTvAgnfYT/KfwcJ/2E95UOOS7n3zhN+xF9QvlQvsRllD85Dl5B+bSL8Ck+QPmV424J5dtOwrd/rrOR8C/OpHy8mfAxjqP8/IjwM06mfM3NEdy6KsLf2JLy+S3C5ziW8vtRwu84ifL9EsL3+B7l/3zC/9hoPsChdH4oJfMDTqDzxWMyX2B3On98R+YPrKXziTOZT7A9nV/EZH7B3HwTQ+YbzM0/1WT+wWlWBZfqak3xBdY+yz/tHNEjnOHkbIWN5ilsNG/hPwBd+ArB"], {{}, {}, {RGB颜色[1,0,0],LineBox〔{1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, 64, 65, 66, 67, 68, 69, 70, 71, 72, 73, 74, 75, 76, 77, 78, 79, 80, 81, 82, 83, 84, 85, 86, 87, 88, 89, 90, 91, 92, 93, 94, 95, 96, 97, 98, 99, 100, 101, 102, 103, 104, 105, 106, 107, 108, 109, 110, 111, 112, 113, 114, 115, 116, 117, 118, 119, 120, 121, 122, 123, 124, 125, 126, 127, 128, 129, 130, 131, 132, 133, 134, 135, 136, 137, 138, 139, 140, 141, 142, 143, 144, 145, 146, 147, 148, 149, 150, 151, 152, 153, 154, 155, 156, 157, 158, 159, 160, 161, 162, 163, 164, 165, 166, 167, 168, 169, 170, 171, 172, 173, 174, 175, 176, 177, 178, 179, 180, 181, 182, 183, 184, 185, 186, 187, 188, 189, 190, 191, 192, 193, 194, 195, 196, 197, 198, 199, 200, 201, 202, 203, 204, 205, 206, 207, 208, 209, 210, 211, 212, 213, 214, 215, 216}]}}],纵横比->1,轴->真,轴样式->灰度[0.5],尾声->{点大小[0.02],RGB颜色[1,0,0],点框[{0,0}]},帧->真,图像大小->{235.,自动},绘图范围->{{-4,4},{-4,4]},PlotRangeClipping->True,绘图范围填充->{缩放[0.02],缩放[0.02]}],“输出”]},打开]],单元格[CellGroupData[{单元格[BoxData[行框[{“Reduce”,“[”,行框[{行框[{行框[{行框[{“y”,“^”,“2”}],“+”,行框[{“x”,“^”,“2”}],“+”,行框[{“x”,“^”,“3”}]}],“\[Equal]”,“0”}],”,“,”,RowBox[{“{”,行框[{“x”,“,”,“y”}],“}”}],单元格[BoxData[行框[{行框[{行框[{“(”,行框[{“x”,“|”,“y”}],“)”}],行框[{“(”,行框[{行框[{“(”,行框[{行框[{“x”,“\[LessEqual]”,行框[{“-”,“1”}]}],“&”,行框[{“(”,行框[{行框[{“y”,“\[Equal]”,行框[{“-”,方形方框[行框[{行框[{“-”,上标框[“x”,“2”]}],“-”,上标框[“x”,“3”]}]]}]}],“||”,行框[{“y”,“\[Equal]”,方形方框[行框[{行框[{“-”,上标框[“x”,“2”]}],“-”,上标框[“x”,“3”]}]]}]}],“)”}]},“)“}],”)“}],“||”,行框[{“(”,行框[{行框[{“x”,“\[Equal]”,“0”}],“&&”,行框[{“y”,“\[Equal]”,“0”}]}],“)”}]]],“”)“}]}]],”输出“]},打开]],单元格[CellGroupData[{单元格[BoxData[行框[{“Reduce”,“[”,行框[{行框[{行框[{行框[{行框[{“y”,“^”,“2”}],“+”,RowBox[{“x”,“^”,“2”}],“+”,行框[{“x”,“^”,“3”}]}],“\[Equal]”,“0”}],”&&“,行框[{行框[{行框[{“x”,“^”,“2”}],“+”,行框[{“y”,“^”,“2”}]}],“<”,“10”}]],“,”,RowBox[{“{”,RowBox[{“x”,“,”,“y”}],“}”}],“,”,“整数”}],“]”}]],“输入”],单元格[BoxData[行框[{行框[{“(”,行框[{行框[{“x”,“\[相等]”,行框[{“-”,“2”}]}],“&”,行框[{“y”,“\[Equal]”,行框[{“-”,“2”}]}]],“)”}],“||”,行框[{“(”,行框[{行框[{“x”,“\[相等]”,行框[{“-”,“2”}]}],“&”,行框[{“y”,“\[Equal]”,“2”}]},“)”}],“||”,行框[{“(”,行框[{行框[{“x”,“\[相等]”,行框[{“-”,“1”}]}],“&”,行框[{“y”,“\[Equal]”,“0”}]],“)”}],“||”,行框[{“(”,行框[{行框[{“x”,“\[Equal]”,“0”}],“&&”,行框[{“y”,“\[Equal]”,“0”}]}],“)”}]],“输出”]},打开]]},打开]]},打开]]},窗口大小->{640,750},窗口边距->{{108,自动},{自动,44}},FrontEndVersion->“9.0 for Mac OS X x86(32位、64位内核)(3月5日\2013)",样式定义->“Default.nb”](*笔记本内容结束*)(*内部缓存信息*)(*单元格标签大纲单元格标签索引->{}*)(*单元格标签索引单元格标签索引->{}*)(*笔记本文件大纲笔记本[{单元格[CellGroupData[{单元格[579,22,23,0,92,“标题”],单元格[CellGroupData[{单元格[627,26,28,0,44,“小节”],单元格[658,28,54,3,49,“文本”],单元格[715,33,270,8,49,“文本”],单元格[988,43,287,10,49,“文本”],单元格[1278,55,99,2,30,“文本”]},打开]],单元格[CellGroupData[{单元格[1414,62,23,0,80,“部分”],单元格[CellGroupData[{单元格[1462,66,794,23,63,“输入”],单元格[2259,91,4596,82,250,“输出”]},打开]],单元格[CellGroupData[{单元格[6892,178,292,9,28,“输入”],单元格[7187、189、866、29、66,“输出”]},打开]],单元格[CellGroupData[{单元格[809022342814,28,“输入”],单元格[8521、239、605、21、70,“输出”]},打开]]},打开]]},打开]]}]*)(*内部缓存信息结束*)