QQ登录

只需要一步,快速开始

 注册地址  找回密码
查看: 3801|回复: 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;! I6 H: N. y4 B5 n: w  r
    n := -1666666666234567890;2 Q* t7 t* M. f7 O) K
    > n;  b. h6 I# f4 Z* l: a
    / Q. \7 _6 q. b! K! a5 E
    > n:Hex;                           转16
    ' U7 l  c% G3 S9 `IntegerToString(n, 2);        转26 N. b% p4 t3 B1 m0 I
    IntegerToString(n, 10);       转10
    0 @4 k  e8 Y2 e' z. AIntegerToString(n, 16);        转16/ K  D/ S: m& Y3 u: C1 U$ J
    IntegerToString(n, 36);         转36
    IntegerToString(n) ;
    - w$ S& M0 [: ^IntegerToString(-0x17213080A7E55CD2);转串Zero(Z);
    , t5 y9 w2 }5 b/ a2 ~8 gIdentity(Z);                   8 A5 I5 _' [) \, r# C2 l% D$ F
    Representative(Z);         环代表元
    7 N4 i  e1 k# A" eEltseq(n);                        取整$ z) ~* I: r5 a4 v) W2 C4 L' Q8 E; K* o
    Eltseq(-0x17213080A7E55CD2) ;
    Denominator(n);Denominator(12/13);Denominator(222222/111);
    : H9 O- `6 g; d0 J6 c  S- ]9 f! z
    + u! ?* q  N8 ~& _  i9 em := elt< Z |  -0x17213080A7E55CD2>;m;         在虚实2次域中进制砖换不变% Q" b$ n6 G( H3 L
    k := Z ! elt< QuadraticField(3) | -1666666666234567890, 0>;7 z; H! v( _6 k- ?$ p! p
    > k;
    . A- G% [) o/ \; Z) e9 W. {& O* pn eq k;; U5 z! z3 |1 r! ^/ e; n
    kk := Z ! elt< QuadraticField(3) | -0x17213080A7E55CD2, 0>;
    2 C( j/ W& n4 G9 Z: H* {' g3 w> kk;
    5 U! d2 p' j/ [kk eq k;
    / n5 |! p- z! }4 `. R/ k
    0 w- c! R3 Y3 R# u' Y8 R' [6 wk := Z ! elt< QuadraticField(13) | -1666666666234567890, 0>;
    + h9 b! i% Q! q% V( p> k;$ A" t4 B/ t9 g, Z) Z5 D
    n eq k;
    $ m/ Y  P0 V- g  w3 Hkk := Z ! elt< QuadraticField(13) | -0x17213080A7E55CD2, 0>;( u1 ?0 H+ M1 T3 t; Z' t" [
    > kk;
    ' K* j, ?4 n+ Okk eq k;
    0 i8 i" K7 P9 q7 m' O) e$ b6 u* U+ {  r6 K$ J5 V+ V1 N) f
    Eltseq(kk) ;Eltseq(-1/14);

    : v1 b" q$ p& R. c' Q% s% J! I$ w- A% z: ?
    5 v% `# G+ N, N) i& @" s! Z4 g

    9 H# ~/ C, J. S- ^" o: h5 o. r( L+ w+ t. H' s
    k := Z ! elt< QuadraticField(-3) | -1666666666234567890, 0>;& X4 n5 X1 T! _5 F  d" k
    > k;* a" B6 m. M* j( o7 b
    n eq k;2 M( Q  ?# D- C) b% \
    kk := Z ! elt< QuadraticField(-3) | -0x17213080A7E55CD2, 0>;4 u" S6 ?% q) r2 V' d
    > kk;
    9 }( s; _- h4 t$ |  @8 J! `7 \  Rkk eq k;- a% @4 J: k1 G& I& |+ R8 [4 f
    # B3 R! E( u2 q- N/ Q/ X% `$ [
    k := Z ! elt< QuadraticField(-13) | -1666666666234567890, 0>;; |1 h' l% V" {3 h/ t# q# `% n' d: l
    > k;) E4 l7 n' q% q# T
    n eq k;& q4 o: J4 Y8 M$ h0 Z$ }" {6 C
    kk := Z ! elt< QuadraticField(-13) | -0x17213080A7E55CD2, 0>;
    1 @* a/ Q3 k. j( L+ C9 |* x! {  I> kk;
    * }9 W2 n1 b! x4 s2 q- A/ }# bkk eq k;
    3 u& Z' ]0 Y% r: t  e& v
    5 f, E$ [. t' \* M2 L. bEltseq(kk) ;Eltseq(-1/14);
    & Y! J* S8 U9 K! q- H; _+ |$ }
    9 w7 |2 S; S# m( W% K7 ]) @& X$ s" W+ t

    ) e% U3 p. A% D
    # G6 x; ~+ V8 A  z3 a6 o& |9 k# y7 o; K! [6 z* |/ }0 w

    : N' ~( |2 d- o5 z2 X" F+ z, i( ^
    & _$ p, f3 {! e1 S2 Y. |) R! M
    " p% K- x9 i+ u: x' X& W1 ~" P4 B$ V- [/ U* g
      H+ v$ Z3 q' E5 L  l; ?
    =============/ A' T5 X7 ]+ D3 |

    " w6 N6 P* u$ Q3 i5 ?3 T) P! L6 n4 y; x, U$ `. S

    5 ~# A+ [( I0 }
    0 B* x3 w4 y5 r3 NInteger Ring
    , v' o& S# M% r' g( x-1666666666234567890# A7 ?3 O5 I0 c9 p) K
    -0x17213080A7E55CD2
    ' u+ v" }8 z$ C-1011100100001001100001000000010100111111001010101110011010010& L% {( _' J+ D! [8 z
    -1666666666234567890; g# ?  G1 G" ]3 \8 w( {) X6 i4 C3 D
    -17213080A7E55CD2
    , m' d$ R7 j" I-CNUO0WGPY9CI1 f9 Z6 Q2 O3 z6 F
    -1666666666234567890- X: [' A5 [( }* X1 H. q; [8 N" |
    -1666666666234567890
    9 h+ h# s+ p/ N& a2 n4 b6 f2 i$ C5 o9 p0
    + x% k  u( a9 P8 D  v12 j7 q( b( x& X( t( |" T8 ^
    0
    , A3 N# a+ R6 e7 H" |) z[ -1666666666234567890 ]) B6 h1 J# O5 F  g
    [ -1666666666234567890 ]
    % y; j2 W: n- h3 {& W* V15 |) M! Q4 E+ z0 B" O- t- b& O
    13
    ; w4 Q5 \/ P# [1
    6 Z; `7 T  L8 _; [* j3 s1 k3 d6 V/ f: h" L6 g$ u. l# k+ f
    -1666666666234567890
    + ~5 ?) R! @% i! A4 N$ otrue
    $ K& \  i5 @3 `( C8 S-1666666666234567890
    ) _+ J6 A# G/ H1 N1 G' ~9 Ftrue
    9 o: z1 n: X2 o8 ?) F-1666666666234567890
    ; k- D4 K8 \# C/ r  Ztrue
    , X" c( k; t6 i5 z-1666666666234567890
    / l5 U  A( z/ e7 ]# \2 c9 Itrue
    " c- u& _' Q4 a& R1 N[ -1666666666234567890 ]" G5 R. H& J* ~$ D8 o
    [ -1/14 ]* k+ ^2 V# k( K6 ?8 e

    ! D8 L0 l1 Q% G% o. b- @
    0 g& Z3 T. v" t( x( G2 G5 |9 ]) f, Z3 l) o# n8 a
    ! {2 o; m, ?% z) R5 ]' q6 E9 F
    + F) j+ r: }2 H. H) I8 a

    + }8 b+ H5 I. b: Y/ R: ~
    % X4 P1 O9 Y, k% |2 _2 p# d  W-1666666666234567890
    . a. b" y' g: g* ~7 @& B-1666666666234567890  k" ^/ X! l6 q, f; w& O; s/ o) L; t; A
    true
    1 k# o' n# [: [8 a& u8 U9 W-1666666666234567890
    & P7 v5 b% M/ ptrue
    6 ^: |- ^& D9 C' A6 I+ b-1666666666234567890
    3 c! P5 l! C; m9 ~true
    ' g+ d; [, @9 \+ [" v, v-1666666666234567890+ Q: P9 ?2 w( W* \$ W6 _
    true
    + l7 X2 S( T* r. W[ -1666666666234567890 ]+ b6 J( d: x' B: n6 Q; L8 z
    [ -1/14 ]
    ' L: D; {8 v- z+ I) e  H8 w: S+ ?: R; y4 o. s
    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;
    & V/ C" p- h; Gs:=0x12345678111;ss;
    8 ^& o; w/ P9 q3 y+ J; x* f8 U5 Y* t- o0 q6 w8 q
    sss:=Factorization(ss);sss;. f% U8 S' w% c1 Z$ z9 F
    sss1:=Factorisation(s);sss1;/ J* B  a# V. L  b1 @! X
    FactorizationToInteger(sss);0 S' `, G. n/ s8 N, }2 Q" L
    FactorisationToInteger(sss1) ;
    & {) Y. Y! E2 a8 ~4 g$ [Facint(sss1);因子分解和还原
    ssss:=Intseq(ss, 2);ssss;
    . d6 t, \4 b- j' \$ kSequenceToInteger(ssss, 2);
    * E# R; z) S9 m* s: B6 |% y- ?. wssss:=Intseq(ss, 17);ssss;
      Y5 {, ~4 t5 y, f3 F0 O& e7 rSequenceToInteger(ssss, 17);
    - C5 J0 Q8 |9 L! [* d7 assss1:=Intseq(s, 17);ssss1;
    " R- E# O  P- \2 W9 F/ O: n7 gSequenceToInteger(ssss1, 17);转成2和17进制

    3 a6 ]0 w7 b! ?0 Q* V0 r1 L" [$ J2 n4 Q& ?' T
    12345678111/ P0 r+ f: y* r1 F; w
    12345678111
    ' M; @" m+ L; _5 I[ <3, 1>, <13, 1>, <31, 1>, <1447, 1>, <7057, 1> ]8 \: y4 u1 H8 P) X, t4 ]) ^2 h
    [ <3, 1>, <83, 1>, <34129, 1>, <147209, 1> ]
    5 K9 N8 b1 x# o' Y& ~& T: z3 ~12345678111
    ; q% `! q& J' \. [; g1250999894289
    , A, @; b1 r' P' z0 K3 V1250999894289
    + D/ G3 H' ?5 c+ n[ 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, % M6 P1 G  a; P5 n3 V; ], z
    1, 1, 1, 0, 1, 1, 0, 1 ]8 ?& e5 g5 j5 h7 ?3 [, J2 \- u
    12345678111
    + J: I$ C6 l8 b) R[ 8, 6, 6, 4, 0, 8, 1, 13, 1 ]+ @/ f% t' m5 Q% h/ o3 v; \- s
    12345678111
    3 o% S9 J  P/ y( g  D# r[ 14, 6, 7, 11, 9, 15, 11, 5, 9, 10 ]
    " n/ j  `0 s1 x8 @% l! N1250999894289
    回复

    使用道具 举报

    lilianjie        

    43

    主题

    4

    听众

    204

    积分

    升级  52%

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

    [LV.4]偶尔看看III

    本帖最后由 lilianjie 于 2012-1-11 13:31 编辑 , {6 U; A  d, j+ p
    9 s$ ~. U2 v3 u0 P
    Z:=IntegerRing(5) ;Z;           模5等价类环n := 1666666666234567890;, X" v6 L! w& _/ |" V) Y. d+ [
    > n;, U3 Q; ]; W" `& q- c% k
    n1:=Z!1111111111111111111111;n1;3 K4 I- ?9 v; z* k
    n2:=Z!11333331111111111111111;n2;1 J# R6 X; J6 h

    ; K! {) W+ x' S, f6 h% V5 t/ o0 }
    # P- b& h7 o' x# O& wK:=Z!n1+Z!n2;K;1 Z) I! K1 W6 H3 t$ n5 P- J; j6 c. ~

    2 ~9 j9 t& M+ E( [7 N( k+ iIsField(Z);      是域吗Characteristic(Z);环特征
    . Z1 h& M' S4 G) H  [: S6 PIsFinite(Z);有限环吗( [1 W1 K& N* T( s) {6 a
    IsCommutative(Z);可换吗
    6 t% ^+ I) r4 A
    IsOrdered(Z);有序吗-------应有不过这函数没有这功能IsEuclideanDomain(Z);欧整环吗------欧环还有非整的。。。。* ~# \& _* f  f' q9 L3 _
    IsPID(Z) ;主理想整环吗9 z% k1 z$ W9 B2 W/ [

    9 U1 J& Z. T- |* t, iIsUFD(Z) ;唯一分解吗  B5 g! g6 D! o
    IsDivisionRing(Z) ;除环吗9 W$ O9 M: K2 f/ e( p
    IsEuclideanRing(Z) ;欧环吗: S" }: }1 j3 V4 F- t& x8 q! m
    IsPrincipalIdealRing(Z) ;主理想整环吗
    5 f& @$ |. d4 L0 \9 yIsDomain(Z) ;整环吗
    FieldOfFractions(Z);分式域
    " X0 e, N' q( c( ^UnitGroup(Z);单位群
    6 n) _5 d9 N" _MultiplicativeGroup(Z);乘群
    ) _2 G$ v8 J; v5 u, S
    Category(Z) ;范畴Parent(Z) ;父环; U; g9 ~. P3 s
    PrimeRing(Z);素环单环和本原环不同Center(Z) ;中心
      @- V: J: c1 ~0 ]. {AdditiveGroup(Z) ;加群-----就第行一特点ClassGroup(Z) ;类群----------只有Z才有------难懂理想类群更难懂! d/ f% Z2 Z: D! X- v

    & p4 S; U8 r$ I2 Z% j) }" \ZZ:=IntegerRing() ;ZZ;
      N0 F  e7 c/ ~6 ^7 gClassGroup(ZZ) ;

    * n* G0 y# C+ I5 p0 @  A2 @
    : c& a; M, N5 Q1 o===========
    2 T" [% p, `, {, ~0 h9 B( `7 o' Y% b" l
    Residue class ring of integers modulo 5
    0 k6 n% H1 F& }3 ~1666666666234567890
    3 h/ u5 C# N; n1
    9 }# l! ?- O! x1
    ; j# x: L6 }3 I% n3 Q2
    9 w0 C3 t$ u: u9 d! Q$ e- q  ktrue
    8 `3 E! f( A$ p1 ?! u. H5
    2 Z' Z( d6 k$ Y; ]9 s* K2 ttrue 5
    / j3 i# h: T9 ytrue8 K8 A9 I: m9 a6 i8 L
    false
    ) x& b- e0 e' D3 d( ?' Ytrue+ n* i% _9 Y: ~7 b' c/ U
    true2 n% N2 ]4 c. v- p# u( F
    true
    ; Y: D# s& c: H& i- w, Mtrue. n% U8 f- c0 y
    true1 O6 _  H2 w+ a. }9 }0 \- W# ^
    true0 `4 k4 j* r. N( h5 Z" H
    true
    2 a- Z6 D) G! Z8 l: t& NResidue class ring of integers modulo 5  e0 X3 ^; W) h) B7 A2 X! b
    Abelian Group isomorphic to Z/4/ G  s4 k. s  `  {5 Y1 X
    Defined on 1 generator
    % s+ H* o1 b; B5 |$ Y: hRelations:
    0 Y/ [9 T$ G4 f    4*$.1 = 00 k6 P7 M/ w3 u) p  _; a
    Abelian Group isomorphic to Z/4* i8 w' T) {' G: Z& v9 v, r
    Defined on 1 generator2 H; D6 \+ K: w3 ~
    Relations:# a5 H) `4 P9 {3 O7 v4 X% n! s
        4*$.1 = 02 u- p% j4 z8 b* d. D  n9 K2 p
    RngIntRes
    4 g, d5 h/ \* f" p3 \+ ~; UPower Structure of RngIntRes
    , |( U* C, ]9 oResidue class ring of integers modulo 52 i+ l7 l& A2 H: \. f
    Residue class ring of integers modulo 5* S8 r( r! u$ s! R7 `
    Abelian Group isomorphic to Z/51 b9 g2 ]  `* `2 r% c
    Defined on 1 generator
    ! T/ j% o- a1 s( P. H4 MRelations:
    1 Q2 s: x% k4 F    5*$.1 = 01 [* v' Y- ?7 W
    . k4 J/ v/ [2 h$ `- b0 }- C
    >> ClassGroup(Z) ;& Y' j" x/ \4 T9 O
                 ^& G! S& s) u0 b) W" r
    Runtime error in 'ClassGroup': Bad argument types& R" H2 Z7 r  {. L# ~
    Argument types given: RngIntRes' v6 M2 `$ i. z* y  O) I
    & f. [3 c3 Y# T
    Integer Ring/ a( P! a! Q  l# U2 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;   
    , M7 e5 f  h5 d7 Q UnitGroup(Z);! _- o. `; ~$ g5 q' |4 t/ Q6 X, |
    MultiplicativeGroup(Z);7 t' [- J2 D& V
    Category(Z) ;% |3 j* ~9 {5 W% J; s
    PrimeRing(Z);! K) d6 ~. _% c
    AdditiveGroup(Z) ;
    , g( n5 c$ O8 ~0 x% X# ~, Y) F  B2 G* a5 a
    Z:=IntegerRing(13) ;Z;   
    & G  e) U3 ^' F1 g/ e5 |1 L, v# H$ ` UnitGroup(Z);
    2 {5 B9 H2 u9 j8 M  k2 p) JMultiplicativeGroup(Z);
    0 P; F- z  `; E$ pCategory(Z) ;
    7 z- W: j+ t, z4 p& N" {- U2 @PrimeRing(Z);
    2 Y* F9 B/ v; B1 p. F  A8 a# CAdditiveGroup(Z) ;. G  H  E* `& H; H6 h3 u7 P

    4 l4 V; O- O7 \4 r
    * f+ ?/ Q3 n4 `7 X) r* r' e% e$ Q1 \$ g7 ~
    Residue class ring of integers modulo 12
    & P& B- p( \! n5 _3 T- E* CAbelian Group isomorphic to Z/2 + Z/2
    8 f" @$ \: |+ {& H" {) HDefined on 2 generators+ Y" l3 h. U9 F: I; X
    Relations:9 W# d4 W: S/ r* B: E& U
        2*$.1 = 07 Q* q  {) \- Q. D
        2*$.2 = 0$ Z# F1 k: _  t5 R. r; y
    Abelian Group isomorphic to Z/2 + Z/2非素数环的乘群同构两个小群的直积(1*11    5*7)Defined on 2 generators
    ( z  t. }6 l3 I$ b; ]' XRelations:
        2*$.1 = 0- U; e% O4 {* X' V. n  Z
        2*$.2 = 0' y1 `' O, Z, j- O8 X7 B. X% w
    RngIntRes$ E# S$ a* I  {5 n3 k5 w( Y& X
    Residue class ring of integers modulo 12
    / X8 S1 u2 {& {Abelian Group isomorphic to Z/12
    + G- X, @" I% b/ u$ gDefined on 1 generator
    # \  `) ]+ v+ l7 Z' S$ a4 FRelations:
    # S: r! x; V6 I% Q6 u, ?! [    12*$.1 = 0
    8 {( R9 t% ^# k. }- \: x% f" a5 tResidue class ring of integers modulo 138 }0 }9 C1 y5 Z2 V3 x
    Abelian Group isomorphic to Z/12$ L1 l, K( f, d$ I, w* ]$ D! ~
    Defined on 1 generator
    / n4 [$ F  k, t" u0 t( l8 D& x% [Relations:
    2 ^9 r' j* {3 t    12*$.1 = 0+ w2 }4 r! m9 q# \; v2 Q  V
    Abelian Group isomorphic to Z/12     素数环的乘群同构Z13-1=Z12Defined on 1 generator. k- E, U2 U8 o4 i; }  p% b
    Relations:2 O2 w9 o" Z2 R) X' O: q7 N) M
        12*$.1 = 0
    ( ?: M; y- x4 l& {! LRngIntRes
    8 r- A, s0 w! k8 c/ l3 O! rResidue class ring of integers modulo 13
      k$ Q; r; u" x5 d  Z3 P0 F! vAbelian Group isomorphic to Z/13
    4 _9 }3 I0 }9 X1 v' A( uDefined on 1 generator
    # h2 S6 T- U, h. Z, kRelations:1 y. c, a! N5 i, g9 k. H
        13*$.1 = 0
    回复

    使用道具 举报

    lilianjie        

    43

    主题

    4

    听众

    204

    积分

    升级  52%

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

    [LV.4]偶尔看看III

    本帖最后由 lilianjie 于 2012-1-11 14:25 编辑
    ! d9 g& n2 ]9 _7 ?( [/ G- ]9 `
    - q9 o7 o0 M2 \- Z/ J* ]Z:=IntegerRing() ;Z;   
    ' [  k9 X4 }+ F0 {; o4 O
    : w0 |4 F  _& }9 IR:=IntegerRing(12) ;R;   1 O4 X3 s- F0 P" n4 h
    S:=IntegerRing(13) ;S;   
    " B( r' ^; G7 @6 i: X" z4 Z
    ! l! ^" z, ~0 X) f6 ]7 D' t
    1 O2 S3 s9 N: B8 oPrimeRing(R) ;
    6 b% @7 I( Z  m5 uCentre(R) ;. o$ F+ l; V  u( A, d
    / Y# b6 k* u0 V& y
    Characteristic(R) ;* @/ ~7 t$ y0 M. ]0 }6 [% x
    # R ;阶----元素数( F2 T( D+ s! ~! \
    IsPID(R) ;非素数不是整环不是极大理想整环,但都有极大理想公因子IsDomain(R) ;* x8 X7 {5 X3 {" d. R0 l
    Has**(R) ;
    4 k% j1 l3 t9 h( s+ p! D4 H8 \' R
    IsPID(S) ;, A/ E" Z1 G0 x8 y1 Y2 t) u
    IsDomain(S) ;0 o0 _1 L) X' N% i( I! p; ]
    Has**(S) ;
    0 V, }+ p# p9 P( T1 [R eq S ;& N) l. o( B% H2 m! N. o" s
    R ne S ;
    2 H; r% U/ ?' |: d+ L/ C
    ) g2 @9 ]* \0 m* B2 f3 _9 eParent(R!123) arent(S!123) ;
    ! v. N, S6 c% ?' G5 U/ |4 |Category(R!234) ;Category(S!234) ;5 B' y7 Y0 I3 ~. h# ~0 e- r( h, Y

    7 [& b3 f9 Z( E  [2 Ja:=Random(R) ;a;b:=Random(S) ;b;8 P/ f7 [0 Z4 E# W- ?9 d
    Representative(R) ;- r; ?/ b8 {) p% {6 X
    Representative(S) ;; Y2 @* H! b" W# }- n
    . U8 v% E# \# ~" i9 X
    (R!a) in R ;* @9 z; u1 g, [* o) L, I
    (S!b) notin S ;
    ' p" r+ P) A% W& v/ k  c1 ]$ XIsUnit(a) ;                是单位吗
    0 w2 l; q7 y; l  XIsIdempotent(a) ;是幂等元吗
    ( p7 \  I# u- wIsNilpotent(b) ;是幂零元吗
    ; O$ R: _) w: W3 C6 U5 U2 @! pIsZeroDivisor(a) ;可除零吗
    * c1 B1 P( @7 g0 r3 X5 OIsIrreducible(Z!b) ; 可约吗
    IsPrime(Z!a) ;3 b+ n- S( u9 R# s6 q

    " D; r6 f9 G2 L0 bZ!a gt Z!b ;6 E8 L% i# H, {. o
    Z!a ge Z!b ;: O+ f. p& g' k: H( G
    Z!a lt Z!b ;
    - m  x5 X; q8 b3 r* p0 ]Z!a le Z!b ;只有同类环才可比较元素大小,
    Maximum(Z!a, Z!b) ;$ g  ]4 M4 X3 s/ X" J
    Minimum(Z) ;
    - s- Q2 I% N, b( z. Y9 ^- y' {! z6 Y: U0 z
    Maximum(S) ;3 {4 Q- I4 }+ J" G
    Minimum(Z!a, Z!b) ;; x1 G' @% W# ~( z+ g8 a
    Minimum(R) ;7 C. g- B$ {3 b2 I5 m0 S0 X( t
    % k" W% z$ |' U& y: _3 N$ L
    . t( V1 P! N) Y9 j2 E+ i4 _

    0 g5 f5 e/ j1 xInteger Ring
    ; v7 n( s" U" K+ Q- T6 }2 @6 nResidue class ring of integers modulo 12  s8 f, `8 v# A/ ^* O
    Residue class ring of integers modulo 13
    & N) X  P  l1 q% b5 TResidue class ring of integers modulo 12
    - R, f# D$ @5 e9 x5 `- I, }Residue class ring of integers modulo 12! d, n+ S* g6 J9 j& F0 Q
    12
    " D& ^; y: M6 u, _, w12/ i# s3 V# b4 A) y* k; b
    false
    : r+ K2 x$ I8 |false
    2 a. A" m; m1 k4 E' xtrue
    6 `) O" r: n' y$ g, P; T6 W: T% s& htrue
    . `7 a4 ]8 w- @" Etrue2 N* _  z9 I# M9 B5 A4 a0 a4 t
    true
    6 }" }: C5 M( Z5 `, V$ y4 Zfalse3 |/ A# [. t- T) k5 O; E& _' N
    true/ a% W6 }6 j- j8 o
    Residue class ring of integers modulo 126 `4 L( @0 e, C4 |
    Residue class ring of integers modulo 13
    7 W6 H9 ^5 Q9 W% {: XRngIntResElt( }3 u% d4 f& t! U! v" Y' G* g
    RngIntResElt5 D+ }, u! h' t
    98 W+ u* H  ]: M* p+ F8 s
    120 Q3 u! ?6 s/ h- w& _
    0
    : X( s+ L- L: r* F' i( e8 D0
    ' A4 N) U- H& M) ^  w% s! s6 E4 ktrue
    % h& \* l# r0 \, z) i: Sfalse6 l7 B9 S7 h& N9 v- x! ]. s0 P* h2 k! M
    false
    2 i% P3 I$ z! j/ D) U0 \) y% j( r% Ltrue
    , y- J9 U0 G+ j( z; w% cfalse
    . l8 {3 i( R; O) x0 Y$ U( Qtrue
    ' h6 L  x2 X; y5 k0 _6 Cfalse
    5 H1 B2 F3 c! E$ Rfalse3 X* ?- p. K; z  K
    false
    0 I/ H/ ]- m. [; K2 Bfalse
    3 C9 e1 V: A  t8 C" etrue
    ( k$ m7 p% W- r+ g, s( ]( r- utrue
    ! Y' H* I7 k: ~12
    ' n' j# o7 G" |* H5 x1+ Y9 d: j! U5 @. v9 C) y; y6 B
    , h* G- y+ _. A+ c6 ]
    >> Maximum(S) ;* H8 v, x, H' D3 I6 |! x
              ^
    7 k# C# o% b; j# ]! H; rRuntime error in 'Maximum': Bad argument types4 N( {# a$ K  X, x$ ~2 u
    Argument types given: RngIntRes
    & F" @& K3 H4 c, G; K
    - ]0 A+ s! |" k0 a# I9
    3 [% s7 k% X+ t0 k) R8 Y! h1 ]; R1 ^, G
    >> Minimum(R) ;$ o3 ^. u" w9 h9 f
              ^
    5 f5 M1 V6 J2 R" b5 X, vRuntime error in 'Minimum': Bad argument types
      {. V, I! H0 ]: XArgument types given: RngIntRes
    回复

    使用道具 举报

    15

    主题

    4

    听众

    113

    积分

    升级  6.5%

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

    [LV.3]偶尔看看II

    本帖最后由 lilianjie1 于 2012-1-11 15:56 编辑 : I3 F8 x* y8 Y: W" C, ], w0 U
    8 ]% }( ]& I5 p6 o* D- F/ Z
    Z:=IntegerRing() ;Z;   # B$ T* g/ k7 T& g' H; e; m& S+ q
    I12:=ideal< Z | 12 >;
    9 s: V  ?% }$ Y0 gI12;
    ; I% H9 o8 D$ v0 W; vZZ:=IntegerRing(15) ;ZZ;   $ s& l1 w5 k5 J
    IZZ15:=ideal< Z | 15 >;7 B7 Q6 C7 X/ c, h+ ^- p! C
    IZZ15;
    ! V! v  X* P4 G1 f0 c+ A) T. }I12 eq IZZ15;
    $ k3 N! q0 e1 a; u( ]Q1:=quo< Z | 12 >;Q1;
    # v" j( f' b4 J2 a6 P( L6 N- YZZZ:=IntegerRing(5) ;ZZ;   * k; _0 |! f7 r: d- s
    IZZZ5:=ideal< Z | 5 >;) k6 ^4 R9 g) p5 [% w2 m, @1 K
    IZZZ5;: x& V2 q( W( z& j8 ^. O
    ; {/ w1 e% G; u+ c2 ?7 u
    I12 *  IZZ15;            理想和/积/并/交,3 S0 R. i# t/ X1 ?2 `
    理想和是理想对应两(可多个)元素加,# Y$ d5 Z- w' V( z
    理想积是两理想(可多个)对应元素积,
    6 C) w0 O8 X( d; q理想并就两(可多个)理想元素并,就不一定还是理想,2 @$ ~0 a- A( k! @
    理想交是理想(可多个)元素交,理想交一定还是理想,
    1 f. J1 Q. r$ Z- N3 f. Y0 Y8 w* i( T+ @1 m9 ?& T% v  z. f
    理想积是理想交的真子集,极大理想交是理想------J根
    & c' j' u3 z' H4 e' \7 d1 n
    理想商就理想间同态:是必须能整除
    2 g; C6 {: O( r# A  \' lI12 +  IZZ15;
    , i3 K$ t4 Y/ g" ^/ ]) q+ V8 X7 DI12 meet  IZZ15;
    ( x" @- u" p9 Q# Y+ e: Q
    ! P7 H" u) X; n& W$ {/ X' m5 tI12 * IZZZ5;
    . I9 O+ m6 j( c! ^# uI12 + IZZZ5;
    ! }2 \- H/ w3 \. |! r: qI12 meet IZZZ5;5 _  M7 S/ @! u* R- E% ?: w
    I12 / IZZZ5;
    0 H& K  R, g0 m2 {' x, _IZZZ5/ I12 ;( Y; z# I& q; _- v# w0 y
    Z * IZZZ5;
    % @& a6 c# t5 ^/ D* II12 + IZZZ5;% l: Y) ?8 a) U& N0 O! T
    IZZ15 meet IZZZ5;
    ) f0 z6 l! |5 f/ Z3 J5 |) xIZZ15 / IZZZ5;
    Z meet IZZZ5;# W% _. _: E7 W
    I12 meet IZZZ5;
    4 j; u" R) w8 m( HIZZ15 meet IZZZ5;: b. Q4 ^, z2 z! ~/ z' d
    IZZ15 / IZZZ5;: l, M+ Q( |; p! p+ Y( V
    , k4 N. u6 K" P" S8 s' r) U
    I12  subset  IZZZ5;运算后的各种理想互相是否包含IZZ15  subset   IZZZ5;
    : Q% r2 S, \# [IZZ15 subset IZZZ5;# B# \3 [, u( w" m6 @" _5 ]
    IZZZ5 subset IZZ15;

    7 |. \5 K" ^8 ]- ]5 |0 \# C9 nInteger Ring
    0 i# }3 p0 F7 u9 y+ ^' I1 LIdeal of Integer Ring generated by 12! H& T# a$ p- y% `+ B; b$ l
    Residue class ring of integers modulo 15- d  ]0 S, U0 z# r% `3 B7 y& y
    Ideal of Integer Ring generated by 150 h. }# k7 E! S+ E. r
    false/ d5 {7 ~8 r2 g- k1 d4 [& S5 k
    Residue class ring of integers modulo 12
    & }& |; v2 `8 v2 H+ i9 OResidue class ring of integers modulo 15
    2 A& M7 _- |% S7 J3 B4 ]2 r/ z' M2 aIdeal of Integer Ring generated by 5
    " k% a1 `% _) ^; rIdeal of Integer Ring generated by 180
    " R" z. C0 Z5 r( IIdeal of Integer Ring generated by 32 d/ H/ P( W5 B. @
    Ideal of Integer Ring generated by 60* s& ~% c$ b% K- z- g4 U4 ?
    Ideal of Integer Ring generated by 607 @' m1 n/ O9 V1 U8 q- K( Y! J
    Integer Ring" U, X: Z& W$ [0 q4 a
    Ideal of Integer Ring generated by 606 X+ L1 U4 X7 @; H! q1 x5 a

    ; k$ Y" }0 j& D, q$ e) ~9 n>> I12 / IZZZ5;
      W( [! v' t( f       ^6 K2 b2 R/ T) R7 o# ^' K/ z( a
    Runtime error in '/': Argument 2 must divide argument 1.7 z1 \) B1 h6 R2 u  H$ a! D" L8 k, S
    8 u, W: R: L7 ~$ n
    % p% m# Y4 I. F5 v* K
    >> IZZZ5/ I12 ;
    * A$ p) l7 `0 h        ^
    ( d5 Q5 y% i: M& TRuntime error in '/': Argument 2 must divide argument 1.
      O! S' V) v4 N2 V4 W& n- c( B8 V. \
    Ideal of Integer Ring generated by 5" x* t! Y8 h+ x# ^' G
    Integer Ring4 X1 z" a/ i4 ^# Z5 I: Q
    Ideal of Integer Ring generated by 156 x1 q) X7 r5 e/ _  W
    Ideal of Integer Ring generated by 3& T8 d2 x& E/ L; T0 H
    Mapping from: Ideal of Integer Ring generated by 3 to RngInt: Z  ^3 n4 b4 l5 Q* G! E
    Ideal of Integer Ring generated by 5) i1 j" y4 [! e. Y
    Ideal of Integer Ring generated by 60
    # J( h# G/ b$ ?Ideal of Integer Ring generated by 15
    ! j1 o( R  f# E, `  V" wIdeal of Integer Ring generated by 3+ Q- }" I: u0 Y7 f4 M8 u# c0 w
    Mapping from: Ideal of Integer Ring generated by 3 to RngInt: Z: J4 t+ `  Q8 d; r

    * z' q3 C% S3 C- e* S$ J- e; E+ T2 ifalse) J" ]( k, {0 U3 \
    true
    3 N( E$ L8 o& Ctrue& b( c1 j6 |: [' N% F. }
    false
    回复

    使用道具 举报

    15

    主题

    4

    听众

    113

    积分

    升级  6.5%

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

    [LV.3]偶尔看看II

    Z:=IntegerRing() ;Z;   ) t( s  ^$ O6 Q# r
    I12:=ideal< Z | 13 >;
    5 ?9 F9 U7 [& Y3 [I12;
    4 d; a  o& ~; X% N5 N& o0 EZZ:=IntegerRing(60) ;ZZ;   
    : l# A# E& m% ]6 J) H8 O0 i. RIZZ15:=ideal< ZZ | 31 >;
    9 i, d) G2 X. F6 V) ]; iIZZ15;! s# i9 D0 r+ B; d% T' X+ i$ L
    ResidueClassField(I12);
    " T# l1 O7 h# j3 Q9 Q5 _. \ResidueClassField(IZZ15);环和极大理想的商构成域---剩余类域,剩余类环中的素数都是极大理想

    ! U) G1 m  Z* Y7 P+ r& R! mloc< Z | 19> ;
    6 \& n; S+ x; Z* |+ h9 O( v3 Iloc< Z | 17> ;
    . {! d+ O2 i/ P" W/ d! u2 V* ?! S6 ~/ iloc< Z | 131> ;局部化:一个素理想到原环元素的映射
    & [6 x: M4 ~9 a1 I3 i2 @2 |4 d
    ext< Z | > ;超越扩张到一元多项式: [0 ]9 l0 `1 U+ i1 w. m" \
    ext< ZZ | > ;
    & u) u. b9 R5 g& m7 Y8 [# m1 ^8 O0 E  r  H. A5 N- Y( a
    ext< Z, 2 | > ;超越扩张到多元多项式
      D" }: G) @8 g) J3 Q2 g3 h6 }0 G' i# ^" s+ [
    ext< Z, 3 | >
    Completion(Z, I12) ;" z1 l# z) D, u8 r

    3 T: j2 ^6 @/ A! ^7 _
    6 x- N  ]  ~, D. Z2 Z. t' rcomp<Z |I12  >;
    2 z4 q0 \2 L- ]' b* r3 J    素理想零理想完备化,和P进环联系起来 ' B* k) K7 ~  A; Y. g% E
    Completion(Z, 0) ;
    4 p5 M- I! l* Bcomp<Z |0  >;
    " s) i  h, ?" Z$ ]
    / j' j2 O5 R8 jInteger Ring/ x1 l  l9 |8 `* K6 I3 O! s
    Ideal of Integer Ring generated by 13( O# B$ p3 M6 A( A2 U- H: J
    Residue class ring of integers modulo 60
    ' ]( T/ y5 v+ S" [$ D9 E7 qResidue class ring of integers modulo 60
    $ T; U' p/ V) jFinite field of size 13
    ! x! y2 `! ^: z2 X' x1 L) G" B/ xMapping from: RngInt: Z to GF(13)
    3 y+ D7 b$ k9 ]/ @. T6 A5 bmodulo 13 9 f- j* }2 D1 }

    / ^. D+ q: l5 s& ]' U>> ResidueClassField(IZZ15);
    2 ]1 n! J; R8 F# ?! O                    ^
    : o+ B3 q, ~8 t/ Q( p6 LRuntime error in 'ResidueClassField': Bad argument types
    : W3 |+ Z4 d" [  ]/ K  [' mArgument types given: RngIntRes3 U* V! P4 Z: M7 _- E
    / I5 r& Y/ r9 g- V! A1 A! j
    Valuation ring of Rational Field with generator 19. R/ X0 E3 I+ x/ e
    Mapping from: RngInt: Z to Valuation ring of Rational Field with generator 19* t% m- g. p0 e
    Valuation ring of Rational Field with generator 17! i! }0 Y; G% O/ l2 |" U
    Mapping from: RngInt: Z to Valuation ring of Rational Field with generator 17
    * p% }! @" N7 EValuation ring of Rational Field with generator 131( s; }+ O4 J# x7 o/ |5 V: U
    Mapping from: RngInt: Z to Valuation ring of Rational Field with generator 131: B& j" L6 |& n8 v' \: I  o
    Univariate Polynomial Ring over Integer Ring* c& Y$ w* _4 r
    Univariate Polynomial Ring over IntegerRing(60)
    6 @& P! B' {0 }% e  ^( D, p. e" D! F2 J; z) Q( ?4 d" g
    >> ext< Z, 2 | > ;
    4 C% l: X2 j( |) ~      ^
    ! Z8 g9 p5 a) {0 YRuntime error: This constructer is no longer supported; e, O5 N6 S1 O
    ! }) }6 v0 p$ N- ^2 G3 g

    6 d( E! |+ `& N" L2 m0 Q, A# E7 C, `>> ext< Z, 3 | >
    2 A( i  t* i! E3 y" K      ^
    5 x) _3 j2 U. }% u) Y* n/ f; gRuntime error: This constructer is no longer supported
    : ~5 x9 D' \) v$ @: V' _  f8 `, w$ }
    13-adic ring; m- u! ^3 a- H; G) t7 H
    Mapping from: RngInt: Z to pAdicRing(13)0 d$ U/ s/ n3 G9 c, C. H' Q6 v* {( w, ~8 Z
    $ O9 W- a) e( z" ]* I' Y
    Completion(
    ; }4 g  v' W9 X, s: b' _8 D    Z: Integer Ring,
    $ N7 s  G; e3 L    P: Ideal of Integer Ring generated by 00 L* `6 }& @! t) y7 H0 ^+ c- U
    回复

    使用道具 举报

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

    fastpost qq
    收缩
    • 电话咨询

    • 04714969085

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

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

    蒙公网安备 15010502000194号

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

    GMT+8, 2026-11-1 13:54 , Processed in 0.268325 second(s), 86 queries .

    回顶部