QQ登录

只需要一步,快速开始

 注册地址  找回密码
查看: 3630|回复: 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;+ W  h6 K, u) |8 ~$ V
    n := -1666666666234567890;
    9 s! ^4 a6 }9 b. W> n;
    " s/ H# }# W3 J$ j; W
    9 g: Y  W' |. ^% B9 i1 |' B& g6 V> n:Hex;                           转16; [5 U5 J9 K- ^( K) ^0 O) \
    IntegerToString(n, 2);        转2
    / ]( X% L: ~, U) tIntegerToString(n, 10);       转10
    0 B! Z5 d% B8 c5 J0 v" WIntegerToString(n, 16);        转16
    0 q3 Q& A  ?3 ~IntegerToString(n, 36);         转36
    IntegerToString(n) ;
      W& i- w7 n7 _3 RIntegerToString(-0x17213080A7E55CD2);转串Zero(Z);+ Y3 z* a  C! }  e
    Identity(Z);                   ' I6 v. _( D# X& W
    Representative(Z);         环代表元* G; A* S, _% w" g, I
    Eltseq(n);                        取整% d8 w9 v1 q0 A. m1 t% d
    Eltseq(-0x17213080A7E55CD2) ;
    Denominator(n);Denominator(12/13);Denominator(222222/111);
    4 [; U9 E' H" G* }! L$ S! @
    7 P6 A0 F% b; c7 S/ h% lm := elt< Z |  -0x17213080A7E55CD2>;m;         在虚实2次域中进制砖换不变+ a  w" U6 p9 C' w  b8 H9 m$ H
    k := Z ! elt< QuadraticField(3) | -1666666666234567890, 0>;
    5 ~( ^# p' g: N  ^/ B8 O/ y# p> k;
    ) S; c7 O9 s" o3 o! y. D2 d4 sn eq k;
    0 @& P' k, |% L- Dkk := Z ! elt< QuadraticField(3) | -0x17213080A7E55CD2, 0>;6 P3 Z' `1 ~1 S7 A
    > kk;
    $ T2 H5 d/ G* f- _kk eq k;
    5 W$ v" F( q! \) g8 c6 L+ b3 k( m, _" K
    k := Z ! elt< QuadraticField(13) | -1666666666234567890, 0>;
    ! O" C4 n  |3 u' w> k;
    1 F! W( P! H5 b) n* R- b/ an eq k;
    ! \/ t! T6 _; G( E/ hkk := Z ! elt< QuadraticField(13) | -0x17213080A7E55CD2, 0>;7 h3 x. G$ z8 ?5 {( R
    > kk;* Z0 H' d  I% _/ ~: z3 k
    kk eq k;# d7 X# _, U- S6 J* L

    , O; n  r; _7 d' }* [; D- `8 uEltseq(kk) ;Eltseq(-1/14);
      ?9 t# M! {' z$ _

    4 [1 q: v/ N1 c7 [! f7 k" z6 ?" w; g& `: y

    ; w: J# }$ m* l
    % {" B' n/ R* f% A3 v, ?1 H. D5 xk := Z ! elt< QuadraticField(-3) | -1666666666234567890, 0>;; d  n3 J  Z, x/ I# g
    > k;5 G$ r! n2 W" }7 u/ i
    n eq k;) w5 O- D4 x9 `" U; ]
    kk := Z ! elt< QuadraticField(-3) | -0x17213080A7E55CD2, 0>;
    2 I& ?: S. k0 C3 H) X, `> kk;
    / k$ Y6 g# }! |" O! t$ gkk eq k;: `9 Y1 [* D. l$ Q. u
    % o3 h- ~$ @, W$ `. _% i
    k := Z ! elt< QuadraticField(-13) | -1666666666234567890, 0>;9 G9 Y. \+ `% e' y% b/ X& N
    > k;
    0 ^0 u! a( V, u+ u, H8 ^n eq k;
    $ N7 L) J; \2 S2 y. M: Bkk := Z ! elt< QuadraticField(-13) | -0x17213080A7E55CD2, 0>;1 \+ x& p8 f; ~! B# j. s2 J2 ?
    > kk;' b) d9 }0 ]9 ^; S  U. r5 y
    kk eq k;
    - U! Q4 {) V; g6 Z
    & r9 X3 V) r& E1 N9 [/ q' vEltseq(kk) ;Eltseq(-1/14);4 L4 P  r( C' K: I$ R# N/ e/ a

    ' ]  N4 N' U8 {: e5 D6 H& R: a: y/ q: a* N' O  U! z3 R9 M

    % R! d" d* S" C, S$ `  Y' c# ?5 W) `% w8 @1 h1 R' N1 y

    : j' @4 [/ U  L3 m- [9 T5 r
    % }9 Q; n  u+ P2 q% j  `8 j1 B2 u) {1 z) ]  E- B
    0 z% B7 j: W3 m( d5 @% K3 h- |

    3 r" q' t4 R. i; d; ^! u+ N
    % p" g* k, r) ^( e=============1 v5 ]$ {' B! Q1 d$ g9 p8 @

    ; R2 S; z! p( H8 ^/ V. p$ h9 g# w! ^3 j1 O, @
    7 y6 c0 [2 i. @. Q6 _

    / n5 U$ p  f+ g  A. h3 \! f5 T9 MInteger Ring( v9 q% ?+ _- R4 |( |
    -1666666666234567890; ?6 l+ n% n6 J9 ?
    -0x17213080A7E55CD2$ {) ?5 E; w8 }
    -1011100100001001100001000000010100111111001010101110011010010+ {/ ?% Y+ m. Y" O% @
    -1666666666234567890
    % p' }" x2 w; Q+ D# c& ^/ M  V-17213080A7E55CD2$ b9 d- A! n% m  g
    -CNUO0WGPY9CI6 A. ]' U4 G  O# l+ i0 B
    -1666666666234567890
    ! U4 \9 s! p* C. ~-1666666666234567890
    % u* G6 o' U* u- X0
    ; M8 _5 F4 v. s, d! Y0 S; P13 A/ U4 P' G! P6 a, u0 w3 \- ]0 o' q
    02 q0 ]& w5 L% t  N# v9 w
    [ -1666666666234567890 ]. {+ Y9 C5 n9 c  d/ i9 b& b
    [ -1666666666234567890 ]
    7 ^1 F( D4 B( T& i+ A; {5 d; u; c15 U6 X# X! y, R/ ~; N
    13$ T* m' }6 }  p1 T8 g  u. i  R0 a
    1
    5 Y* x0 A0 u  s* {6 m2 N( c/ `2 B8 b% @1 g: t9 _9 V  w
    -1666666666234567890
    9 t8 l6 B1 A  R- C# `/ |true
    & E7 s* Z" W6 _. x; a/ Y-1666666666234567890
    ! G# S1 |# }+ Y# n+ P2 {& d% c  Rtrue7 e# s  D) J3 z" O* a6 t* K
    -1666666666234567890. {% j/ Y. V" X( {5 N- o
    true
    1 R9 p  j+ u7 ^3 Q-1666666666234567890
    4 N2 S/ t" j; B6 K$ N: ~true- c& }! K- A, E( [& A0 B
    [ -1666666666234567890 ]
    8 p( d1 X/ H3 _4 P/ v# ^4 R, N[ -1/14 ]" c, X$ `8 S+ x1 q1 L4 x& z! |# M5 U

    # ~) P& p# {& s' x
    ; t/ M+ s& X, h+ J4 b& `$ ~# \! z) Q  i: K+ s! `0 q

    $ N# s8 c  H  z. t* P' n
    0 f# H4 r3 T" {  v  D& J; M* X; o$ M# s' M  }2 D
    + W% ]1 k6 w- p( Y
    -1666666666234567890
    ! p8 f6 ~( y* J1 A1 F5 S% @-1666666666234567890; u$ j& p6 h1 Z
    true+ {; _! L5 W% A5 S& A2 N- _8 Z& i
    -1666666666234567890# r8 v( d4 d# u6 P
    true- K+ b4 }  A& x) Y5 ~7 _$ E6 R
    -16666666662345678907 z5 g* ]1 s  Z# y& w
    true
    6 V" P7 H& M+ G% O6 I  G+ _- C-1666666666234567890# j; i" c: B3 ~2 J) f. O1 P- E: ^  Z
    true
    ! k- R' }9 [$ p/ V5 p2 L. A2 r[ -1666666666234567890 ]
    ! v+ g+ l9 v/ A, ^9 P: @& g[ -1/14 ]
    ( I9 F- x4 `8 r* Z9 C# E( o6 _- V. a0 r6 L( V
    zan
    转播转播0 分享淘帖0 分享分享0 收藏收藏0 支持支持0 反对反对0 微信微信

    74

    主题

    6

    听众

    3302

    积分

    升级  43.4%

  • 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;
    + f. A4 h* t2 B, X. S: M* Z, Ws:=0x12345678111;ss;
    1 I) S% [: C/ D& k% O2 X/ L
    1 S3 n2 T: G  Z) R8 B' F& Tsss:=Factorization(ss);sss;
      f( x- C8 \# q4 D& d! E$ \sss1:=Factorisation(s);sss1;
    2 J$ U/ G1 [$ Y+ \FactorizationToInteger(sss);+ X' u2 a: _9 e& o0 @% Z
    FactorisationToInteger(sss1) ;4 `7 X/ r1 U) n' S5 s
    Facint(sss1);因子分解和还原
    ssss:=Intseq(ss, 2);ssss;% d: t' K$ k* m
    SequenceToInteger(ssss, 2);
    2 L. H1 q: g# t8 yssss:=Intseq(ss, 17);ssss;: ~4 X. C8 D% h6 I+ {
    SequenceToInteger(ssss, 17);
    . T$ @3 p: E* A0 q. u  kssss1:=Intseq(s, 17);ssss1;
    - d6 k$ k+ R+ r0 I1 V+ mSequenceToInteger(ssss1, 17);转成2和17进制
    ' v5 z9 w7 G* b: K
    + e% A' m. F, `. a! R. t
    12345678111( [1 E' W$ W2 l5 `+ p
    123456781119 e' j: u2 v! n6 }% p: j
    [ <3, 1>, <13, 1>, <31, 1>, <1447, 1>, <7057, 1> ]
    , y' K& A4 p' p/ |4 [6 L# S[ <3, 1>, <83, 1>, <34129, 1>, <147209, 1> ]
    % d& j! M; D5 P1 O! s$ \12345678111
    ) l( a, r5 d% I1 t1250999894289
    % c  q/ F4 e+ a, B% O1 {1250999894289: |, f4 {, |( l) \
    [ 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,
    - q+ f! d5 ]- @$ Y" \1, 1, 1, 0, 1, 1, 0, 1 ]* D5 h% {! }. j5 ?. _' i
    123456781114 g# m2 e' l1 V2 S6 ?0 _2 {/ d
    [ 8, 6, 6, 4, 0, 8, 1, 13, 1 ]
    % O6 t  v- d% z3 G" l) S: E3 U: a12345678111
    ( D. a, ^! t! q[ 14, 6, 7, 11, 9, 15, 11, 5, 9, 10 ]% K4 t; t9 R2 i9 _3 {' w* f: s
    1250999894289
    回复

    使用道具 举报

    lilianjie        

    43

    主题

    4

    听众

    204

    积分

    升级  52%

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

    [LV.4]偶尔看看III

    本帖最后由 lilianjie 于 2012-1-11 13:31 编辑
    2 U* B( w. K9 c' a- b
    6 T. ?  G1 ^1 jZ:=IntegerRing(5) ;Z;           模5等价类环n := 1666666666234567890;3 N' \3 v1 w* N# e3 u$ W
    > n;6 ]6 V* O9 k* J6 Y: k  z. G
    n1:=Z!1111111111111111111111;n1;
    8 @6 k$ x* @/ m5 S) \n2:=Z!11333331111111111111111;n2;' a2 n- r# {" o! }% {

    - \9 ~) Q& \' h# Z- n; L3 u! c! R6 H6 B, N) z
    K:=Z!n1+Z!n2;K;
    ; W7 J/ D/ Q- ^& V
    2 j9 \" ?: ]0 V7 X) pIsField(Z);      是域吗Characteristic(Z);环特征
    2 J7 {* D( @, ~- ^IsFinite(Z);有限环吗. p3 ]% M, d* ~" j/ s6 l
    IsCommutative(Z);可换吗

    6 N2 m+ B/ s6 w) C6 D9 o4 JIsOrdered(Z);有序吗-------应有不过这函数没有这功能IsEuclideanDomain(Z);欧整环吗------欧环还有非整的。。。。
    # \2 T9 J. U* Y5 [4 dIsPID(Z) ;主理想整环吗9 n" d& `' {: ?
    - ?+ h0 r1 z$ l* P& B
    IsUFD(Z) ;唯一分解吗
    ( [1 N  g% }+ N* h7 n2 eIsDivisionRing(Z) ;除环吗' C2 C, S9 c- S- m5 c* c
    IsEuclideanRing(Z) ;欧环吗
    0 x* M5 I7 ^7 d: N& [IsPrincipalIdealRing(Z) ;主理想整环吗0 m0 E# L; \5 A
    IsDomain(Z) ;整环吗
    FieldOfFractions(Z);分式域9 M( @& c/ W: I# N. @
    UnitGroup(Z);单位群( X6 r1 C. @- l2 Q
    MultiplicativeGroup(Z);乘群
    : T$ ?! ?$ ^& {
    Category(Z) ;范畴Parent(Z) ;父环/ X" S1 J& q- w, F- }- d
    PrimeRing(Z);素环单环和本原环不同Center(Z) ;中心
    + F$ k' a. _; ~+ [AdditiveGroup(Z) ;加群-----就第行一特点ClassGroup(Z) ;类群----------只有Z才有------难懂理想类群更难懂! Y7 }0 P; }: C: R9 j
    - V& D5 O3 s) `+ i) K
    ZZ:=IntegerRing() ;ZZ;: G  M, R& q: a3 }. e2 l
    ClassGroup(ZZ) ;
    1 h: y8 r" h  L! l5 o7 d/ `
    / o) ]1 g' c5 V) u
    ===========
    5 c) j: I4 S; W1 [, s: ^
    $ v" i% V9 d" }6 k! J! [8 \% lResidue class ring of integers modulo 59 `3 G7 q3 _7 g5 n5 Z$ l
    1666666666234567890
    * d) X2 A, E4 y6 O& Q( h( i5 s* y1
    " a8 ~( E' U/ z5 V5 l" \- o. Z- H1 `8 l1
    7 S. i( ^; g: E* y2
    ! o3 g( q# @* j, R0 Xtrue+ D9 }: m& P* q
    5
    , @& u4 O  a9 Dtrue 5
    6 ^" _/ P$ ^9 [* qtrue; }7 a- R4 Q- i9 B# R: m' x# f
    false
    , n2 _  W3 c& F1 }  \8 A' Ftrue
    2 T) B0 Y$ b2 O% i7 x, f6 o" `true8 ^* u0 q" f8 D4 L+ b
    true
    : N1 @* e2 [, {) n( G4 G7 [true/ O) |) O" S& C/ p+ t$ p
    true, R) y. L3 T7 T) [2 A
    true
    0 E7 X6 S. J% R5 V( Rtrue$ x: c' r2 {! U
    Residue class ring of integers modulo 5
    # |# O) V, Z! j- S' _! q+ ]7 p, HAbelian Group isomorphic to Z/42 }9 m( H& S$ p' y6 x6 `9 h8 g
    Defined on 1 generator  M. `7 k* z* M' i' |
    Relations:
    ) Y1 d) M# M: t5 n3 Q2 @! K    4*$.1 = 0
    7 R/ a: R" U& TAbelian Group isomorphic to Z/4
    + W% c: U' m' r8 R5 hDefined on 1 generator
    - z. D1 v* ^. ^+ b0 A: E! ^& L- k' cRelations:
    ) Y- X! a! p& q( p4 X8 _    4*$.1 = 06 N1 f6 D8 \/ b1 a
    RngIntRes
    6 N( x/ S9 v. A2 U4 vPower Structure of RngIntRes) R7 S( G7 v5 T& f% ]# {
    Residue class ring of integers modulo 5( v0 V( H* t% P9 V
    Residue class ring of integers modulo 5
    ; Q) a2 s3 T( g0 b- o& v+ T1 Y# u" `Abelian Group isomorphic to Z/5
    3 `  V  x. o  _2 Q; j2 JDefined on 1 generator
    ' |% X7 l# p6 Q( URelations:
    4 s9 Z& n' ~0 M5 K% ^    5*$.1 = 00 m+ e  b/ {+ P8 c

    " ~* X! @& F2 x" |$ _>> ClassGroup(Z) ;! U% ]* b- u7 C8 ?: m2 U) @
                 ^" M, e; W; R+ o
    Runtime error in 'ClassGroup': Bad argument types& m* X) n+ b# B
    Argument types given: RngIntRes
    7 B! S: F- C* t7 b1 U$ g5 {" s& n- m# R" w2 D3 V* S
    Integer Ring$ @) c2 ]; G0 L
    Abelian Group of order 1
    回复

    使用道具 举报

    lilianjie        

    43

    主题

    4

    听众

    204

    积分

    升级  52%

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

    [LV.4]偶尔看看III

    Z:=IntegerRing(12) ;Z;   ! y! {9 }9 x9 `# Q3 R' j
    UnitGroup(Z);2 i* D& i2 \4 n* k6 M, e
    MultiplicativeGroup(Z);
    1 V1 v4 e5 ?# B0 S- z3 m2 @Category(Z) ;
    % s7 f4 n# C3 a" D) N/ m; IPrimeRing(Z);( \# z/ S& L. V
    AdditiveGroup(Z) ;
    4 C" U6 s2 J& w9 y0 _' t! g! i2 ]9 J+ e  Z9 |
    Z:=IntegerRing(13) ;Z;   
    6 d1 K; P4 A& N5 L0 Y" \: P- u UnitGroup(Z);$ L  r6 y1 _1 S- v7 Z3 K/ }
    MultiplicativeGroup(Z);0 T: }3 ?: s+ c% w3 ~; [) W
    Category(Z) ;, S* C" X( c9 V: w( k  J
    PrimeRing(Z);
    & g9 q/ W# |+ s3 {7 p0 ~# _1 R: zAdditiveGroup(Z) ;
    * _! `8 f. S5 N  l8 {- U; w8 n8 P
    $ K, H: f) }. v' p4 u# T/ R. x

    0 W3 c- X& r7 a5 [; p4 n( `! Q, EResidue class ring of integers modulo 12
    / ]0 {) k2 G* TAbelian Group isomorphic to Z/2 + Z/2
    3 s1 y8 g% _0 x5 m0 X9 @Defined on 2 generators2 g& r! P& Y2 t! Y. m
    Relations:
    % Q3 g( F" B, A3 I1 }- X; d3 M3 [    2*$.1 = 00 T) M) Z* {& Z3 C
        2*$.2 = 0
    6 |& g7 z! X# w2 oAbelian Group isomorphic to Z/2 + Z/2非素数环的乘群同构两个小群的直积(1*11    5*7)Defined on 2 generators- Y0 L7 d, n/ i! q8 b
    Relations:
        2*$.1 = 0
    ) L2 c  w8 c* R. S    2*$.2 = 0
    % m* g- \# r4 P  {( @, HRngIntRes4 Z7 X( h, s8 [4 X: R
    Residue class ring of integers modulo 12
    9 y6 o, F5 h' S5 i) Z' ~/ LAbelian Group isomorphic to Z/12
    " T- [; V4 x7 u3 s8 ZDefined on 1 generator+ V* J0 }3 q5 Y, `6 Y: A* X
    Relations:' V) d2 O6 ]  |! x, I; D
        12*$.1 = 0
    $ C5 i! {( O9 @  }+ B# T: |3 G6 A( _Residue class ring of integers modulo 138 N( `: o, O  M# H( C5 j+ g
    Abelian Group isomorphic to Z/12- [# Z, ~8 M& z0 ~. d/ _
    Defined on 1 generator, i. _: l) N8 a! e5 V
    Relations:
    ( \- S  b- c5 n3 X4 V    12*$.1 = 0' k+ w7 `4 z4 [, V0 s+ o3 p
    Abelian Group isomorphic to Z/12     素数环的乘群同构Z13-1=Z12Defined on 1 generator6 l1 Z. Q8 B8 p, |( R; s
    Relations:
    8 q9 Z) r+ p. v6 k/ k    12*$.1 = 0
    2 a+ ~4 A2 b9 Z0 hRngIntRes0 _3 F. o' r0 v; D# y, Z1 g$ b
    Residue class ring of integers modulo 13& i* }# S% I! y# o
    Abelian Group isomorphic to Z/13
    ( T9 x2 T, I. e1 Y7 `2 DDefined on 1 generator$ a4 B3 R9 g' v
    Relations:; P4 K  V) p4 b0 K! i" ^; r. e
        13*$.1 = 0
    回复

    使用道具 举报

    lilianjie        

    43

    主题

    4

    听众

    204

    积分

    升级  52%

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

    [LV.4]偶尔看看III

    本帖最后由 lilianjie 于 2012-1-11 14:25 编辑
    ; I, e; o6 t( i& @3 j
    6 z! Q! C, `; {1 @Z:=IntegerRing() ;Z;   + ?8 y# t3 c: `
    5 s* o3 {9 }/ R" k& z; d7 U
    R:=IntegerRing(12) ;R;   
    * r- W% u/ t1 u4 oS:=IntegerRing(13) ;S;   
    $ q" p% R) r3 W: `( S/ j2 v# H# p8 j

    : ?; ^3 h& W6 _PrimeRing(R) ;" ]- B' e5 k8 m+ ?4 E* r6 e
    Centre(R) ;
    " A  m6 G8 N& Q& Q$ T" t) A$ a/ C7 J4 h- S( A6 A
    Characteristic(R) ;$ E5 Q+ d8 N  o; M! y
    # R ;阶----元素数  I6 I# q5 M- [" L' `7 ^4 x
    IsPID(R) ;非素数不是整环不是极大理想整环,但都有极大理想公因IsDomain(R) ;
    3 a6 _' M$ U) E; k" bHas**(R) ;6 Q5 j7 o* X7 A- G/ f1 {
    & y4 j$ x" r( ]8 J5 o4 O
    IsPID(S) ;
    8 X5 ]8 g  b; \5 [" T; r$ @IsDomain(S) ;
    0 v7 d5 b5 r8 hHas**(S) ;, h' S: s: w- R- ]; w) C
    R eq S ;
    ( t) `$ ~( ?1 f" y+ NR ne S ;  f! j. ^2 w2 E2 K' B
    # a* C( j' b* ^; J! V, S
    Parent(R!123) arent(S!123) ;3 {6 O" x5 ~6 H) f5 X% Z9 k( L9 J
    Category(R!234) ;Category(S!234) ;
    ( p( r' Q6 b) V3 I- t* Z, p) H
    ! Y4 ~. N4 N1 j5 C) x: T+ X# q+ Ia:=Random(R) ;a;b:=Random(S) ;b;
    0 p& [& |0 E& G% H( SRepresentative(R) ;+ z/ K  H! ^! x: S5 M  J5 n
    Representative(S) ;* u9 H: ^% j* L$ H

    ' O( ~) A6 H: U# W; ?(R!a) in R ;6 A  M# k$ |) i' B( E2 b9 m9 J2 J' g
    (S!b) notin S ;
    & m% t$ ^" |7 A" ^IsUnit(a) ;                是单位吗, R  }5 K9 h: r% m- g, D
    IsIdempotent(a) ;是幂等元吗% q6 q$ b/ A1 E8 m) L1 U: C) n! j
    IsNilpotent(b) ;是幂零元吗* C" Q' i: y* S1 l/ c
    IsZeroDivisor(a) ;可除零吗
    ' w. Y8 F0 _. ZIsIrreducible(Z!b) ; 可约吗
    IsPrime(Z!a) ;
    . B1 b7 A& J+ [! T+ b7 t
    , W# T! I% z4 e0 z' c6 zZ!a gt Z!b ;
    . E& j6 e) K/ zZ!a ge Z!b ;
      h; h; l2 q/ KZ!a lt Z!b ;& A$ I3 Z9 b; a# d
    Z!a le Z!b ;只有同类环才可比较元素大小,
    Maximum(Z!a, Z!b) ;
    1 i; l- s" y- y: d! ?% qMinimum(Z) ;3 H. b, ?) d& w  O5 J- h9 k

    % N" w$ K1 Z. e5 d$ e% ^Maximum(S) ;( [8 J7 ]: ]: ]9 t
    Minimum(Z!a, Z!b) ;
    2 m3 Y8 t- f8 x' zMinimum(R) ;
    / d( J3 W  j; E  T% V! ?0 _# u7 J+ M3 x# c4 T
    7 e2 g9 [. O1 F2 D% B
    4 U; R$ f' ]% g9 j* l9 Y
    Integer Ring
    , w6 G" k. E5 k0 ^7 O1 MResidue class ring of integers modulo 12
    9 F/ ]; T6 t. W/ j+ MResidue class ring of integers modulo 13
    6 h7 t; ]' J- ]3 F6 @3 MResidue class ring of integers modulo 12
    : n) h$ j: M, D! W8 jResidue class ring of integers modulo 12
    0 k) T7 S8 U8 `12
    % ~1 O  S# @' \" ?12
    1 f* a% p  D% F, jfalse; j/ X$ ?$ t( g# C; P( C1 x  j- C% K
    false
    7 H+ t* y8 [! V/ |2 ktrue. R' ~" e8 l  U4 b. d
    true
    / [* ?5 N/ m" G& i& e1 h9 Dtrue
    ( ^1 c  w' \: ]( d0 mtrue
    . X( V: |+ x3 j. Q9 ufalse$ ]+ w6 N% i% ]
    true
    : ^' j  j* U% n/ Z7 @4 z+ b+ \/ J# ~Residue class ring of integers modulo 12
    1 R2 w! P" Q1 s# [Residue class ring of integers modulo 13: u( }% g7 k! n9 g# ]0 K" V+ `% d
    RngIntResElt
    2 E8 a- y& D" hRngIntResElt. T: f- M9 h. Y9 @2 R# {% n
    90 j: D3 O& C7 y4 Z2 n$ H
    12
    - |0 V* `$ N4 q1 c! ]/ u; \% E  c0, W8 ]/ O0 u. {7 @6 a" q
    0! @- {7 x  e. w# q1 I% e; ^2 \
    true0 m7 `1 {! \$ N# T% w8 S
    false5 V1 g7 O' O9 Y% J$ v
    false
    7 d, |' [1 l9 ?& I6 r' Etrue8 s$ W9 R5 S- ~3 O% n$ `' z: W
    false
    - F6 A2 D) C7 j* f5 S2 wtrue
    ( q1 D& p! ?" n7 L8 i9 Y, ^" dfalse0 s! M) \+ q" I. h5 A& b& J
    false
    / R9 K: \, Z+ P! D5 i3 X. Yfalse
    0 h; S: b' F8 R: R/ Ifalse
    8 ~$ q& K( s& S% d( s: O) Otrue
    + ~: O7 h( U% v* r  M6 y. Ktrue; k9 q# L; C( i5 x0 U' P& P
    12% D( J* Z3 P2 |! N! W% D8 Y9 e
    1. J3 F% s& k* `. T5 y) J

    : T" u( I, a9 [2 A$ U0 {$ {! D7 D>> Maximum(S) ;
    ) e2 `4 @! \- v# T  F& m6 [          ^' f; n/ @  ^( M  n4 T
    Runtime error in 'Maximum': Bad argument types
    ( f3 {. }$ C4 J3 {# W5 i$ DArgument types given: RngIntRes
    8 T6 ?0 w# U1 h, q" Z# h6 N' [# w6 _+ K* W& J  `8 w- m
    9
    1 N7 G8 J1 U+ @
    7 {( V5 R% ^& P2 B) }* E/ C>> Minimum(R) ;9 @& q! w" G5 l4 E, t/ b. \* S8 F
              ^
    ' h, T$ _9 x% E5 KRuntime error in 'Minimum': Bad argument types
    # k. L: t2 y. EArgument types given: RngIntRes
    回复

    使用道具 举报

    15

    主题

    4

    听众

    113

    积分

    升级  6.5%

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

    [LV.3]偶尔看看II

    本帖最后由 lilianjie1 于 2012-1-11 15:56 编辑 5 Z$ ^& C4 D+ r/ L, [3 {4 G
    8 V% ]) R% h, _# v, ?3 f: h0 z
    Z:=IntegerRing() ;Z;   2 M5 {6 M/ _# C8 Z4 O
    I12:=ideal< Z | 12 >;3 J5 I0 P0 W% q- f
    I12;
    . \7 W7 M; E: d$ k" n% B# LZZ:=IntegerRing(15) ;ZZ;   
    0 \2 z1 |* k% q, ^; D4 b, hIZZ15:=ideal< Z | 15 >;* s$ F/ E/ T$ [* c
    IZZ15;! _! t8 M- P+ ]* y: |) J
    I12 eq IZZ15;' C( g4 ^: Z5 G/ C
    Q1:=quo< Z | 12 >;Q1;
    ( B! `8 z2 b; A  X) U; o: WZZZ:=IntegerRing(5) ;ZZ;   ; m# |9 k' P" J$ ]2 ]& H
    IZZZ5:=ideal< Z | 5 >;
    / k0 K; F5 X6 d$ Z( S# D; q; IIZZZ5;
    , V% O5 z4 T& A% v9 g2 e5 G5 s7 q( X
    I12 *  IZZ15;            理想和/积/并/交,
    + ]) [! X+ [7 d+ O理想和是理想对应两(可多个)元素加,% q/ ]  ]& h9 _6 ~2 v
    理想积是两理想(可多个)对应元素积,
    $ V$ b5 c8 f% u* J7 g, R理想并就两(可多个)理想元素并,就不一定还是理想,
    : K3 H: _, I) N5 i理想交是理想(可多个)元素交,理想交一定还是理想,& |( l. i& C/ o* W* W! f) i

    * O( [$ k0 I) Y$ l! g9 [理想积是理想交的真子集,极大理想交是理想------J根
    4 j7 y. ^% E  r' ^5 N* e
    理想商就理想间同态:是必须能整除
    $ d+ B6 C# q1 r6 R4 D3 i0 KI12 +  IZZ15;( A/ V2 _; e: N$ I+ K) F
    I12 meet  IZZ15;  t& _5 C! F3 e; j$ y

    2 X  M9 s& s5 Y6 ?& [9 x$ RI12 * IZZZ5;" i# E' D" {! {( X! {% V) L
    I12 + IZZZ5;
    6 G$ C* H: G; y: GI12 meet IZZZ5;& w* J9 X9 c. P! Z/ z
    I12 / IZZZ5;
    3 [6 B: ^6 o" r  p. xIZZZ5/ I12 ;
    7 e& r+ a# }. _; f& kZ * IZZZ5;
    2 E$ [; x% E( p0 \: m$ JI12 + IZZZ5;$ p: O0 E# R1 a8 y
    IZZ15 meet IZZZ5;
    # q1 j$ c5 u; v) j) ?" cIZZ15 / IZZZ5;
    Z meet IZZZ5;: b: R2 O% K4 w5 O# g
    I12 meet IZZZ5;+ _% R! \* l1 t5 K2 \
    IZZ15 meet IZZZ5;& U# X& S7 T* |
    IZZ15 / IZZZ5;+ F7 }  U, @7 k' q/ }& i( `5 u5 B0 O
    * ^& L, C; M3 M3 Q
    I12  subset  IZZZ5;运算后的各种理想互相是否包含IZZ15  subset   IZZZ5;
    2 U' ~/ u/ W7 l9 XIZZ15 subset IZZZ5;
    & G' l- `7 t7 O. pIZZZ5 subset IZZ15;

    # K4 a% [9 n+ m& \Integer Ring
    + G( a$ S4 m% C5 \4 gIdeal of Integer Ring generated by 12% \3 G  m/ R9 S: P
    Residue class ring of integers modulo 15
    . u: N* k# S% U8 F, b9 BIdeal of Integer Ring generated by 15
    ; x  o  g6 g/ g" ?! c& Ifalse
    : M5 F- n  P" ^/ }8 i% vResidue class ring of integers modulo 12( E5 X4 h1 Y+ G6 D3 w
    Residue class ring of integers modulo 15
    + J+ {% {- C% P" U- ?Ideal of Integer Ring generated by 5/ a1 H2 z, m. \# V
    Ideal of Integer Ring generated by 180$ l, q8 U% H; e3 U# W1 }
    Ideal of Integer Ring generated by 3+ u7 q; a8 {* ^9 o6 o
    Ideal of Integer Ring generated by 60
    / f* h& y2 O0 s- y6 f+ [8 d( yIdeal of Integer Ring generated by 60
    ; t  w, X( A& S* z, B) y3 nInteger Ring
    ) @$ P6 u1 n+ o/ [( `' sIdeal of Integer Ring generated by 60
    5 z! U) G, h; [- ~
    5 Y- F: w. X* Y$ ~& T>> I12 / IZZZ5;% Y8 h9 L7 [+ q, y/ n4 Q
           ^1 }, M) l, b; ^: `0 `- K# R  G
    Runtime error in '/': Argument 2 must divide argument 1.3 q- m/ B! B3 j+ O) l& Q2 m4 C# Q

    % d1 u: Z( g% Q) M" @# y* l5 b) l- L8 e' o6 p2 M
    >> IZZZ5/ I12 ;! m# |; t+ G' o/ v3 d( h4 F
            ^
    - _7 \. ?/ n+ w: v7 w0 R6 [Runtime error in '/': Argument 2 must divide argument 1.
    5 f; k- L3 R# A  P1 O/ X; v$ F8 I# `  t  U# p
    Ideal of Integer Ring generated by 5) ^$ ]% f. b! t2 _8 K" j
    Integer Ring# T$ S7 W1 c- k( Q& a( k3 _
    Ideal of Integer Ring generated by 15# E7 B+ @9 @( M1 H8 U. |& }% n4 E
    Ideal of Integer Ring generated by 37 _+ U2 C- O% Y0 `  v
    Mapping from: Ideal of Integer Ring generated by 3 to RngInt: Z7 L: M. Q$ ^9 a5 G) D  {; T3 z
    Ideal of Integer Ring generated by 5
    3 b4 _+ K- U0 `- E2 n% aIdeal of Integer Ring generated by 60: E+ t  Q/ w8 A( h7 }$ L( D1 m
    Ideal of Integer Ring generated by 15
    0 B$ J5 D( @, aIdeal of Integer Ring generated by 3* H- O' A% w7 ?: x+ q! N5 b
    Mapping from: Ideal of Integer Ring generated by 3 to RngInt: Z
    - C4 u1 R" c" `9 |! F7 h
    " z3 h- D  Q. z% \- ufalse
    & G3 l/ Y: p# E3 Ntrue
    ( n8 @7 e8 i1 S9 {: h. J. atrue
    2 v! e) W% A% x% d; M7 B7 ]false
    回复

    使用道具 举报

    15

    主题

    4

    听众

    113

    积分

    升级  6.5%

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

    [LV.3]偶尔看看II

    Z:=IntegerRing() ;Z;   9 {) v+ H7 y) l. H" A+ d
    I12:=ideal< Z | 13 >;3 t% A- w1 K7 t0 ?% ?" i$ M
    I12;
    ( C- w: T2 k/ G6 Y$ a- y( D6 Z: XZZ:=IntegerRing(60) ;ZZ;   
    ' K7 }1 `; z. ~* E* _. KIZZ15:=ideal< ZZ | 31 >;$ g* Q- n$ P- T" q5 N" D
    IZZ15;! U" q# x% a* M
    ResidueClassField(I12);
    - B! M9 D! R$ X: F" I1 i# A) }ResidueClassField(IZZ15);环和极大理想的商构成域---剩余类域,剩余类环中的素数都是极大理想

    . r# ]8 ^' x- [$ _! X" V# H, b$ lloc< Z | 19> ;
    3 O. n3 I1 ?+ l/ aloc< Z | 17> ;9 }, S: \* ~. g' z2 ~
    loc< Z | 131> ;局部化:一个素理想到原环元素的映射
    1 Q* Q) s* m5 c0 ~
    ext< Z | > ;超越扩张到一元多项式% F8 ^2 i! G7 `& v7 C; f9 V
    ext< ZZ | > ;
    1 T1 z- O: L# E+ b& x: R
    ( S- d5 d* m; Aext< Z, 2 | > ;超越扩张到多元多项式
    0 `3 L$ _9 p5 N
    ( H8 G  v( [7 T& next< Z, 3 | >
    Completion(Z, I12) ;
    0 Z/ l8 g8 r& P0 z/ B5 r, B6 n/ d/ j, E7 w2 t

    1 |5 A9 f) ~% \6 Kcomp<Z |I12  >;
    3 C) _' c! @$ K1 i" G    素理想零理想完备化,和P进环联系起来
      t' @$ ]1 }: K: @* eCompletion(Z, 0) ;5 N1 V7 X, c% X: X# i. i3 d7 X- k9 O$ G
    comp<Z |0  >;
    1 R7 ~9 {. }3 P* A8 i' e0 x" L. _% c+ S+ U/ ]
    Integer Ring
    , t" ]8 l. V$ S/ c) K! H% F0 PIdeal of Integer Ring generated by 13
    5 f8 H9 t4 [4 y3 Z6 m( g2 a0 DResidue class ring of integers modulo 60
    8 l% [; C. Y7 ?4 QResidue class ring of integers modulo 60
    - R. |/ ?9 Y! j* h0 v8 UFinite field of size 13
    : _. _2 g  X# F6 bMapping from: RngInt: Z to GF(13)
    7 D* N: J7 P2 Vmodulo 13 * ]6 b6 U. F$ h  ^& D
    - |  x+ l$ L% B) t9 H, e
    >> ResidueClassField(IZZ15);/ s% i; Z8 S3 r7 u9 o' ?  J- [
                        ^& D! d; }' V9 h/ C. d  q
    Runtime error in 'ResidueClassField': Bad argument types
    " @: h/ d" S  o; tArgument types given: RngIntRes
    % F# A) O3 O# m
    2 t# ^$ x( t( k! LValuation ring of Rational Field with generator 19
    ) g  h  \$ ]- kMapping from: RngInt: Z to Valuation ring of Rational Field with generator 198 [7 }+ Q# P5 A! h# U3 V  I' p1 P
    Valuation ring of Rational Field with generator 172 V- V% ^. W) {( W. s
    Mapping from: RngInt: Z to Valuation ring of Rational Field with generator 17
    $ x9 y# i& S5 ^' I) d% D+ G% MValuation ring of Rational Field with generator 131. \& y( r; w2 Z" s
    Mapping from: RngInt: Z to Valuation ring of Rational Field with generator 131
    4 n1 f6 F' E. o$ bUnivariate Polynomial Ring over Integer Ring
    0 @  K, y2 ^. P: N$ }8 H1 X0 V( nUnivariate Polynomial Ring over IntegerRing(60)! j9 [/ s' F0 {- z9 R+ X5 i
    7 x! S$ E/ O# }$ n% `9 r! D- j! |8 y
    >> ext< Z, 2 | > ;
    2 }6 a6 {! N, T+ e% v# ~! \      ^
    * q* x* C+ c% ^, _2 `( w6 d/ s$ eRuntime error: This constructer is no longer supported- b2 n. w+ m& k" c1 L& i# G

    . G5 h1 G$ T$ x, g1 V& L' t7 D
    ' j% Z6 w. @/ i) ]; w3 i>> ext< Z, 3 | >$ V6 [, h4 S9 g+ q
          ^& o- \# n- }( b% r9 L
    Runtime error: This constructer is no longer supported
    8 E' T' H* r9 T. f8 M. t! n$ y* i7 I. w5 ]4 H5 ?4 U4 G
    13-adic ring4 G6 J, A2 M8 `5 A
    Mapping from: RngInt: Z to pAdicRing(13)! g& d. ~& A, C0 e- h
    , o0 f6 R( C$ n" C
    Completion(5 H. j* f- w( ?- c, c* T" O; r
        Z: Integer Ring,' `) U; e4 Y5 m3 Q" W
        P: Ideal of Integer Ring generated by 0
    - i5 v" B7 b5 e" N: g
    回复

    使用道具 举报

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

    qq
    收缩
    • 电话咨询

    • 04714969085
    fastpost

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

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

    蒙公网安备 15010502000194号

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

    GMT+8, 2026-5-31 16:16 , Processed in 0.501773 second(s), 86 queries .

    回顶部