  
| 
 | 
  
  | 
  
  | 
  
  | 
 
  
  | 
 
  
  | 
  
  | 
 
 
  
  | 
  
  | 
  
  | 
 
  
  | 
 
  
  | 
  
  | 
 
 
  
  | 
  
  | 
  
  | 
 
  
  | 
 
  
  | 
  
  | 
 
 
  
  | 
  
  | 
  
  | 
 
  
  
 |  
  
  | 
  
  | 
  
  | 
 
  
  | 
 
  | 
  
  | 
 
  
  | 
  
  | 
  
  | 
 
  
  | 
 
  | 
   http://functions.wolfram.com/01.11.03.0015.01
   |   
  | 
  
  | 
 
  
  | 
  
  | 
  
  | 
 
  
  
 |  
 | 
  
  | 
 
  
  
 |  
  
  | 
  
  | 
  
  | 
 
  
  | 
    
  | 
  
  | 
 
  
  | 
  
  | 
  
  | 
 
  
  | 
 
  | 
    Sec[Pi/7] == Root[8 - 4 #1 - 4 #1^2 + #1^3 & , 2] 
   |   
  | 
  
  | 
 
  
  | 
  
  | 
  
  | 
 
  
  
 |  
  
  | 
  
  | 
  
  | 
 
  
  | 
    
  | 
  
  | 
 
  
  | 
  
  | 
  
  | 
 
  
  | 
 
  | 
   Cell[BoxData[RowBox[List[RowBox[List["Sec", "[", FractionBox["\[Pi]", "7"], "]"]], "\[Equal]", RowBox[List["Root", "[", RowBox[List[RowBox[List[RowBox[List["8", "-", RowBox[List["4", " ", "#1"]], "-", RowBox[List["4", " ", SuperscriptBox["#1", "2"]]], "+", SuperscriptBox["#1", "3"]]], "&"]], ",", "2"]], "]"]]]]]] 
   |   
  | 
  
  | 
 
  
  | 
  
  | 
  
  | 
 
  
  
 |  
  
  | 
  
  | 
  
  | 
 
  
  | 
    
  | 
  
  | 
 
  
  | 
  
  | 
  
  | 
 
  
  | 
 
  
  | 
  
  | 
 
  
  | 
 
  | 
   
   <math xmlns='http://www.w3.org/1998/Math/MathML' mathematica:form='TraditionalForm' xmlns:mathematica='http://www.wolfram.com/XML/'>  <semantics>  <mrow>  <mrow>  <mi> sec </mi>  <mo> ⁡ </mo>  <mo> ( </mo>  <mfrac>  <mi> π </mi>  <mn> 7 </mn>  </mfrac>  <mo> ) </mo>  </mrow>  <mo> ⩵ </mo>  <msubsup>  <mrow>  <mo> ( </mo>  <mrow>  <mi> z </mi>  <mo> ; </mo>  <mrow>  <msup>  <mi> z </mi>  <mn> 3 </mn>  </msup>  <mo> - </mo>  <mrow>  <mn> 4 </mn>  <mo> ⁢ </mo>  <msup>  <mi> z </mi>  <mn> 2 </mn>  </msup>  </mrow>  <mo> - </mo>  <mrow>  <mn> 4 </mn>  <mo> ⁢ </mo>  <mi> z </mi>  </mrow>  <mo> + </mo>  <mn> 8 </mn>  </mrow>  </mrow>  <mo> ) </mo>  </mrow>  <mn> 2 </mn>  <mrow>  <mo> - </mo>  <mn> 1 </mn>  </mrow>  </msubsup>  </mrow>  <annotation-xml encoding='MathML-Content'>  <apply>  <eq />  <apply>  <sec />  <apply>  <times />  <pi />  <apply>  <power />  <cn type='integer'> 7 </cn>  <cn type='integer'> -1 </cn>  </apply>  </apply>  </apply>  <apply>  <power />  <apply>  <ci> Subscript </ci>  <apply>  <ci> CompoundExpression </ci>  <ci> z </ci>  <apply>  <plus />  <apply>  <power />  <ci> z </ci>  <cn type='integer'> 3 </cn>  </apply>  <apply>  <times />  <cn type='integer'> -1 </cn>  <apply>  <times />  <cn type='integer'> 4 </cn>  <apply>  <power />  <ci> z </ci>  <cn type='integer'> 2 </cn>  </apply>  </apply>  </apply>  <apply>  <times />  <cn type='integer'> -1 </cn>  <apply>  <times />  <cn type='integer'> 4 </cn>  <ci> z </ci>  </apply>  </apply>  <cn type='integer'> 8 </cn>  </apply>  </apply>  <cn type='integer'> 2 </cn>  </apply>  <cn type='integer'> -1 </cn>  </apply>  </apply>  </annotation-xml>  </semantics>  </math> 
   
   |   
  | 
  
  | 
 
  
  | 
  
  | 
  
  | 
 
 
  |   
  |  
  |  
  |   
  |  |  
  |   
  |  
  |  
  |   
  | Cell[BoxData[RowBox[List[RowBox[List["HoldPattern", "[", RowBox[List["Sec", "[", FractionBox["\[Pi]", "7"], "]"]], "]"]], "\[RuleDelayed]", RowBox[List["Root", "[", RowBox[List[RowBox[List[RowBox[List["8", "-", RowBox[List["4", " ", "#1"]], "-", RowBox[List["4", " ", SuperscriptBox["#1", "2"]]], "+", SuperscriptBox["#1", "3"]]], "&"]], ",", "2"]], "]"]]]]]]  |  
  |  
  |   
  |  
  |  
  | 
  
  
 |  
  
  | 
  
  | 
  
  | 
 
  
  | 
 
  | 
   Date Added to functions.wolfram.com (modification date)
   |   
  | 
  
  | 
 
  
  | 
  
  | 
  
  | 
 
  
  | 
 
  
  | 
  
  | 
 
  
  | 
  
  | 
  
  | 
 
 | 
  | 
  
  
  
 |  
 
 |