（*内容类型：application/vnd.wolfram.mathematica*）（***Wolfram笔记本文件***）(* http://www.wolfram.com/nb *)（*CreatedBy='Mathematica 9.0'*）（*CacheID:234*）（*内部缓存信息：笔记本文件断线测试笔记本文件断线测试笔记本数据位置[157，7]笔记本数据长度[7132，291]笔记本选项位置[5833，238]笔记本大纲位置[6816254]单元格标签索引位置[6143，251]窗口框架->正常*）（*笔记本内容开头*）笔记本[{单元格[CellGroupData[{单元格[“第二个Brocard点”，“标题”]，单元格[CellGroupData[{单元格[“作者”，“小节”]，单元格[“\<\埃里克·韦斯特因2003年2月16日\\>“，”文本“]，单元格[TextData[{“此笔记本下载自”，按钮框[“http://mathworld.wolfram.com/notebooks/PlaneGeometry/\SecondBrocardPoint.nb“，BaseStyle->“超链接”，按钮数据：>{URL[“http://mathworld.wolfram.com/notebooks/PlaneGeometry/\SecondBrocardPoint.nb“]，无}]，"."}]，“文本”]，单元格[TextData[{“有关更多信息，请参阅埃里克的”，StyleBox[“数学世界”，字体倾斜->“斜体”]，“条目”，按钮框[“http://mathworld.wolfram.com/SecondBrocardPoint.html",BaseStyle->“超链接”，按钮数据：>{URL[“http://mathworld.wolfram.com/SecondBrocardPoint.html“]，无}]，"."}]，“文本”]，单元格[“\<\\[版权所有]2005 Wolfram Research，Inc.，除非另有说明\\>“，”文本“]}，打开]]，单元格[CellGroupData[{单元格[“初始化”，“子节”]，单元格[BoxData[行框[{行框[{“<<”，“PlaneGeometry`”}]，“；”}]]，“输入”，初始化单元格->True]}，打开]]，单元格[CellGroupData[{单元格[“距离”，“部分”]，单元格[CellGroupData[{单元格[TextData[Cell[BoxData[表单框[行框[{订阅框[“A”，“1”]，行框[{“\[资本Omega]”，“'”}]}]，传统格式]]]，“子节”]，单元格[CellGroupData[{单元格[BoxData[行框[{“完全简化”，“[”，行框[{行框[{“距离”，“[”，行框[{行框[{“Trilinears”，“[”，行框[{“BrocardPoint”，“[”，“2”，“]”}]，“]“}]，”，“，”，行框[{“{”，行框[{“1”，“，”，“0”，“，行框[{行框[{“a”，“>”，“0”}]，“&&”，行框[{“b”，“>”，“0”}]，“&&”，行框[{“c”，“>”，“0”}]}]，“]”}]]，“输入”]，单元格[BoxData[分数框[行框[{“b”，“”，上标框[“c”，“2”]}]，方形方框[行框[{行框[{上标框[“b”，“2”]，“”，上标框[“c”，“2”]}]，“+”，行框[{上标框[“a”，“2”]，“”，行框[{“（”，行框[{上标框[“b”，“2”]，“+”，上标框[“c”，“2”]}]，“）”}]}]]]]，“输出”]}，打开]]，单元格[CellGroupData[{单元格[BoxData[行框[{“完全简化”，“[”，行框[{行框[{“距离三行线”，“[”，行框[{行框[{“Sin”，“[”，行框[{“BrocardAngle”，“[”，行框[{“{”，行框[{“a”，“，”，“b”，“，行框[{“b”，“/”，行框[{“Sin”，“[”，“A”，“]”}]}]，“]“}]，”，“，”，行框[{行框[{“a”，“>”，“0”}]，“&&”，行框[{“b”，“>”，“0”}]，“&&”，行框[{“c”，“>”，“0”}]}]，“]”}]]，“输入”]，单元格[BoxData[分数框[行框[{上标框[“b”，“2”]，“”，“c”}]，方形方框[行框[{行框[{上标框[“b”，“2”]，“”，上标框[“c”，“2”]}]，“+”，行框[{上标框[“a”，“2”]，“”，行框[{“（”，行框[{上标框[“b”，“2”]，“+”，上标框[“c”，“2”]}]，“）”}]}]]]]，“输出”]}，打开]]}，打开]]，单元格[CellGroupData[{单元格[BoxData[表单框[行框[{订阅框[“A”，“2”]，行框[{行框[{“\[资本Omega]”，“'”}]，“/”，订阅框[“A”，“3”]}]，行框[{“\[资本Omega]”，“'”}]}]，传统格式]]，“子节”]，单元格[CellGroupData[{单元格[BoxData[行框[{“完全简化”，“[”，行框[{FractionBox（分数框）[行框[{“距离”，“[”，行框[{行框[{“Trilinears”，“[”，行框[{“BrocardPoint”，“[”，“2”，“]”}]，“]“}]，”，“，”，行框[{“{”，行框[{“0”、“、”、“1”、“，”、“0”}]、“}”}]]、“]”}]，行框[{“距离”，“[”，行框[{行框[{“Trilinears”，“[”，行框[{“BrocardPoint”，“[”，“2”，“]”}]，“]“}]，”，“，”，行框[{“{”，行框[{“0”，“，”，“0”，行框[{行框[{“a”，“>”，“0”}]，“&&”，行框[{“b”，“>”，“0”}]，“&&”，行框[{“c”，“>”，“0”}]}]，“]”}]]，“输入”]，单元格[BoxData[分数框[行框[{“a”，“”，“c”}]，上标框[“b”，“2”]]，“输出”]}，打开]]，单元格[CellGroupData[{单元格[BoxData[行框[{“With”，“[”，行框[{行框[{“{”，行框[{“\[Omega]”，“=”，行框[{“BrocardAngle”，“[”，RowBox[｛“｛”，行框[{“a”，“，”，“b”，“，“\[IndentingNewLine]”，行框[{行框[{行框[{“完全简化”，“[”，行框[{行框[{“TrigExpand”，“[”，行框[{“距离三行线”，“[”，行框[{行框[{“Sin”，“[”，行框[{“#”，“-”，“\[Omega]”}]，“]”}，“/”，行框[{“Sin”，“[”，“\[Omega]”，“]”}]}]，“]“}]，”]“}]，“，”，行框[{行框[{“a”，“>”，“0”}]，“&&”，行框[{“b”，“>”，“0”}]，“&&”，行框[{“c”，“>”，“0”}]}]，“]”}]，行框[{“{”，行框[{“A”、“、”、“B”、“，”、“C”}]、“}”}]}]，“\[终止新行]”，“]”}]]，“输入”]，单元格[BoxData[行框[{“{”，行框[{分数框[上标框[“a”，“2”]，行框[{“b”，“”，“c”}]，“，”，分数框[上标框[“b”，“2”]，行框[{“a”，“”，“c”}]，“，”，分数框[上标框[“c”，“2”]，行框[{“a”，“”，“b”}]}]，“}”}]]，“输出”]}，打开]]}，打开]]}，打开]]}，打开]]},窗口大小->{740，867}，窗口边距->{{60，自动}，{88，自动}}，FrontEndVersion->“9.0 for Mac OS X x86（32位、64位内核）（3月5日\2013)",样式定义->“Default.nb”]（*笔记本内容结束*）（*内部缓存信息*）（*单元格标签大纲单元格标记索引->｛｝*)（*单元格标签索引单元格标签索引->{}*)（*笔记本文件大纲笔记本[{单元格[CellGroupData[{单元格[579，22，37，0，92，“标题”]，单元格[CellGroupData[{单元格[641，26，28，0，44，“小节”]，单元格[672，28，59，3，49，“文本”]，单元格[734，33，297，9，49，“文本”]，单元格[1034，44，311，10，49，“文本”]，单元格[1348，56，99，2，30，“文本”]}，打开]]，单元格[CellGroupData[{单元格[1484，63，36，0，44，“小节”]，单元格[1523，65，103，3，28，“输入”，初始化单元格->True]}，打开]]，单元格[CellGroupData[{单元格[1663，73，28，0，80，“节”]，单元格[CellGroupData[{单元格[1716，77，150，4，44，“小节”]，单元格[CellGroupData[{单元格[1891，85，406，12，46，“输入”]，单元格[2300,99,374,14,61，“输出”]}，打开]]，单元格[CellGroupData[{单元格[2711，118，468，14，46，“输入”]，单元格[318213437414,61，“输出”]}，打开]]}，打开]]，单元格[CellGroupData[{单元格[3605，154，221，7，44，“小节”]，单元格[CellGroupData[{单元格[3851，165，647，19，81，“输入”]，单元格[4501、186、95、3、45，“输出”]}，打开]]，单元格[CellGroupData[{单元格[4633，194，843，25，80，“输入”]，单元格[5479，221，302，11，50，“输出”]}，打开]]}，打开]]}，打开]]}，打开]]}]*)（*内部缓存信息结束*）