Changeset c91fefd in git


Ignore:
Timestamp:
Nov 8, 2005, 7:17:25 PM (19 years ago)
Author:
Hans Schönemann <hannes@…>
Branches:
(u'fieker-DuVal', '117eb8c30fc9e991c4decca4832b1d19036c4c65')(u'spielwiese', 'b21a664aa22dc6e196223af8a74ad4885e83547c')
Children:
120c517824adf0e2f616cd70afef52a65d2683a7
Parents:
09171bdbde9e017eae7fe839e8512982e2f9d70f
Message:
*lossen: new lib, more examples


git-svn-id: file:///usr/local/Singular/svn/trunk@8794 2c84dea3-7e68-4137-9b89-c4e89433aadc
Location:
Tst/Short
Files:
3 edited

Legend:

Unmodified
Added
Removed
  • Tst/Short/equising_s.res.gz.uu

    r09171bd rc91fefd  
    11begin 640 equising_s.res.gz
    2 M'XL(""7Y@$(``V5Q=6ES:6YG7W,N<F5S`.U<>V_CN!'_N_X4O$6!M2/)9SXD
    3 MV9LZ@.TD[?9RB^OFT!98;!:R)2="'=MGR8G40[][9X8213]RM]W>`47/P4:B
    4 MR.',C\-Y4!&YM]]?OGW'&.,7[.;MF+W*L[R[2*>OSENW58NX8%#Y*5VF>;MS
    5 MWL([N[A@R0_;-$N7]Y^R[C)Y[F9YE)LNLF)6T^QQ5!?LZU_VQ[#VN\":'?Z,
    6 MHVG)KHKH<;U(,D,==-D&X+'-L.>V"[?LN''6P`POV'JU*-E\R`KAE;)IZ</P
    7 ML[=Q$BW:<U`)2,1?)%ZN'M-HP>)DGBZ3F(T^_8.A`K:+:)/F)5%^X!_?M(#)
    8 M)R@,"UT2'X>E:,'-:A&FJ2AU40*5-"`&%QK\>P0_<L?NQ+UTK]QK=W\@O%<-
    9 MY'I(XW!&A3,NG4DIG,NB=*X*X5Q;H^,<1W>;;Z)\^]B^=@6,L,9<WVN08_,`
    10 M,$?F`8!.B%SLDE_:Y!.;O&&DD%'=L6=`B5U0\LM`7=MB)E?FR?\X]-3$N12F
    11 M)H#V!FX(3^(7'A$XR3_2Q8)M&LV38Y@GO[;.QCP7UJP&QCR+T"E#IUUX9>=.
    12 MG!4")A8NZAQ=X5WRG*^6;+E:>G%RGRP3T&!B>(")Y]'V4Y*1'0MN&L#"%VF6
    13 MLV^&MJ%;%IYF+["NO:'V_<KT68I<L-ML];C>YDG\E1$&EOP4IX_M+(_;WX!6
    14 M.QV"KI%9J$1OAU#L$GZ:IP5K">,@@J,VF7D4W:.JLK5TJ"$A=S4D3`/,U6<H
    15 MI^'(OC*J>4HVF0X2J\UCE*=`]YSF#RS?I$]=EB4SK$+"X>?\U%SQ=Z)U>Z#\
    16 MRG'8"D2SVW4R:T\^Y!^_SN]$Y[/E')<*<2[-'I*X9:O:/S*AMNZ"(_/8$LJT
    17 MA[8?B#Y-7%!ZLE"E\N#B.Q*F+L1BX`@H]KV2]Z@T@!)'\^<]*$&XX_*<X10K
    18 M-MU$R]E#$_[%P)[;.E.T?&-OLG>:XY?F6/+#.;95!_'ZF_/=7"<*O_0]4808
    19 MGP:E26\"YE8Z<,'&ODEU4`&3W:_H((A"GRHG0K@N>*]5!VI/3S:O)UQ;AS8,
    20 M;125030&I$T'1+3J^!X4T$45T`,N`^B&';@H)/10</7I&C@!C$)WZH-DW@.+
    21 MXUS3(@0N`80C.`@,'!X0$-XG)+Q']@D\52D]G[`$9,U%L)O[_]<U)4A5@G0E
    22 M2%FBTI8B;2G2EB)M!3O:*DA=M6ZUPHI*8U)K3&J-2:TQJ37FD\9\TIB/&@LU
    23 MUP%-7#5GJM!1@-B*9L[H&M+,56KA/3UW"(-K<M0(3I[4DQ?JR>OKR1OHR6O&
    24 MZ-,8`Z.;VNQ-4F^RNH1,8<JT/OU5EKXR.+[T_3[)(%C\-=D\1(L\6;)T2;%I
    25 M]I`F,82M)7L/,01NAD_89>O-:H:+_C:M`>*.:8-0_*-Y&'09<,M9:H:J.%1!
    26 MP&NG0WZ>_F&8I?],VG'G/'4<PT/)+L(R;)3?U4"3(IE!7&O'']*/G89E6#6;
    27 MBD%5H1<_;,AH^F5E;,HAYX$:\`&X]M%AT+X*F&B\]M"G>+/<]7EW7V6_L^7Y
    28 MJFHG7=P,=6"G;%!3!!4%!'OV73&\`1=N&OM58Y;DM)K[KC!M0<\>RC4,Y3K[
    29 MP%VK=R#VP9F6'5A7V0W>AO8:N0$8U``U&422<XM1#3"=LW9>KI/5O%W105`?
    30 M#E^A@%<=0Q_6H']LJAJ4>I5W=0M0#!-4A_8*765PA?48_F5J:J3)(C-KL+!&
    31 M:&RFWS,"4>?OAT;6KB"C]/?G!FQ?[`OMUS!6:TS*[4T2WXX;[?6-]FZ'F.RN
    32 M;JVVOFDS=0,`9\JUL!\(Q@^H%HNR%FSF/WV,UNWO"M>:O$%@L3-SE5U5V=^:
    33 M9]YK)/->+9GT<>,V9L=[RF[ZH:D/+$NHWF#;[SN='S4AZ/!?AK1OLS"QCG,]
    34 M,8:.`XKF09I`R#E@T`X%HWZE7W.@U+R&OW*MZG;/C3K-&SI[3)>DLB&+[B!J
    35 MG[]R#5_?6`;;9<#R-N]V5:=S7$1H51MFP7%FG+M1FW=>0`0M^Z#"XWRD2YCZ
    36 M-J9&E7WZNTO[!N:WU[JZQ77!"'AC$=]KVX**$HN2BOB>V594]+'H4S'`8D#%
    37 M$(LA%?M8[%-Q@,4!%3$M@HR>?M`"M41.(KF6R4DHUU(YB>5:+B?!7(OC))IK
    38 M@9R$<RV2DWA>"24`0@L5A$!4PR0$0@L5>M!:J"`$0@L5A$`$'0_&K`<M"(?0
    39 MH@7A$%JT(!Q"BQ:$0U:B"8?4HB7AD)6."8?4HB7AD%JTU.K70B7AD'KPDA`H
    40 MS5H2`E6Q)@2J8DT(5,6:$"C-6A$"I5DK0J`T:T4(E!Z<(@1*#TYI$]"#4]H(
    41 M-`)%"'R-0!$"O^)&"/R*&R'P-3>?$/B:FT\(`LW-)P2!YN83@D"/QR<$@1Z/
    42 M3PB"RB2U(>KQ^(0@T`A\0A!H!#XA"``!Q]>-LS/VM]'[=V_?_?$-&RWN$WB'
    43 M2V>P5("53(;O5*LYNT^?8/EROUEMES&\JB2+F"U7.<34+$NGB^2KFDT"[UXE
    44 MRU>0,IZ2Q6K-\@=XAVO>Z%PVW>88^_*'A"V3),:5#(LTRXJ))7@VVVXR%F_)
    45 MG;'++%K,X%T,4XC+GO%Y23A@+87,\.VOXD+4J\TFR=:K98S]ZU?3[LG53Z[^
    46 MVW/UWZ*CG\+;*;R=PMLIO/V?.CH_N?K)U7][KG[*ZB=7/^;JXDP[.]Y/[OY_
    47 MX^Z_16<_A;A3B'MA-1,>KF;Z=G@;6.&MCFA]*Z)5X4W8X4W:X4W9X<VWPUM@
    48 MA[?P%-Y.X>V+PUO]`690?<N_,=]D<`/:K_+UG@NNO]XGF6=O&0+MI@`SWLY0
    49 MD_8.TX)+IY`>[M]P9%$*PT@TWP"%K'<0ZD]K]291_:UIW0Q+79A/D)<2OY;+
    50 MR25^,(>[N"QXSY%C?.[AAW-G(HN!$XPGEW"3(ZB'VW@BBC[<@+ION.*G."<8
    51 M`2$T(9V'UWZ)=),BA,[0*P2*\27>D,[#:U@Z8UD$V#"!FQP!U\!PQ6]RB`N[
    52 M8$</RT'IX4,`O$=C4?C8:0*W@#@$(VCRL.P#'3SX2"?&A3)<0^)*70$Q,L`N
    53 M6*&PRX1NNN,EE(4SDH5$A(4",(7O85$"#5(:KGV-%1H$"H0>$CIX6!2(&!JP
    54 M1E`SS&8PHND<%;A'P9I<:_,QQUUKNU_Y7]H'V_M%-ZQRW`VW]]W9^`KN!MO[
    55 M%(P[P'X%1Y&RVN;R\YZ"6UUPZUH.SOX0;:)9GFS2+$]GAI<R.VS!03BO/21R
    56 MI]I'VO$:$CNX"F1ZN#9?VJ7?>`QKEUY4>-.SXDYT[GRON..B(0PNZIVO,7TZ
    57 M]D:=L\@#4=P9.R/H<3;U>$,>7NA](&=$>>>?&;H[OZ'J:RH:;M*^=G%;0AIW
    58 M+'S_G9&,QLKSQSX8ZE@Z:JP<`5X%3NF-QHX/)7\$KK&SRUI`HX0>/I2$)["?
    59 MA'[PY&%7:AY1`SH5D#D6`\Q>6*O&OJ.@A*30"07#HP</Y-8@&A\<X('-(X"X
    60 M8[)J#')\P*H\XB*@OX3^/C$`1`!`06<<@1R!-'O[]\CW"+YR8.PC'#71RX/1
    61 M0@X=!TB+\"2-4WCC0W=1/^$NBA]L$^/JU_$7)9MM83S+V6H3)YN7G*>KC=IL
    62 M#N)*[>Q!U^ZQMQ.=*_\G=J(W5($YA3!W1F?E69S.Y^VY6W2<\5EA/4WJ<MG8
    63 MLPJK_>C?#O>/)M04X!/?OFSF1X\C3&P3WC7'(_,)+K4K/6BD^S#9Z(3?ZNU.
    64 MT%`)T*P%.E!+<S:9VC]B!/Z7&('I+)O4C[O6$GW<I0D$=%*%]O:9*C;?K!Y!
    65 MM5-FG]5I7?U]].UW-U>D`=SBMQZNP0SR!2[<SK&R>1QRJK#7&1@_9V[L)N[<
    66 MO6^.HS!KHU.[P"UYI8.)SN\X4>%,2V<&E3%4)E`[AV1Y7RCJI6?^8'<;M%3Z
    67 MKM1]K]4]UYJ>MB@L1*WJ>,?,4;&G$B>&*#!+6GNCD'H#."@H3K/U(BHS%L5Q
    68 MBNZ!P7MIG*5%N<>V0<;H#,'5K9?96[#_\F%'#Q_9U^P/.S47=V)_3_>?WL&L
    69 MK2-:X6*]=^SG8$LV_(X7J^?MFMWFR9IQ.F*Q2'+=;#>)EYOD;A.OEL0'DJX6
    70 MZ6.ZU'$CRZ--GKUY`>DQG*MM#@/%@//:*/$U[J6/]"S/5C!VR-%@3*LY,:Z<
    71 M%?[A_CA*I;0WK5[U[V^#K^;`[BI>Z+H&]`CEY]DT/\\/R29A$;@M]GC<+O(4
    72 M?:S:T`_CV"2TQQ_6Z`8"R>^]&)NF=AB*[#`T\V(GL7/<O9VRYL=BVKW-;&XS
    73 MBSVQPVOF)3:WJ9WA(BO^40P@Y;V%8<R]>>0FSI3<K]G5B,'O;6?7QVDSX\:M
    74 M7'77=T]V?[+[Y$6[U\$:(O6![?^DN2<[YKYCZSLG_9*73)WMI`1X03;I%)8X
    75 M=3IM%G5-/FWJ/B.A[J?*STJ0I72FA4\T>ZO*WJZ#4JD==?YC!SU8K#98CRW^
    76 M:D;'%WU&S$\O]EX>CU6'RSR<+E"V/CM8+5HQR>HL6^=6S*B\F;3@PEH#T2$N
    77 M>P5$%3\_74<."/_,R(\<G#S86TZC^5OTL'B='3\IB:+-T:IJ?8-':CPZB"*=
    78 MH,"C#KP('*[*0"]\\!2$\`)J%]@>%H%>"^%Q4*\H?;TD*D*])BJH(_A`&;9:
    79 M[."PZ>Y0%1VR<`+Z:X4J0`2=M1`E]^G@3>!`,72*4D"+4$XI>_#+7U3(P>&Q
    80 MH*^U@E%I$>7PLLZRA]5V$;,IA2F8K'R%:K'.8T(?,]MA,]N:HIEL_?S9KCF4
    81 MHM>3.UJHU=`NE%<JW.!=\!XU6&B4:-#TF[WN_N`+#OW4G?&,",;3T3+&`/PN
    82 M>DR6;+X%Y?P5K"6:+N#1@?QYQ>Z3^V2:+$U';A]N?W:?[#/A/!#FG>U9>$]\
    83 M,#C7'I:EI$'[T'K=15[49V`>EB9;UP?@WZWPCRS+^P03"\E=)K,DRZ)-Z;)-
    84 MDF\W2_84+;88/W?2?=?P5S7_G4,VB.EQM<H?V#3*`-@Z@L4[5&Z2*"[?L.\_
    85 M<18M8[B#\K'^M>[[NA*:Q%6*=5D6E>S&17SSU79#(+,N>[MD>&"'$EB6K\!!
    86 MJ_0;90Q6_)NT8-?9&P;A*-*9#A/G*@=K)"AU'H6U07IXYM/=9_7G?596OV9\
    87 M!]W>0[>L_&=YGR;4ZQI:5C%PZR+E]RL6S5#9B`1XQ%$>N0S/\NA$9Y]+LL\A
    88 MZ637OLXZ=?'/3?$]%(TY!Y#_:B[V\28>0(P]/-G$@]#82I5D;IJ7Y:!O_A)0
    89 MG7?R\$M4O^/HV]ES\U>#8'#\Q=_F%\++]\Z?PNJW<"!Y!D]]N@/S-KSOS`MX
    90 MR/??Z&VFX@N9UB<`;_#,C=N\VH=?\K]>F,Y^\VH?!E8YM,K]+OU''?@_<6RS
    91 /-N^<_[[U;ZI'C9;>0P``
     2M'XL("(WK<$,``V5Q=6ES:6YG7W,N<F5S`.T\:V_;2)*?3[^B)S@@DDDJZ@=)
     3M*1X9D/S8S8X3S-F#W0.".*!$RB96EC0B99,[V/]^5=5DL_5P)IN;`18[,FRQ
     4MV5VOKJY'4^SR[4\7[SXPQO@9NWXW9J_R+._.T\FKT]9M-2+.&'1^3A=IWNZ<
     5MMO#*SLY8\O,FS=+%_>>LNTB>NUD>Y09%5L1JF!V*ZHR]^6U_#&F_"Z39_L\X
     6MFI3LLH@>5_,D,]!!EZU!/+8>]MQVX98=-\X:,<,SMEK.2S8;LD)XI6Q&^C#]
     7M[%V<1//V#%0"'/$/@1?+QS2:LSB9I8LD9J//?V>H@,T\6J=Y29`?^:>W+2#R
     8M&1K#0K?$IV$I6G"Q1H09*DK=E``EC1"#,RW\#0H_<L?NN7OA7KI7[NY$>*^:
     9MR-60YN&,"F=<.N>E<"Z*TKDLA'-ES8YSG-UMOH[RS6/[RA4PPUKF^EH+.38W
     10M(.;(W("@YP0NML$O;/!S&[PAI)!0C=@S0HEMH>2W"75ELSF_-'?^IZ&GSIT+
     11M87H"&&_$#>%._,8S`B?Y>SJ?LW6C>7(,<^?7UMF8Y]Q:U<"89Q$Z9>BT"Z_L
     12MW(F30L#"PH<Z15?XD#SGRP5;+!=>G-PGBP0TF!@:8.)YM/F<9&3'@IL!L/!Y
     13MFN7LAZ%MZ):%I]D+I&MOJ'V_,GV6(A5$FRX?5YL\B;\SS,"2G^+TL9WE<?L'
     14MT&JG0Z)KR2RI1&\+4&P#?IZE!6L)XR""HS:9N17=@ZJRM;2O(2&W-23,`*S5
     15M5RBGH<B^,ZIY2M:9#A++]6.4IP#WG.8/+%^G3UV6)5/L0L#AU_S45/'O7.MV
     16M3_F5X[`EL&:WJV3:/O^8?WJ3WXG.5_,YS!7B7)H])''+5K5_8$%MW04'UK$E
     17ME!D/;3\0?5JXH/1DH4KEP8?O2%BZ$)N!(Z#9]TK>H]8`6AS-G_>@!>&.RU.&
     18M2ZS89!TMI@]-^!<#>VWK3-'RC;W)WG&-7UICR??7V%8=Q.L?3K=SG2C\TO=$
     19M$6)\&I0FO0E86^G`!P[V3:J##ECL?@4'011PJIP(X;K@O58=J#V]V+Q><&T=
     20MVC"T450&T1B0-AU@T:KC>U``BBH``SX&@(8(7!02,!1\^O09.`',0B/U@3/O
     21M@<5QKF%1!"Y!"$=P8!@X/"!!>)\DX3VR3Z"I2NGY)$M`UEP$V[G_WUU3@E0E
     22M2%>"E"4J;2G2EB)M*=)6L*6M@M15ZU8KK*@T)K7&I-:8U!J36F,^:<PGC?FH
     23ML5!3'=#"56NF"AT%B*QHUHP^0UJY2BV\I]<.Q>`:'#6"BR?UXH5Z\?IZ\09Z
     24M\9HY^C3'P.BF-GN3U)NL+B%3F#;M3W^7K:\,#F]]?THR"!9_3=8/T3Q/%BQ=
     25M4&R:/J1)#&%KP6X@AL#%T`F[;+5>3G'3WZ8]0-PQ8Q"*?S$W@RX#:CE+S505
     26MARX(>.UTR$_3[X=9^H^D'7=.4\<Q-)3LHEB&C/*[6M"D2*80U]KQQ_13IR$9
     27M5L.F8U!UZ,T/&S):?ED9FW+(>:`'?``^^^@P:%\%+#1^]M"G>+/=]7EW5V7_
     28M9?/S535.NK@>ZL!.V:"&""H("/;LQV)X#2[<#/:KP2S):3?W8V'&@IX]E2N8
     29MRE7VD;L6=B!VA3,C6V)=9M=X&=I[Y$;`H!90@T$D.;4(U0*F,];.RU6RG+4K
     30M.`CJP^$K9/"J8^##6NA?FJY&2KW+N[P%40P15(?V"MUEY`KK.?S3]-22)O/,
     31M[,'"6D)C,_V>88@ZOQD:7MN,C-)O3HVP?;'+M%^+L5QA4FZOD_AVW&BO;[1W
     32M.\1D=WEKC?7-F.D;@'"F73/[F<3X&=5B0=:,S?JGC]&J_6/A6HLW""QR9JVR
     33MRRK[6^O,>PUGWJLYDSZNW<;L>$_90S\W_8%E"=43;/NFT_E%`X(._VE`^S8)
     34M$^LXUPMCX#A(T=Q($P@Y!QFT0\&L7^G''&@UC^&O7*N[W7.C3O.$SA[3!:EL
     35MR*([B-JGKUQ#US>6P;8)L+S-NUW5Z1QF$5K=AEAPF!CG;M3FG1<D@I%=H<+#
     36M=*1+,O5MF1I5]NE[E_8UK&^O=7F+^X(1T,8F/M>V!34E-B4U\3FSK:CI8].G
     37M9H#-@)HA-D-J]K'9I^8`FP-J8EH$'CU]HQEJCIQ8<LV3$U.NN7)BRS5?3HRY
     38M9L>)-=<,.3'GFB4G]KQB2@((S520!**:)DD@-%.A)ZV9"I)`:*:")!!!QX,Y
     39MZTD+DD-HUH+D$)JU(#F$9BU(#EFQ)CFD9BU)#EGIF.20FK4D.:1F+;7Z-5-)
     40M<D@]>4D2*$U:D@2J(DT2J(HT2:`JTB2!TJ052:`T:442*$U:D01*3TZ1!$I/
     41M3FD3T)-3V@BT!(HD\+4$BB3P*VHD@5]1(PE\3<TG"7Q-S2<)`DW-)PD"3<TG
     42M"0(]'Y\D"/1\?)(@J$Q2&Z*>CT\2!%H"GR0(M`0^21"`!!P?-TY.V-]&-Q_>
     43M??C36S::WR?P#)=.8:L`.YD,GZF6,W:?/L'VY7Z]W"QB>%1)YC%;+'.(J5F6
     44M3N;)=S69!)Z]2I8O(64\)?/EBN4/\`S7/-&Y;++),?;E#PE;)$F,.QD6:9(5
     45M$8OQ=+I99RS>D#LCRC2:3^%9#%.(RY[Q?D%RP%X*B>'37T6%H)?K=9*MEHL8
     46M\>M'T^[1U8^N_L=S]3^BHQ_#VS&\'</;,;S]ASHZ/[KZT=7_>*Y^S.I'5S_D
     47MZN)$.SM>C^[^'^/N?T1G/X:X8XA[83<3[N]F^G9X&UCAK8YH?2NB5>%-V.%-
     48MVN%-V>'-M\-;8(>W\!C>CN'MF\-;_0)F4+W+OS;O9/``VN_R]IX+KM_>)YEG
     49M'QD"[:8@9KR9HB;M$Z8%ETXA/3R_X<BB%(:0:-X!"EF?(-2OUNI#HOI=TZJ9
     50MECHSKR`O)+XME^<7^,(<KN*BX#U'CO&^AR_.G7-9#)Q@?'X!%SF"?KB,ST71
     51MAPM`]PU5?!7G!",`A"&$\_"S7R+<>1$",F"%`#&^P`O">?@9ELY8%@$.G,-%
     52MCH!J8*CB.SF4"U$0T<-V4'IX$P#MT5@4/B*=PR4@"L$(ACQL^P`'-S["B7&A
     53M#-60J!(J2(P$$`4[%**<TT4C7D!;."-92)2P4"!,X7O8E`"#D(9J7\L*`P(9
     54M`H8$!`^;`B6&`>P1-`RK&8QH.4<%GE&P%M<Z?,SQU-KV6_Z7SL'V?M,#JQQ/
     55MP^V\=S:^@J?!=EX%XPFPW\%1I*R.N?RZI^!1%SRZEH.S/T3K:)HGZS3+TZFA
     56MI<P)6W`0SFL/B=R)]I%VO(+$#JX"F1X^FS?MTF\\AK5++RJ\R4EQ)SIWOE?<
     57M<=$`!F?UR=>87AU[H\Y)Y`$K[HR=$6"<3#S>@(=G^AS("4'>^2<&[LYOH/H:
     58MBJ:;M*]</):0QAU+OO^?D8S&RO/'/ACJ6#IJK!P!7@5.Z8W&C@\M?P2NL77*
     59M6L"@!`P?6L(3B"<!#^X\1*7A$0V@4P&88Q'`[(6]:NP["EH("DC(&&X]N"&W
     60M!M9XXP`-'!Z!B%LFJ\;`QP=9E4=4!.!+P/>)`$@$`BA`QAG($7"SCW^/?(_$
     61M5P[,?82S)GBY-UO(H>,`85$\2?,4WGC?7=07W$7QO6-B7/T^_J)D<RR,9SE;
     62MKN-D_9+S=+51F\-!7*FM,^C:/79.HG/E?^$D>@,5F"J$F3,Z*4_B=#9KS]RB
     63MXXQ/"NONO&Z7C3VKL#J/_GZX6YI00X!/O'_9S`^6(YS;)KQMC@?6$UQJFWO0
     64M</=AL=$)W^OC3C!0,="D!3I02U,VF=H_8`3^MQB!099-ZL=3:XDN=VD"`56J
     65MT-D^T\5FZ^4CJ';"[%J=UN7_CM[_>'U)&L`C?JOA"LP@G^/&[10[F]LAIPY[
     66MGX'Q<^K&;N+.W/NF'(59!YW:!1[)*QU,='['B0IG4CI3Z(RA,X'>&23+^T(1
     67MEE[YO=-M,%+INU+WO5;W3&MZTJ*P$+6J\HZIHV)/)4X,46":M'9F(?4!<%!0
     68MG&:K>51F+(KC%-T#@_?".$N+<H]M@XQ1#<'EK9?91[#_Y^.6'CZQ-^S[K9ZS
     69M.[%[IOO/'V#55A'M<+'?._2S=R0;_L;SY?-FQ6[S9,4XE5C,DUP/VT/BY2&Y
     70M/<2K+?$>I\MY^I@N=-S(\FB=9V]?D+3&N$D>02$LVZR2]6R^66XR-#:B\"+N
     71MEV>[W.2@+@Q;K\U2O,83^9&VE2E0QDP/)KF<$8O*Y>$73]E10J83;O6SP^YA
     72M^FHE;53Q`NH*=("B_#J9YN?Y(5DG+`+G1XS'S3Q/T5.KL@"8QSJA2@'8Z1L1
     73MB'_OQ0@WL8-99`>SJ1<[B9TI[^W$-SL4&>]M8C.;6.R)+5I3+[&I3>P\&5E1
     74ME"()*>\=3&/FS2(W<2;DQ,W92`RA[SK;D8*.1*[=RN&W(\#1>X[>\]MX3_*B
     75M]^C$`5ECSX.^Z#3)EM-L><Q6U6'RDL.PK?0$#^LFM<-VJT[MS0:SR>U-WU<D
     76M]]VT_57)NI3.I/`)9F>'V]MV<VJUH\Z_[.9[&^=&UD,;T9K0X0VH8?/EC>?+
     77M\['Z<,N)RP7*UG6,U08:$[[.^'6>Q^S.FT4+SJS]&!64V;LQZOCUY3I0K/PK
     78M,S]0Q+EWSIUF\[?H8?XZ.URUB:Q-F5>UU\+R'H^*8J03%%AVP8O`X:H,]"8,
     79M*S*$%]"XP/&P"/2^#$M3O:+T]?:L"/7^K"!$\($R;+787N'K]E05%7PX`7US
     80MH@I@074?HN0^%0$%#C1#IR@%C`CEE+('?_Q%A>P5L@5]K16,2O,HSV%ULX?E
     81M9AZS"84I6*Q\B6JQ:D,!QZQVV*RVAF@66]]_M6L.I>CUY)86:C6T"^65"@^;
     82M%[Q'`Y8T2C32])MS]_[@&PJ0:F2L5\%X.EK$&(`_1(_)@LTVH)R_@K5$DSG<
     83M.I"%+]E]<I],DH5!Y':A_;/[9->G\T"8Y\=GX3WQP>!4>UB6D@;M`OH:19[5
     84M]3@/"Y/SZV+\#TO\PF=QGV!B(;Z+9)ID6;0N7;9.\LUZP9ZB^0;CY]:FH6OH
     85MJYK^5L$/RO2X7.8/;!)E(-@J@@<)Z%PG45R^93]]YBQ:Q'`%Y6/_:XW[NF*:
     86MQ%6*=5D6E>S:1?EFR\V:A,RZ[-V"8?$0);`L7X*#5NDWRA@\?:S3@EUE;]EE
     87MG?\I<2YSL$82I<ZCL,-(]^M/W5U2?]DE9>$U\]M#NP&TK/Q'>9\FA'4%(\L8
     88MJ'41\J<EBZ:H;)0$:,11'KD,ZXITHK-KI.R:*)WLVE=9IV[^I6G>0-.8<P#Y
     89MKZ9BEUKQ`&+L?I45#T)C*U62N6X>W(.^^5:BJKWR\*U8O^/HR\ES\PU&,#C\
     90M)81-+^R=;7\M5W\C`"#/X*E/=V#>AO:=^3(@Y+O?+MA$Q3<2K:L1K['^QVV^
     91M9@B;DD0>?DM)HD$^4'3X_O)/(];SZ_^V84##*@;<T&Z#Z8C&K.^1PGHM9O2E
     92M*I:?0G!C'J/P5@/5BX"%0XUKULS?O*G^O0!8PF.Z.>0'1R_^=_#B?N_L12H&
     93MAEO?LM>ED8VA&3!QR"^-330F\:5G#%IHZW%H"M:0FZ5F[U%'D39@-(X("VES
     94MR'+K?7W]"T](6J?U4X36Z^7M+;$9TK=;C6*J_E,J-FPF+\^^"LO`@^L?K'/D
     95M?8BK5+BY4^3(^QA7L9(7.[5&O3,&&PQE(DT_1-R/S?(02/\$3TLX>!&"(FKG
     96M3K8.]]:$^D1(JIJ2(:1Z>+@`:^L(16.W7AZI"0XL&ZJ":%-EZ>HIO7F#B"XA
     97ML@E&AFBU2J(UOD&ZJBD-ZG^C@TK.-I,,[-QEA.,R$L!K\S?]SHF>4:=9HP'8
     98M,;[*;E.U--9&P^?W0Z7PZCB=7RR2]R!%FG;<-5C9\K$-)M_KX;_',%64`W%F
     99ME;6:7C"#QW2^6*[M:,CLU?##%OS6\,K`DS8J,W'O.UH?>_!^E4IN7,HE[]T:
     100E(TT;(8(FK0S"YLMH+%O%?R&%_R-JDX%V3O^[]7\J0@[2>$H`````
    92101`
    93102end
  • Tst/Short/equising_s.stat

    r09171bd rc91fefd  
    1 1 >> tst_memory_0 :: 1115748645:2005051019:3-0-0:ix86-Linux:nepomuck:5896748
    2 1 >> tst_memory_1 :: 1115748645:2005051019:3-0-0:ix86-Linux:nepomuck:8569332
    3 1 >> tst_memory_2 :: 1115748645:2005051019:3-0-0:ix86-Linux:nepomuck:8892916
    4 1 >> tst_timer_1 :: 1115748645:2005051019:3-0-0:ix86-Linux:nepomuck:3926
     11 >> tst_memory_0 :: 1131473805:2005110809:3-0-1:ix86-Linux:nepomuck:76620472
     21 >> tst_memory_1 :: 1131473805:2005110809:3-0-1:ix86-Linux:nepomuck:80332692
     31 >> tst_memory_2 :: 1131473805:2005110809:3-0-1:ix86-Linux:nepomuck:80480148
     41 >> tst_timer_1 :: 1131473805:2005110809:3-0-1:ix86-Linux:nepomuck:4326
  • Tst/Short/equising_s.tst

    r09171bd rc91fefd  
    135135reduce(F,std(M[1][1]));
    136136kill LL,Px,r;
     137
    137138/////////////////////////////////////////////////
    138 
     139//              MEGA 05 Example
     140ring R = 0, (x,y), ls;
     141poly f = (y4-x4)^2 - x10;
     142list L = versal(f);        //compute semiuniversal deformation
     143def Px=L[1]; setring Px;
     144poly F = Fs[1,1];         
     145list M=esStratum(F);       //compute the equisingularity stratum
     146def ESSring = M[1]; setring ESSring;
     147option(redSB);
     148ES = std(ES);
     149size(ES);    //-> 42
     150ES[1];       //-> 8*A(1)+8*A(22)+A(1)^3
     151ES[34];      //-> 8*A(40)-A(1)^2+A(1)*A(22)
     152poly F = reduce(imap(Px,F),ES);  //A(1),A(22) both appear in F
     153poly g = subst(F, A(22), -A(1)-(1/8)*A(1)^3);
     154for (int ii=1; ii<=44; ii++){ g = subst(g,A(ii),random(1,100)); }
     155setring R;
     156milnor(f);                //-> 57
     157milnor(imap(ESSring,g));  //-> 57
     158kill R,L,Px,M,ESSring,ii;
    139159
    140160
Note: See TracChangeset for help on using the changeset viewer.