Wolfram Researchfunctions.wolfram.comOther Wolfram Sites
Search Site
Function CategoriesGraphics GalleryNotationsGeneral IdentitiesAbout This Site Email Comments

View Related Information In
The Documentation Center
MathWorld

Download All Formulas For This Function
Mathematica Notebook
PDF File

 

Developed with Mathematica -- Download a Free Trial Version
 











JacobiSymbol




Mathematica Notation

Traditional Notation









Number Theory Functions > JacobiSymbol[n,m] > Identities > Functional identities





http://functions.wolfram.com/13.08.17.0003.01









  


  








Input Form





JacobiSymbol[n, m] == JacobiSymbol[k, m] /; GCD[n, m] == 1 && GCD[k, m] == 1 && Mod[n, m] == k && Element[(m - 3)/2, Integers] && (m - 3)/2 >= 0








Standard Form





Cell[BoxData[RowBox[List[RowBox[List[RowBox[List["JacobiSymbol", "[", RowBox[List["n", ",", "m"]], "]"]], "\[Equal]", RowBox[List["JacobiSymbol", "[", RowBox[List["k", ",", "m"]], "]"]]]], "/;", RowBox[List[RowBox[List[RowBox[List["GCD", "[", RowBox[List["n", ",", "m"]], "]"]], "\[Equal]", "1"]], "\[And]", RowBox[List[RowBox[List["GCD", "[", RowBox[List["k", ",", "m"]], "]"]], "\[Equal]", "1"]], "\[And]", RowBox[List[RowBox[List["Mod", "[", RowBox[List["n", ",", "m"]], "]"]], "\[Equal]", "k"]], "\[And]", RowBox[List[FractionBox[RowBox[List["m", "-", "3"]], "2"], "\[Element]", "Integers"]], "\[And]", RowBox[List[FractionBox[RowBox[List["m", "-", "3"]], "2"], "\[GreaterEqual]", "0"]]]]]]]]








MathML Form







<math xmlns='http://www.w3.org/1998/Math/MathML' mathematica:form='TraditionalForm' xmlns:mathematica='http://www.wolfram.com/XML/'> <semantics> <mrow> <mrow> <semantics> <mrow> <mo> ( </mo> <mfrac> <mi> n </mi> <mi> m </mi> </mfrac> <mo> ) </mo> </mrow> <annotation encoding='Mathematica'> TagBox[RowBox[List[&quot;(&quot;, FractionBox[&quot;n&quot;, &quot;m&quot;], &quot;)&quot;]], JacobiSymbol, Rule[Editable, False]] </annotation> </semantics> <mo> &#10869; </mo> <semantics> <mrow> <mo> ( </mo> <mfrac> <mi> k </mi> <mi> m </mi> </mfrac> <mo> ) </mo> </mrow> <annotation encoding='Mathematica'> TagBox[RowBox[List[&quot;(&quot;, FractionBox[&quot;k&quot;, &quot;m&quot;], &quot;)&quot;]], JacobiSymbol, Rule[Editable, False]] </annotation> </semantics> </mrow> <mo> /; </mo> <mrow> <mrow> <mrow> <mi> gcd </mi> <mo> &#8289; </mo> <mo> ( </mo> <mrow> <mi> n </mi> <mo> , </mo> <mi> m </mi> </mrow> <mo> ) </mo> </mrow> <mo> &#10869; </mo> <mn> 1 </mn> </mrow> <mo> &#8743; </mo> <mrow> <mrow> <mi> gcd </mi> <mo> &#8289; </mo> <mo> ( </mo> <mrow> <mi> k </mi> <mo> , </mo> <mi> m </mi> </mrow> <mo> ) </mo> </mrow> <mo> &#10869; </mo> <mn> 1 </mn> </mrow> <mo> &#8743; </mo> <mrow> <semantics> <mrow> <mi> n </mi> <mo> &#8290; </mo> <mi> mod </mi> <mo> &#8290; </mo> <mi> m </mi> </mrow> <annotation-xml encoding='MathML-Content'> <apply> <rem /> <ci> $CellContext`n </ci> <ci> FE`Conversion`Private`m </ci> </apply> </annotation-xml> </semantics> <mo> &#10869; </mo> <mi> k </mi> </mrow> <mo> &#8743; </mo> <mrow> <mfrac> <mrow> <mi> m </mi> <mo> - </mo> <mn> 3 </mn> </mrow> <mn> 2 </mn> </mfrac> <mo> &#8712; </mo> <mi> &#8469; </mi> </mrow> </mrow> </mrow> <annotation-xml encoding='MathML-Content'> <apply> <ci> Condition </ci> <apply> <eq /> <apply> <ci> JacobiSymbol </ci> <ci> n </ci> <ci> m </ci> </apply> <apply> <ci> JacobiSymbol </ci> <ci> k </ci> <ci> m </ci> </apply> </apply> <apply> <and /> <apply> <eq /> <apply> <gcd /> <ci> n </ci> <ci> m </ci> </apply> <cn type='integer'> 1 </cn> </apply> <apply> <eq /> <apply> <gcd /> <ci> k </ci> <ci> m </ci> </apply> <cn type='integer'> 1 </cn> </apply> <apply> <eq /> <apply> <rem /> <ci> $CellContext`n </ci> <ci> FE`Conversion`Private`m </ci> </apply> <ci> k </ci> </apply> <apply> <in /> <apply> <times /> <apply> <plus /> <ci> m </ci> <cn type='integer'> -3 </cn> </apply> <apply> <power /> <cn type='integer'> 2 </cn> <cn type='integer'> -1 </cn> </apply> </apply> <ci> &#8469; </ci> </apply> </apply> </apply> </annotation-xml> </semantics> </math>










Rule Form





Cell[BoxData[RowBox[List[RowBox[List["HoldPattern", "[", RowBox[List["JacobiSymbol", "[", RowBox[List["n_", ",", "m_"]], "]"]], "]"]], "\[RuleDelayed]", RowBox[List[RowBox[List["JacobiSymbol", "[", RowBox[List["k", ",", "m"]], "]"]], "/;", RowBox[List[RowBox[List[RowBox[List["GCD", "[", RowBox[List["n", ",", "m"]], "]"]], "\[Equal]", "1"]], "&&", RowBox[List[RowBox[List["GCD", "[", RowBox[List["k", ",", "m"]], "]"]], "\[Equal]", "1"]], "&&", RowBox[List[RowBox[List["Mod", "[", RowBox[List["n", ",", "m"]], "]"]], "\[Equal]", "k"]], "&&", RowBox[List[FractionBox[RowBox[List["m", "-", "3"]], "2"], "\[Element]", "Integers"]], "&&", RowBox[List[FractionBox[RowBox[List["m", "-", "3"]], "2"], "\[GreaterEqual]", "0"]]]]]]]]]]


Date Added to functions.wolfram.com (modification date)





2001-10-29