QQ登录

只需要一步,快速开始

 注册地址  找回密码
查看: 3722|回复: 7
打印 上一主题 下一主题

一些初等函数:

[复制链接]
字体大小: 正常 放大
lilianjie        

43

主题

4

听众

204

积分

升级  52%

  • TA的每日心情
    开心
    2012-1-13 11:05
  • 签到天数: 15 天

    [LV.4]偶尔看看III

    跳转到指定楼层
    1#
    发表于 2012-1-11 12:30 |只看该作者 |倒序浏览
    |招呼Ta 关注Ta
    :=IntegerRing() ;Z;
    ) H& W2 ?8 K9 @( U' Mn := -1666666666234567890;
    / H) u2 }, \/ V% C3 k> n;/ a" i+ W" u; R: N
    & N8 Y( |, e8 [7 [! ~/ \
    > n:Hex;                           转16
    5 o) v1 n& R4 FIntegerToString(n, 2);        转2
    . b, p( k, q5 |' p8 k7 A% HIntegerToString(n, 10);       转10. i, Y6 {) G' j. d3 O" H' _6 Q- C9 ]
    IntegerToString(n, 16);        转16! @3 T. {* m1 |0 r4 g- n
    IntegerToString(n, 36);         转36
    IntegerToString(n) ;
    ( W( a3 v0 D% G9 R+ n; IIntegerToString(-0x17213080A7E55CD2);转串Zero(Z);4 n5 u, V3 |3 o( g7 _
    Identity(Z);                   ! w3 t6 }/ Q2 ]
    Representative(Z);         环代表元
    $ j9 U% ~- x5 m9 x, L9 y* `Eltseq(n);                        取整
    # S+ ]  b0 |& \' Q$ [Eltseq(-0x17213080A7E55CD2) ;
    Denominator(n);Denominator(12/13);Denominator(222222/111);
    5 T+ U8 @/ f; ^0 ]: s+ v/ l
    9 M6 p( a+ I8 ]5 `$ c6 Z) \" E# Im := elt< Z |  -0x17213080A7E55CD2>;m;         在虚实2次域中进制砖换不变
    - l- o# J6 F' {- u: @' H$ gk := Z ! elt< QuadraticField(3) | -1666666666234567890, 0>;$ w1 r' v, s. K" j
    > k;( C& q4 i1 C, q1 S* Y, B- y. R
    n eq k;
    9 Y1 w5 F: f) c/ i: \& c/ skk := Z ! elt< QuadraticField(3) | -0x17213080A7E55CD2, 0>;/ R0 f8 Y4 H- J- ^! y+ ?6 ?
    > kk;
    4 X1 o# {! `. B0 Hkk eq k;' J6 y5 y7 j2 A3 g" e

    ( g# K4 _4 ?) \9 q  l7 u: jk := Z ! elt< QuadraticField(13) | -1666666666234567890, 0>;& R+ Z' W; y+ I1 {% Z( V
    > k;
    ! b7 F$ T5 d0 Cn eq k;! p6 @6 M8 `/ T2 z* y% F! f: P
    kk := Z ! elt< QuadraticField(13) | -0x17213080A7E55CD2, 0>;
    0 l: a) `" I9 O  K) [> kk;
    + B0 s! a3 x6 n8 `& Tkk eq k;8 W0 y  {$ c# R  y. z5 K) Q
      x# S; P5 [- m3 ]
    Eltseq(kk) ;Eltseq(-1/14);

    $ S) G2 Z  p, v( W
    2 L+ F% s* D9 T6 V6 {2 y9 q5 W7 ]8 a0 \1 v! }. M4 g4 [

    . L" U+ D2 M7 A( G+ k6 {4 v1 U5 d( s2 R9 l$ x
    k := Z ! elt< QuadraticField(-3) | -1666666666234567890, 0>;* z, I! X) J! a7 Z( C  W( b3 T4 ^
    > k;
    * Z" o' Y3 T* i& g7 j: j; g3 v7 R$ yn eq k;4 ?! e8 B* r  m; i/ r) J8 P
    kk := Z ! elt< QuadraticField(-3) | -0x17213080A7E55CD2, 0>;8 e8 z; H% Q% o- Q1 r- b
    > kk;
    % L# E. n% Y* F2 K5 J& jkk eq k;
    7 d5 c8 O3 F$ ~: @, x: T8 y3 y3 j; Z9 ?, f  X) U& [, u
    k := Z ! elt< QuadraticField(-13) | -1666666666234567890, 0>;5 {: W  a- U. R# e* z9 Q
    > k;; v% R; _1 H1 M% {9 z4 e
    n eq k;6 Z8 M" I, ~3 r" Q
    kk := Z ! elt< QuadraticField(-13) | -0x17213080A7E55CD2, 0>;
    2 x6 p+ k( n6 x; p> kk;4 L0 z# @5 m/ |2 ~* i6 y. S/ W# V
    kk eq k;" _! o8 y) j# i. O$ y$ r

    - c0 T, f2 [; E& |4 O$ u8 ?Eltseq(kk) ;Eltseq(-1/14);0 s3 G3 F+ y7 h/ m
    " \+ u4 j7 m9 S0 R* {+ T. L
    - W! o' h; X& E

    ) D: x& W" o! o
    4 O0 V8 o& J# @' E
    % y1 [: {: j9 E* h5 O; f
    3 Q# S  Y3 i4 @& Q' u' ]9 V' v$ A; ~, K

    ( f6 q% Z7 i& w/ V$ e3 C7 y8 W5 h6 C8 w: g6 E( e, m

    ' _1 X  r" }$ _  b" t% u( b=============. t) p3 M/ V9 `+ P' r' T

      [( S5 F# O6 ]$ f, i: x% k1 L
    1 {2 S9 z/ H9 r$ k& F
    % }. x, }1 ?% A( c7 v" P
    8 O& d$ h; N. K: k7 f  BInteger Ring
    . X2 [. U3 W4 e2 X-1666666666234567890' Y' C+ w+ l2 x5 Y; b
    -0x17213080A7E55CD2$ e( u" W" [% a0 H9 T
    -10111001000010011000010000000101001111110010101011100110100104 g  }0 f; l8 C3 m( B5 |6 x
    -16666666662345678909 y' `5 J' W; P9 }5 F; `
    -17213080A7E55CD2
    3 B& G$ w7 U3 c( j* h# g-CNUO0WGPY9CI
    % v8 V* h6 b) P2 r1 L) w7 t-1666666666234567890
    : K+ \9 H; o& s- w( ]; S# w4 o-1666666666234567890
    8 }# W6 K2 Z# g  a5 d0- k( i; Q' ?/ G3 K7 D9 {
    1
    . U0 X4 W& i5 J3 }06 u4 D- n' S3 I; i2 i" `- _
    [ -1666666666234567890 ]; M1 j. |7 d& h$ k0 o$ V1 J: l% p
    [ -1666666666234567890 ]
    2 g; d8 s" L; I  }' o: [1. L8 g6 F3 }3 @" ~: O4 j, u
    13
    7 b' k7 n/ V/ m% k$ H1
    2 r4 C! ?' b  K7 n9 g4 g$ O% x. X# A1 s$ _5 S- r. j
    -1666666666234567890
    ) c  }- t# k; ^6 ctrue
    0 q( @/ ^6 f+ G3 \-1666666666234567890( [6 c! |3 g' J/ n
    true
    + ~7 W! O0 k  D5 K# M3 k  ~- Q-1666666666234567890) y! j/ t! z5 N/ j
    true6 M' F% Y- \$ V
    -1666666666234567890, t% q# P1 ?* w! b
    true9 A3 x8 e0 J- W, Z2 o
    [ -1666666666234567890 ]/ p6 ^! g9 a1 K7 H: `4 O0 l
    [ -1/14 ]5 t" c! ~+ X, ~

    0 S0 G$ Z' q6 w5 o' R4 k; X4 M# b6 W: U  [0 [0 \. U* r& D$ s

    . D) i8 e! I' o; D7 [; A2 Y4 r  ]7 R; e8 _, d

    5 F, Q! T8 t+ ^" W# B+ E5 y; V  Y' E4 R' c+ Q8 f* D0 y! _! o
      J9 d5 c0 G1 ^! U2 p
    -16666666662345678906 u9 t5 U" u( H
    -1666666666234567890
    + w" w" L! }4 ?5 x* ntrue' {. {: Y  S0 ~; w% X% Q8 i4 c% }5 c
    -1666666666234567890
    - j+ r. x5 e: Mtrue6 ?  ^) i& V3 o* }
    -1666666666234567890
    * \+ e: {; h1 }( [: ]9 X7 G, A/ \true
    ; _1 P! S" b9 |6 R1 u8 G-16666666662345678904 ?/ y  a) y" Q7 c' F9 N
    true
    % R# Y) |6 f) y  W# J; P* T[ -1666666666234567890 ], l& j9 G: A7 h) x0 Q4 _4 R9 `+ J. ]  K, d
    [ -1/14 ]
    , ^- u) \+ z5 Z$ [1 {3 g- c+ Y7 M2 y7 J# p7 a" V
    zan
    转播转播0 分享淘帖0 分享分享0 收藏收藏0 支持支持0 反对反对0 微信微信

    74

    主题

    6

    听众

    3304

    积分

    升级  43.47%

  • TA的每日心情
    无聊
    2015-9-4 00:52
  • 签到天数: 374 天

    [LV.9]以坛为家II

    社区QQ达人 邮箱绑定达人 发帖功臣 最具活力勋章

    群组数学建摸协会

    群组Matlab讨论组

    群组小草的客厅

    群组数学建模

    群组LINGO

    回复

    使用道具 举报

    lilianjie        

    43

    主题

    4

    听众

    204

    积分

    升级  52%

  • TA的每日心情
    开心
    2012-1-13 11:05
  • 签到天数: 15 天

    [LV.4]偶尔看看III

    ss:=12345678111;ss;
    / A- g. `- s; d4 |% n- L' Is:=0x12345678111;ss;
    ) N# P2 F1 t6 V! M+ w! h
    0 b/ U. K9 p2 T# N# X, Nsss:=Factorization(ss);sss;
    ) R* p0 e9 ?0 G  s' }' I# Z* s1 b: Msss1:=Factorisation(s);sss1;8 o2 X  c) X+ T+ D: h5 r! {4 j- m
    FactorizationToInteger(sss);
    " J4 B% V  J3 ^7 {, y: T' T# pFactorisationToInteger(sss1) ;
    - k5 I$ W7 e5 H" a6 ~- \Facint(sss1);因子分解和还原
    ssss:=Intseq(ss, 2);ssss;1 h* N' y2 Q0 f7 U% b
    SequenceToInteger(ssss, 2);% v, K) |  U5 V! [% t
    ssss:=Intseq(ss, 17);ssss;5 l) N7 O! @& q" b- a( |) }5 ?
    SequenceToInteger(ssss, 17);
    * N. z- g1 v2 O) v7 H' qssss1:=Intseq(s, 17);ssss1;2 u2 N# I6 Z6 y* b2 _$ V
    SequenceToInteger(ssss1, 17);转成2和17进制

    1 a( F. j" v' ]/ O& ~
    $ x& n; x$ J  n3 y; T12345678111! i3 ~" N# a4 Z& G1 t* D1 c
    12345678111
    , c+ F( @: N( w9 Q6 \+ E7 c[ <3, 1>, <13, 1>, <31, 1>, <1447, 1>, <7057, 1> ]% G. ]  f4 E! X5 v, p
    [ <3, 1>, <83, 1>, <34129, 1>, <147209, 1> ]  U- \3 T& d* x
    12345678111
    4 I+ y: k7 [. A, ~) R# ^$ E1250999894289
    " K7 \7 \* E. }3 V" G$ }1250999894289% n& {1 L4 J+ G
    [ 1, 1, 1, 1, 1, 0, 0, 0, 1, 0, 0, 1, 1, 0, 0, 0, 0, 0, 1, 1, 1, 0, 1, 1, 1, 1,
    + R. _3 w, q$ ]2 ]/ I# r1, 1, 1, 0, 1, 1, 0, 1 ]
    8 R& f& V4 J$ b4 C1 j12345678111# B% y$ |: G% N& C; S6 x
    [ 8, 6, 6, 4, 0, 8, 1, 13, 1 ]
    1 \- V. `& ^) y) T/ B( Y12345678111
    ( Q; s9 v" t* _& f/ I- O0 D9 J5 I[ 14, 6, 7, 11, 9, 15, 11, 5, 9, 10 ]- Y. l5 }- A$ x$ s' [; `0 E
    1250999894289
    回复

    使用道具 举报

    lilianjie        

    43

    主题

    4

    听众

    204

    积分

    升级  52%

  • TA的每日心情
    开心
    2012-1-13 11:05
  • 签到天数: 15 天

    [LV.4]偶尔看看III

    本帖最后由 lilianjie 于 2012-1-11 13:31 编辑 : Z0 k: e" c4 I' ?/ o; ?2 w& Z( D2 t8 C
    7 Z- X% w8 V6 U2 X- ^
    Z:=IntegerRing(5) ;Z;           模5等价类环n := 1666666666234567890;
    ) z; s2 r( b/ v" @# M' X> n;6 {: u2 `6 S* v  r9 t4 Y+ R
    n1:=Z!1111111111111111111111;n1;
    + l: R" B7 g9 c! un2:=Z!11333331111111111111111;n2;
    ( I, |) P& ]3 u0 F: _! \7 _
    + S: t- D" s4 J& |) z+ v! ^" K0 u
    ' u3 W% _: ?% c. E8 ^% YK:=Z!n1+Z!n2;K;
    % b  H) X- G5 ]5 q& H  P9 p7 v9 Q* l* Q2 |% J" Y. f3 W
    IsField(Z);      是域吗Characteristic(Z);环特征% F4 o/ Q3 P" i& S! d; b5 l% ]. \
    IsFinite(Z);有限环吗
    5 X9 L) B2 x5 MIsCommutative(Z);可换吗

    3 h4 ^/ l4 t: u: gIsOrdered(Z);有序吗-------应有不过这函数没有这功能IsEuclideanDomain(Z);欧整环吗------欧环还有非整的。。。。
      b  A  p' `( s2 M9 D5 Z8 `/ bIsPID(Z) ;主理想整环吗
    % ]3 p- u' b- C& j  v3 S3 D, R$ w
    + x; ]/ m% q- }0 [% r# ]IsUFD(Z) ;唯一分解吗% x! n- Q% T6 [. d% u! u, O
    IsDivisionRing(Z) ;除环吗* F1 ?$ g0 K$ q- E7 T
    IsEuclideanRing(Z) ;欧环吗! X8 s7 E3 Y5 m; Y1 |
    IsPrincipalIdealRing(Z) ;主理想整环吗+ y+ }8 V- [" q+ [% o. Q' M
    IsDomain(Z) ;整环吗
    FieldOfFractions(Z);分式域( b% q0 W& q3 M' l/ d, k! v" H" k
    UnitGroup(Z);单位群
    % ^6 q2 \6 b, e# y0 uMultiplicativeGroup(Z);乘群
    $ E7 K( i/ \: r% U
    Category(Z) ;范畴Parent(Z) ;父环$ b) U& B; V* y' L
    PrimeRing(Z);素环单环和本原环不同Center(Z) ;中心3 r) h8 o% x1 [
    AdditiveGroup(Z) ;加群-----就第行一特点ClassGroup(Z) ;类群----------只有Z才有------难懂理想类群更难懂. {* k% t6 N$ J, Y6 B

    : D7 {- L) P; v1 u# JZZ:=IntegerRing() ;ZZ;
    + x2 Z7 ?9 r; t1 Z6 [ClassGroup(ZZ) ;

    ; t1 ?6 L# N8 N3 i, Q: p& m3 f: T! I( ]* @( f- H: T- C$ E
    ===========( H- _; p. G$ @: u
    ' X  Z& a7 A0 C
    Residue class ring of integers modulo 57 B( w9 m: r( \# C
    16666666662345678901 w( k6 a& X! T1 k5 B4 r% [2 U
    1
    7 |8 y) i7 S1 u2 d11 X$ `+ b7 u$ s0 n
    2
    : h- R/ t& E/ C, S6 u5 {true
    2 q/ a  @9 x& c7 ?* }$ c5
    1 T; q- Q8 z# ~& \) Qtrue 5
    ( [) M1 H; _3 M, v9 C+ itrue
    ' O2 |) U% H8 F& r3 Bfalse
    : j3 A- F( z' ?$ `; x* F) x0 s! ctrue" v7 E6 ~' a) Y2 k
    true
    ; y6 o# y! x  N  q5 v/ \true! N' }0 e" I/ O- G9 u) s. R" d6 Z) }( O
    true; @5 J4 z0 m- ?% Q4 a$ i
    true
    % E2 c; V1 G7 z; d0 q- M  }true
    ! \( v! B' h! wtrue
    6 m* |- h8 I! r9 Z8 A$ S2 WResidue class ring of integers modulo 59 l: v+ m% w$ i$ M( K
    Abelian Group isomorphic to Z/4
    " ]/ ^+ M4 f8 P2 |+ @Defined on 1 generator5 R" l5 ]  Z0 E: H: L8 k1 f* W) Q. e
    Relations:
    5 J2 i3 e  U' d. R3 U    4*$.1 = 0" P0 k; j' {* _/ Y0 f, o; {  r, U. @
    Abelian Group isomorphic to Z/4+ Q8 |* u: k- Q5 U- M, H
    Defined on 1 generator) K5 |7 h4 d0 Z  N6 k9 W# x- M6 V& T
    Relations:, B5 o) f' l' W6 i
        4*$.1 = 0
    2 h4 Y% S: P7 L6 Q- XRngIntRes
    $ L% i* s, E! b5 i% R( l& P2 e" DPower Structure of RngIntRes
    * l( ], O6 z3 d5 ^# `" x6 BResidue class ring of integers modulo 5# @! |6 R+ f% A6 _- V2 C
    Residue class ring of integers modulo 5
    2 Q4 v0 P* W9 A  n& J, ~3 S0 lAbelian Group isomorphic to Z/52 p/ i& ^8 `1 O# j9 `8 Q
    Defined on 1 generator. q5 s+ W4 L. c, d2 d
    Relations:7 u) V8 \# @' [& S/ x9 U$ C
        5*$.1 = 0$ }+ ~# D0 C& ?+ c

    2 @% Q; B, y! {; U$ B% `! F>> ClassGroup(Z) ;1 [, c8 r" D4 w! a5 y! V
                 ^  v( F$ e7 l: ?. ~6 H# V8 o8 o- u
    Runtime error in 'ClassGroup': Bad argument types$ N5 k9 g  q; O! T# S% E- i
    Argument types given: RngIntRes
    9 ~& N: O. R/ o, o. N/ `5 @) g2 j+ k  X5 t/ E6 E: [
    Integer Ring
    4 e& `6 ?  F: d1 [Abelian Group of order 1
    回复

    使用道具 举报

    lilianjie        

    43

    主题

    4

    听众

    204

    积分

    升级  52%

  • TA的每日心情
    开心
    2012-1-13 11:05
  • 签到天数: 15 天

    [LV.4]偶尔看看III

    Z:=IntegerRing(12) ;Z;   ! r) q: |# f# t
    UnitGroup(Z);3 X" p) a! S% A/ x0 {
    MultiplicativeGroup(Z);
    3 ]/ `, w6 ?5 _9 TCategory(Z) ;- z$ l1 [( B* D$ O
    PrimeRing(Z);; l( k! l3 o& u
    AdditiveGroup(Z) ;4 C) B' K" S0 ^( C8 u# j) b2 O+ }2 W
    . C7 ^4 v8 U! W6 `$ _
    Z:=IntegerRing(13) ;Z;   
    % F: x4 G0 y; V4 m2 U5 c& f3 B0 ] UnitGroup(Z);
    5 I$ {/ z0 M3 t* |" F! C! eMultiplicativeGroup(Z);
      F4 }) N; @0 F4 r; nCategory(Z) ;' y3 o4 |2 K9 E
    PrimeRing(Z);
    $ p3 E8 q/ [# T5 S# |' g0 `+ oAdditiveGroup(Z) ;" l" L( @  r& r4 {& I( L8 ]
    ; d8 f- s0 q5 U) z5 O/ L4 {

    $ s5 ]* O$ X$ U% t2 n
    9 v5 O* I) l  l+ o! a9 u; @; QResidue class ring of integers modulo 122 n' Y, U! ]& n7 X& D  t( R
    Abelian Group isomorphic to Z/2 + Z/2
    5 w6 |3 O, H( O, `& T; \) d4 FDefined on 2 generators
    ' N/ [" t/ r! W3 S+ ^9 c; W& {) bRelations:
    : n  X% Z7 _: s( n, ^0 Q    2*$.1 = 01 v- A. K5 @; ?# R4 Y+ `1 N& Y
        2*$.2 = 0
    1 s  S. a6 E& hAbelian Group isomorphic to Z/2 + Z/2非素数环的乘群同构两个小群的直积(1*11    5*7)Defined on 2 generators
    " A& O# T  N) H( y+ }& H0 u& sRelations:
        2*$.1 = 0
    3 O- ~* G0 R; f1 A    2*$.2 = 0
    5 \, ?. k0 O6 x7 ~" LRngIntRes1 Z- @6 q* \0 i9 J, u% w
    Residue class ring of integers modulo 12
    ) k" a- e) }, T0 f/ h% C0 Y4 ~( wAbelian Group isomorphic to Z/12
    : [5 }0 u' f( ^* F, l+ FDefined on 1 generator$ v3 ^4 l) g$ Y- p- E+ w
    Relations:4 j0 T' T! X* J# \3 z
        12*$.1 = 0) x. @) P6 c& l6 s2 _
    Residue class ring of integers modulo 13* @' k( F+ k8 Q) o
    Abelian Group isomorphic to Z/12
      U! r* J- |2 x4 u; WDefined on 1 generator+ A& y" ]3 R% d/ L, a, D; {5 Y& R8 H
    Relations:4 v& ?  \# b- J+ i% `  P  X$ V5 P
        12*$.1 = 0
    3 `/ ^6 s: }, a, J! hAbelian Group isomorphic to Z/12     素数环的乘群同构Z13-1=Z12Defined on 1 generator
    - H# Y4 s6 ^) T9 sRelations:
    3 ^* E5 Y0 h0 [; p8 _2 i    12*$.1 = 0: L; k/ p5 g; Q
    RngIntRes3 p  r. P' @5 d- }
    Residue class ring of integers modulo 130 H. `: \/ E3 f9 Q+ |
    Abelian Group isomorphic to Z/13. R' W- ]1 f( Q# ?5 d
    Defined on 1 generator
    $ Q' m% g, k$ ^+ y: K0 X: o1 @; [$ wRelations:# l: r/ b5 r/ x: L2 B* ^
        13*$.1 = 0
    回复

    使用道具 举报

    lilianjie        

    43

    主题

    4

    听众

    204

    积分

    升级  52%

  • TA的每日心情
    开心
    2012-1-13 11:05
  • 签到天数: 15 天

    [LV.4]偶尔看看III

    本帖最后由 lilianjie 于 2012-1-11 14:25 编辑
    ' O7 p4 E  k8 G6 v3 d+ h$ g* E. U* n3 ?
    Z:=IntegerRing() ;Z;   + t( c3 N8 {; T1 j1 D% q2 p0 c- R
    ! K0 c) x' s6 v  F' `& d
    R:=IntegerRing(12) ;R;   
    . j4 v% ?- n! D( u+ P- |S:=IntegerRing(13) ;S;   
    0 q" y1 V% z0 i1 J
    4 J9 g& j. Z8 w0 T: P: E8 t/ n' s- t* H: E# t8 \! c* |
    PrimeRing(R) ;
    $ D0 H# Z; [" ?. G. yCentre(R) ;# D! f  S  [4 ]5 |  B# E
    * t+ p0 H+ l% i5 k# v% f
    Characteristic(R) ;7 y& a% c: J2 [# b, |0 a! U) j7 D
    # R ;阶----元素数6 V: n! e% `& h5 T
    IsPID(R) ;非素数不是整环不是极大理想整环,但都有极大理想公因IsDomain(R) ;+ D! G8 h4 T+ q) v1 d, f6 W+ K
    Has**(R) ;- F  U' r% W- F* f3 G' w2 s6 U
    ! b2 B: c; ^+ ~$ o, J8 l; H
    IsPID(S) ;
    : U& U, N; p% E1 l8 AIsDomain(S) ;5 T. J9 _. W! a0 y' A
    Has**(S) ;
    ' G! u  Z' z/ q3 O( OR eq S ;1 c8 o& `1 [1 e
    R ne S ;- Q% L; S8 `1 ^
    ) k! e. `" _* W" x* \: s( o
    Parent(R!123) arent(S!123) ;
    . P, C$ x, K5 s8 G7 M9 f# [/ lCategory(R!234) ;Category(S!234) ;
    * j9 B- Y6 K/ y+ L: d( d$ y) |3 p8 n# `! m
    a:=Random(R) ;a;b:=Random(S) ;b;7 s5 |+ l+ y/ ~$ t" l. p: O! ]
    Representative(R) ;1 w, b: L2 d+ j
    Representative(S) ;# ~/ ~7 Q4 ^# C
    $ u  j% Q4 O% q( `0 l4 }
    (R!a) in R ;7 Y/ p9 R* H. {! t% f& N) H: R
    (S!b) notin S ;* R2 X+ Y. W: j
    IsUnit(a) ;                是单位吗) @; a0 J1 O( q# O1 h: Y& b
    IsIdempotent(a) ;是幂等元吗
    ! r+ X9 u% u- Q( VIsNilpotent(b) ;是幂零元吗5 e* m" ?8 |, ?6 _8 Q9 c% A
    IsZeroDivisor(a) ;可除零吗& j0 k, l& o. u4 n
    IsIrreducible(Z!b) ; 可约吗
    IsPrime(Z!a) ;- Y9 D, g4 \' ^$ |( k8 N' T1 q6 u1 f/ L
    : q; @$ Z" l7 P9 j) z
    Z!a gt Z!b ;& a4 I, H5 ~$ A' r6 C8 w$ o- r
    Z!a ge Z!b ;
    + l/ ~; P; x. X( k( d8 |7 g! P8 g; w( xZ!a lt Z!b ;
    , [7 {0 x. k( j  yZ!a le Z!b ;只有同类环才可比较元素大小,
    Maximum(Z!a, Z!b) ;
    2 ?+ I3 p# w1 B7 tMinimum(Z) ;1 u/ Q8 J/ \% e5 |( |: V
    / c) v9 J* B: _6 j, V" Y& N
    Maximum(S) ;
    # D7 i, V. m$ aMinimum(Z!a, Z!b) ;
    0 Z, {" ]$ ~3 t- z; S% q* a" c" VMinimum(R) ;
    : d) }8 ]5 k: n6 G3 m# W' f' C$ h
    - ^$ k! Z  x! N) z: [* J
    7 U# c2 \- H+ D6 L8 U; A+ U/ |8 f! i- ]
    Integer Ring
    : e: ~# _: b0 A* hResidue class ring of integers modulo 12
    & B- j6 C  ?+ X- Y1 z+ ]Residue class ring of integers modulo 13
    # |7 M. {; Y" q$ w" }& C4 \, NResidue class ring of integers modulo 12+ _, v  u. n3 I9 I$ p
    Residue class ring of integers modulo 12
    , H3 T2 e) p" Z% w9 m7 T& z129 c- l, }) z+ a9 S0 x" w' U. p7 U
    12
    " A2 |+ k" X9 P1 L& @false" i7 T2 f: y% _5 Q- N- f: I
    false4 A4 [, M1 T3 H" ~0 k% D4 n
    true
    ! k0 N% ^: d% F' M0 h% u- P! ztrue
    + A- P1 k7 y2 P% q4 i" a6 gtrue
    1 }1 g: D1 H. [+ _8 r& jtrue
    / m# @" T1 H# r+ J( V  sfalse7 r8 t( c4 {7 L7 [- B' e* b
    true# @" j* H+ g5 f! s( e) {4 ^' S
    Residue class ring of integers modulo 128 {! \+ p* w3 O1 @, v8 `9 ?
    Residue class ring of integers modulo 13# _' i& ^! ?; z! _4 s
    RngIntResElt
    ) R0 F/ k  V9 u5 r5 V  B! zRngIntResElt
    * t$ k0 {( V5 A9
    2 }! k5 G  Z( z1 C8 @2 c; ]12) ?% V$ z1 `( @  N
    0
    7 f& z( N4 L- `0
    0 G! U5 [' v, p& [" e; h# Vtrue5 p; u5 k8 _& H" V0 Y' t7 Q1 j
    false
    ! m$ G7 C' u/ }/ o  W8 yfalse( v: L8 Y! ^$ \# O& [- g2 L
    true
    : F) \6 Z- E" c$ _6 c0 `0 Ifalse6 X# ]; v1 a- j
    true
    $ X2 t6 }/ Z3 cfalse
    7 P( l7 s+ h9 q" D2 ?false, p' r/ b9 o/ z( j" V
    false
    - h$ X$ \7 I9 K3 P. K" h# dfalse
    9 ?3 z- g) q; [; mtrue
    ) ]8 [+ I1 k* K' i% Strue* p5 M$ j1 C6 l- H) l+ w7 V
    12( Q- I/ x5 ^& a0 o. j
    18 U% c5 e+ w3 O. o1 ]& O' K/ B# [

    4 Q1 e0 s8 _. @+ s>> Maximum(S) ;# h8 H7 Y. X7 M: {
              ^& P, h) o* r$ v. Y. B7 l, u5 r! i
    Runtime error in 'Maximum': Bad argument types0 o2 n% T# d! l6 x
    Argument types given: RngIntRes$ \! ~/ g' d& k3 R! Q

    & T. H* D5 Z  p2 Q9 C+ S( M# y9  Z% c9 {" a3 M2 E5 o/ C( a+ O

    : r6 Y1 Y( i" w4 T>> Minimum(R) ;; O8 C, z# y+ l% l$ q
              ^
    $ L; K5 `( }# l4 u  f8 y* q/ [( pRuntime error in 'Minimum': Bad argument types' F. h# S; U$ y
    Argument types given: RngIntRes
    回复

    使用道具 举报

    15

    主题

    4

    听众

    113

    积分

    升级  6.5%

  • TA的每日心情
    开心
    2012-1-13 11:49
  • 签到天数: 9 天

    [LV.3]偶尔看看II

    本帖最后由 lilianjie1 于 2012-1-11 15:56 编辑 ) y4 l6 O4 T1 W4 q$ G. r
    / ^1 q: s1 y- V3 k! q1 U
    Z:=IntegerRing() ;Z;   9 _- O* e8 Z8 s" @, q' C
    I12:=ideal< Z | 12 >;# N6 n% |) _2 v6 m: O2 I
    I12;
    * ~) V+ E1 V. b' A- T; M, AZZ:=IntegerRing(15) ;ZZ;   ' S* g4 Q' ]/ F) Z. L- D
    IZZ15:=ideal< Z | 15 >;3 N* w, D1 \/ W4 s1 J
    IZZ15;
    6 e5 `5 E0 @8 F( t6 W; J3 SI12 eq IZZ15;! H; i4 J( k" \' ~7 H
    Q1:=quo< Z | 12 >;Q1;
    ' B+ X) B4 h2 vZZZ:=IntegerRing(5) ;ZZ;   
    7 k/ s0 R' W& qIZZZ5:=ideal< Z | 5 >;
    2 E* d# ]  \) S* }9 ~IZZZ5;
    % w% H' g/ B) z! @' o& x* Q
    $ Z. i. V6 m) ZI12 *  IZZ15;            理想和/积/并/交,
    * i" p1 _9 @5 b; z. l! \理想和是理想对应两(可多个)元素加,
    , J) d  {" Z3 ?理想积是两理想(可多个)对应元素积,
    ( |4 r( F9 l, L; e5 z: O4 R理想并就两(可多个)理想元素并,就不一定还是理想,
    8 u2 @2 [0 F& F- N: X理想交是理想(可多个)元素交,理想交一定还是理想,3 ~- `0 l) w: ^5 }& }  P+ \
    ' J1 n# E; E4 e6 h" z$ L+ Z9 z, ]( m, r
    理想积是理想交的真子集,极大理想交是理想------J根
    $ X. Y  g' u$ I7 R7 `
    理想商就理想间同态:是必须能整除
    4 g  @& k+ _+ ~I12 +  IZZ15;( Y4 T* V5 d; l1 i- M" ]
    I12 meet  IZZ15;
    ) j$ `# @, s2 G- O3 h
    4 f4 m  D7 K% B& Z) o5 v8 o; q- NI12 * IZZZ5;( K5 Y0 l* s0 q3 @$ [7 q* Z
    I12 + IZZZ5;" c* Y& V: J+ c2 d$ v
    I12 meet IZZZ5;
    , S2 c+ p3 Y" f# t" nI12 / IZZZ5;
      O! D+ `7 {* T/ [5 f8 o- NIZZZ5/ I12 ;% C1 H  W, Z9 }5 _4 }% c
    Z * IZZZ5;
    / ]2 @5 S5 E  x* ]# vI12 + IZZZ5;
    7 z. Z3 U  B& _0 _" fIZZ15 meet IZZZ5;
    4 o. V, S. m1 j" w3 ~IZZ15 / IZZZ5;
    Z meet IZZZ5;
    * u$ T) r) g( }  ~5 D% aI12 meet IZZZ5;
    - V8 p! `8 Z' h5 |IZZ15 meet IZZZ5;% P% |" F( F( z! M4 [/ `) Y2 v. ^
    IZZ15 / IZZZ5;
    - ~4 l& w" O/ p# A1 {# w8 k7 ?' S
    2 I+ Y1 i4 g0 l/ ~2 q7 `5 dI12  subset  IZZZ5;运算后的各种理想互相是否包含IZZ15  subset   IZZZ5;% B2 J$ W; t1 u! L' A
    IZZ15 subset IZZZ5;. p* T+ x# z5 Q$ g. N
    IZZZ5 subset IZZ15;

    2 n3 D" [& l0 h$ n3 z7 HInteger Ring
    0 B+ A( g# g$ P1 K7 i) B2 U2 c: t- \Ideal of Integer Ring generated by 12, A/ e# m7 o0 e  D. y
    Residue class ring of integers modulo 15) [/ O, B$ t5 z" t( J( s% f( W" k+ Q
    Ideal of Integer Ring generated by 15
    2 p4 d  x6 {5 M2 Vfalse, e1 `- `0 B1 u  f2 w4 Z0 l2 F
    Residue class ring of integers modulo 12" D8 G: ^' L. @  i3 h4 K' R- I
    Residue class ring of integers modulo 159 M6 ]. K2 A8 g4 K5 I2 ?' O8 Q
    Ideal of Integer Ring generated by 5
    0 i. O, d$ L0 X7 j7 W& lIdeal of Integer Ring generated by 180
    $ I) {: i( ]& h3 z8 tIdeal of Integer Ring generated by 3( B' d, V) b: A* G% w8 B7 ]
    Ideal of Integer Ring generated by 60
    , Q9 d8 d- Z( i; c: d$ G) A: s* T( LIdeal of Integer Ring generated by 60% u% v. W& E* s. `0 |4 B4 x
    Integer Ring
    ' J/ d8 V! T6 |7 {* h- @& C$ GIdeal of Integer Ring generated by 608 e# B2 x- Q9 G, L( x1 ]* o6 o

    2 t% @+ @* ?  F0 P9 x/ P>> I12 / IZZZ5;
    & q9 ^6 P. Y+ W  i* D. L       ^
    / P7 ]$ D5 L" p4 VRuntime error in '/': Argument 2 must divide argument 1.1 W, v6 Y9 D8 S( I3 c1 ^7 r
    & T, J0 O& S( g$ }: D7 |# g
    # _/ V: n. K+ Y; Y  d
    >> IZZZ5/ I12 ;
    5 [( E( ?0 d! b9 ]. F% E4 Q        ^% Z& A% W1 r& i6 l" A, [1 y
    Runtime error in '/': Argument 2 must divide argument 1.
    ! B- k/ W" {! P) R$ v
    9 s5 a: D4 R. KIdeal of Integer Ring generated by 56 x* E& k# v# M+ S0 V8 I. J
    Integer Ring! [: T: E9 g0 A2 B
    Ideal of Integer Ring generated by 158 G: V* L6 Q' U  y
    Ideal of Integer Ring generated by 3
    * F# a* z9 K7 G: I$ nMapping from: Ideal of Integer Ring generated by 3 to RngInt: Z
    / T* c4 z3 G8 r8 zIdeal of Integer Ring generated by 55 J2 I& C: T& w5 a1 G4 u
    Ideal of Integer Ring generated by 602 v1 i% S7 D% }1 {
    Ideal of Integer Ring generated by 156 y( S- A5 E  ]1 t; l/ @
    Ideal of Integer Ring generated by 3
    . x) R% V4 t; w# L" E. GMapping from: Ideal of Integer Ring generated by 3 to RngInt: Z" n- y, g* H, W( i2 V: z7 ]: ]" ?) S
    - g6 T/ ^; W) B' S# x1 V
    false
    . v' A7 {5 K0 ]. ]true
    6 g: a. r  z' y: `; O5 o3 jtrue  c  V, |& n) _
    false
    回复

    使用道具 举报

    15

    主题

    4

    听众

    113

    积分

    升级  6.5%

  • TA的每日心情
    开心
    2012-1-13 11:49
  • 签到天数: 9 天

    [LV.3]偶尔看看II

    Z:=IntegerRing() ;Z;   
    & @2 r% k; Q# w( e, DI12:=ideal< Z | 13 >;
    . k8 d; {$ [8 N$ QI12;$ L# L; V* [/ Q$ O* R0 R+ J8 o; H* P
    ZZ:=IntegerRing(60) ;ZZ;   
    ! W  s! ?2 m$ X8 |  V) L6 c& A" PIZZ15:=ideal< ZZ | 31 >;
    2 X& O0 q* I! [5 i- `0 u& v1 @IZZ15;1 Y; s' b/ U* G2 o' O3 c: J
    ResidueClassField(I12);  P% S5 S; \0 ~; X
    ResidueClassField(IZZ15);环和极大理想的商构成域---剩余类域,剩余类环中的素数都是极大理想

    ; D3 w+ ?& U  ]3 A. A" P9 q) n+ dloc< Z | 19> ;
    7 `% o, ?$ J. S" ]6 M+ g- ^" bloc< Z | 17> ;9 ]3 I! C0 P5 R( y
    loc< Z | 131> ;局部化:一个素理想到原环元素的映射
    . c/ E$ u7 u& b1 ~. N
    ext< Z | > ;超越扩张到一元多项式, V7 E& D! d2 P# x+ `# D7 c  Z; o
    ext< ZZ | > ;; e0 t6 Y: o) S/ E' ~8 s2 D$ g$ F( x
    + N5 e$ b( O7 L* l  X) v
    ext< Z, 2 | > ;超越扩张到多元多项式
    : y2 [, k  Z* j! ]
    7 d8 h3 L! F2 X: aext< Z, 3 | >
    Completion(Z, I12) ;
    1 v0 P3 f. l7 b5 W- I, X) r
    + _- o$ E" Z; H3 a; O* k
    ; ?" M( ~5 Q# xcomp<Z |I12  >;9 a  E5 p% F  E% \/ {: k0 l
        素理想零理想完备化,和P进环联系起来
    * A2 R, ?# k3 H, lCompletion(Z, 0) ;
    ! ?- }% [" n" U$ Qcomp<Z |0  >;4 e: n1 M0 I, P$ D( n) N

    4 ~3 q) _: e" ]' P) a% u5 nInteger Ring
    9 k# T, ^$ n: k1 {* V3 OIdeal of Integer Ring generated by 13# `. L9 ?# y: W
    Residue class ring of integers modulo 601 y& E  J" E( n# f5 ~: L1 `
    Residue class ring of integers modulo 607 u/ X; w9 J) H: W' ?2 @3 q
    Finite field of size 13/ D% i0 ?4 b  ^8 r
    Mapping from: RngInt: Z to GF(13)( N. K4 b) \5 Y! [
    modulo 13 3 N$ C/ _& y* k& T$ }1 [
    8 Z) l8 L( O' Z+ y8 @; s2 p! u: U
    >> ResidueClassField(IZZ15);9 ^* L" i2 ?& m" r) Z0 p- z
                        ^. _& P" |+ e( R) {$ s9 @! x9 M
    Runtime error in 'ResidueClassField': Bad argument types: a; q( Y0 s9 f3 q2 g3 K8 i
    Argument types given: RngIntRes
    ' R- H% M5 G7 |8 o! ^3 G' n* O4 C1 \1 |; [9 ~
    Valuation ring of Rational Field with generator 19& S$ c& N8 ?3 \
    Mapping from: RngInt: Z to Valuation ring of Rational Field with generator 19: ]; {/ ]# p4 d  k4 ~3 k
    Valuation ring of Rational Field with generator 17
    3 k7 m  Z# c; X+ {  @$ NMapping from: RngInt: Z to Valuation ring of Rational Field with generator 17
    3 k9 O( O4 m: F# iValuation ring of Rational Field with generator 131
    - Z' d: g9 U; L" RMapping from: RngInt: Z to Valuation ring of Rational Field with generator 131( S9 p. W+ D5 w0 r8 ]* t
    Univariate Polynomial Ring over Integer Ring
    , m1 V  ]1 L" \1 P3 Y5 QUnivariate Polynomial Ring over IntegerRing(60)' l% F- e4 g7 ]7 M2 k

      F; g" F1 ~4 S9 `5 @; O>> ext< Z, 2 | > ;$ \! @' i% z7 L* m) Y) b1 F
          ^
    4 t. |7 D; A. ~1 G; K) PRuntime error: This constructer is no longer supported" b( z1 q: D3 q9 p) D
    : a8 m7 N9 R6 c
      I7 U, c5 h( E0 n+ {: u  N6 ]5 ]
    >> ext< Z, 3 | >, Q9 ?) l5 s9 ]4 L8 G
          ^
    % D2 M- q5 Z. {- [: N# ORuntime error: This constructer is no longer supported
    + E  ~9 y( ?" {) M5 g1 i
    " j9 s/ R# i% D0 n; s& \* m13-adic ring8 A. Z4 s$ X7 ^6 Z
    Mapping from: RngInt: Z to pAdicRing(13), x% H" \' I+ F' u; {
    , C! J3 I$ b4 w
    Completion(
    & d# J) ^' w) Y1 @7 u, l    Z: Integer Ring,
    ( _8 m2 |% a1 ^! ]+ m+ t& ^    P: Ideal of Integer Ring generated by 05 j& D" k1 }# C/ X6 O4 J% s+ Z
    回复

    使用道具 举报

    您需要登录后才可以回帖 登录 | 注册地址

    qq
    收缩
    • 电话咨询

    • 04714969085
    fastpost

    关于我们| 联系我们| 诚征英才| 对外合作| 产品服务| QQ

    手机版|Archiver| |繁體中文 手机客户端  

    蒙公网安备 15010502000194号

    Powered by Discuz! X2.5   © 2001-2013 数学建模网-数学中国 ( 蒙ICP备14002410号-3 蒙BBS备-0002号 )     论坛法律顾问:王兆丰

    GMT+8, 2026-9-13 15:30 , Processed in 0.338261 second(s), 86 queries .

    回顶部