o *ήc @sdZddlmZddlmZddlmZddlmZddl m Z ddl m Z dd l mZmZmZdd lmZd d ZdddZddZe dddZd S)z,Computing integral bases for number fields. )Poly)AlgebraicField)ZZ)QQ)CoercionFailed)public)ModuleEndomorphismModuleHomomorphism PowerBasis) extract_fundamental_discriminantcCs|j}t||d}|\}}|dksJtd||d}|D]\}}||9}q||} t|td} t| td} | | ||} t| |d} | }|| fD]}||}qK||}|}||fS)zz Apply the "Dedekind criterion" to test whether the order needs to be enlarged relative to a given prime *p*. modulusrdomain)genr factor_listrgcddegree)TpxT_barlcflg_barti_bar_h_barghff_barZ_barbU_barmr'E/tmp/pip-target-vg8gfxp4/lib/python/sympy/polys/numberfields/basis.py_apply_Dedekind_criterion s$          r)NcsH|j}dur||kr|9|ks t|fdd}|j|dS)a Compute the nilradical mod *p* for a given order *H*, and prime *p*. Explanation =========== This is the ideal $I$ in $H/pH$ consisting of all elements some positive power of which is zero in this quotient ring, i.e. is a multiple of *p*. Parameters ========== H : :py:class:`~.Submodule` The given order. p : int The rational prime. q : int, optional If known, the smallest power of *p* that is $>=$ the dimension of *H*. If not provided, we compute it here. Returns ======= :py:class:`~.Module` representing the nilradical mod *p* in *H*. References ========== .. [1] Cohen, H. *A Course in Computational Algebraic Number Theory*. (See Lemma 6.1.6.) Ncs|SNr'rqr'r(Lsz"nilradical_mod_p..r )nr kernel)Hrr-r/phir'r,r(nilradical_mod_p&s! r3c st|||d}|jj|j|j|jd}|||}|t|fdd}|j|d}|jj|j|j|j|d}||} | |fS)zD Perform the second enlargement in the Round Two algorithm. r,)denomcs |Sr*)inner_endomorphismr+Er'r(r.Xs z%_second_enlargement..r )r3parentsubmodule_from_matrixmatrixr4endomorphism_ringr r0) r1rr-IpBCr2gammaGH1r'r6r(_second_enlargementPs  rBcCsd}t|tr||j}}|jtkr&zt|td}Wn ty%Ynw|j r4|j r4|j r4|jtks8t d| }|}tt|}t|\}}t|pQ|}|} d} |r|\} } t|| \} }|dkrmqY|t| td}| j|| | |d} | |krqY| }||kr|| 9}||kst| | |\}} || kr|} t| | |\}} || ks|s[| durt|tr| || <| }d|_d|_||jd|jd|}||fS)a Zassenhaus's "Round 2" algorithm. Explanation =========== Carry out Zassenhaus's "Round 2" algorithm on a monic irreducible polynomial *T* over :ref:`ZZ`. This computes an integral basis and the discriminant for the field $K = \mathbb{Q}[x]/(T(x))$. Alternatively, you may pass an :py:class:`~.AlgebraicField` instance, in place of the polynomial *T*, in which case the algorithm is applied to the minimal polynomial for the field's primitive element. Ordinarily this function need not be called directly, as one can instead access the :py:meth:`~.AlgebraicField.maximal_order`, :py:meth:`~.AlgebraicField.integral_basis`, and :py:meth:`~.AlgebraicField.discriminant` methods of an :py:class:`~.AlgebraicField`. Examples ======== Working through an AlgebraicField: >>> from sympy import Poly, QQ >>> from sympy.abc import x >>> T = Poly(x ** 3 + x ** 2 - 2 * x + 8) >>> K = QQ.alg_field_from_poly(T, "theta") >>> print(K.maximal_order()) Submodule[[2, 0, 0], [0, 2, 0], [0, 1, 1]]/2 >>> print(K.discriminant()) -503 >>> print(K.integral_basis(fmt='sympy')) [1, theta, theta/2 + theta**2/2] Calling directly: >>> from sympy import Poly >>> from sympy.abc import x >>> from sympy.polys.numberfields.basis import round_two >>> T = Poly(x ** 3 + x ** 2 - 2 * x + 8) >>> print(round_two(T)) (Submodule[[2, 0, 0], [0, 2, 0], [0, 1, 1]]/2, -503) The nilradicals mod $p$ that are sometimes computed during the Round Two algorithm may be useful in further calculations. Pass a dictionary under `radicals` to receive these: >>> T = Poly(x**3 + 3*x**2 + 5) >>> rad = {} >>> ZK, dK = round_two(T, radicals=rad) >>> print(rad) {3: Submodule[[-1, 1, 0], [-1, 0, 1]]} Parameters ========== T : :py:class:`~.Poly`, :py:class:`~.AlgebraicField` Either (1) the irreducible monic polynomial over :ref:`ZZ` defining the number field, or (2) an :py:class:`~.AlgebraicField` representing the number field itself. radicals : dict, optional This is a way for any $p$-radicals (if computed) to be returned by reference. If desired, pass an empty dictionary. If the algorithm reaches the point where it computes the nilradical mod $p$ of the ring of integers $Z_K$, then an $\mathbb{F}_p$-basis for this ideal will be stored in this dictionary under the key ``p``. This can be useful for other algorithms, such as prime decomposition. Returns ======= Pair ``(ZK, dK)``, where: ``ZK`` is a :py:class:`~sympy.polys.numberfields.modules.Submodule` representing the maximal order. ``dK`` is the discriminant of the field $K = \mathbb{Q}[x]/(T(x))$. See Also ======== .AlgebraicField.maximal_order .AlgebraicField.integral_basis .AlgebraicField.discriminant References ========== .. [1] Cohen, H. *A Course in Computational Algebraic Number Theory.* NrzCRound 2 requires a monic irreducible univariate polynomial over ZZ.r) hnf_modulusT) isinstancerextminpoly_of_elementrrrrr is_univariateis_irreducibleis_monic ValueErrorr discriminant from_sympyabsr r whole_submodulepopitemr)element_from_polyaddrBdict_starts_with_unity_is_sq_maxrank_HNFr:detr4)rradicalsKr/D D_modulusrFZthetar1nilradrer%r&Ur-rAZKdKr'r'r( round_two_sd`        rbr*)__doc__sympy.polys.polytoolsr"sympy.polys.domains.algebraicfieldrsympy.polys.domains.integerringr!sympy.polys.domains.rationalfieldrsympy.polys.polyerrorsrsympy.utilities.decoratorrmodulesr r r utilitiesr r)r3rBrbr'r'r'r(s        *