유한체 위의 정수론과 기하학

수학노트
http://bomber0.myid.net/ (토론)님의 2011년 3월 23일 (수) 17:36 판 (피타고라스님이 이 페이지의 이름을 유한체에서 정수다항식의 분해(코드)로 바꾸었습니다.)
둘러보기로 가기 검색하러 가기
이 항목의 수학노트 원문주소

 

 

개요

 

 

  1. (*choose the range l for the list*)
    l := 50
    (*choose the polynomial to work with*)
    Pol := x^2 - 5
    disc := Discriminant[Pol, x]
    (*choose the modulus*)
    M := 5
    Pr[l_] := Table[Prime[n], {n, 1, l}]
    S := Pr[l]
    (*output*)
    Print["discriminant of polynomial", " ", Pol // TraditionalForm]
    disc
    (*decomposition of the given polynomial modulo p*)
    TableForm[Table[{Mod[p, M], Factor[Pol, Modulus -> p]}, {p, S}],
     TableHeadings -> {S, {"residue class", "decomposition"}},
     TableAlignments -> Center]

 

 

메모

 

 

관련된 항목들

 

 

사전 형태의 자료

 

 

관련논문