Changeset 776b170 in git for Tst/Manual

Timestamp:

Apr 16, 2021, 8:43:36 PM (3 years ago)

Author:

Karim Abou Zeid <karim23697@…>

Branches:

(u'fieker-DuVal', '117eb8c30fc9e991c4decca4832b1d19036c4c65')(u'spielwiese', '4bd32dfef92ec9f5ed8dceee82d14318ae147107')

Children:

986129ee5a55af493e8813adb9aa8685e05d0dd9

Parents:

d647e3d9fa882768ea4ba54fd5e164326ef4e009

Message:

Support ncgen in letterplace map()

Location:

Tst/Manual

Files:

• letterplace_map.res.gz.uu (modified) (1 diff)
• letterplace_map.stat (modified) (1 diff)
• letterplace_map.tst (modified) (2 diffs)

Tst/Manual/letterplace_map.res.gz.uu

@@ -1 +1 @@
 begin 644 letterplace_map.res.gz
-M'XL("!,-ZE\"`VQE='1E<G!L86-E7VUA<"YR97,`99-=;X(P%(;O]RM.S"ZP
-M-$2*J(N19,MN-,LN='>+,5`+P3!'H(L?OWZG%&C9+F@/?9_SGO9`=Q^OZW<`
-M\"-X6[_`2-;2*_)DM`2,#ODYE\YX^:!FB"(HA)2B*HN8B\-77'IG<?%J&<N'
-M76O#&IM16@F1)=JHUX((^GCJ096?,ZA@!1/J7.F-WNEE3(^EX<.H99B&8II0
-M/D1FEN6\M=PBK>H_%YE(JMBI*(1CD[)H7;?L+\<H^!.+?#+F_L2#6DB=V!,^
-M-JW\+FYP\M'K1J[D#B[@:`C6$:K:'0BB1@PZ,4`1/0A8F=,(\J.("]@T(D4+
-M?`(#A-;V9M;VF$'F$>!7@A0=MK1IG]$66LL:C9.8)"1V$Y</*:L'#'N0.AML
-MT.'3WZ\0)]S%!U_9?L6)7E!.:BEH"<W@4N>"/4N=DX\VQJ'36*,QU(9VG1XT
-M>M#E_O.>6KL-/<CLW;9';#UUE."L1JY'E]NGL1/L6"=IHIT;HC]U#]NUNFI=
-;O;XN'YP`?VAU[]2=^JD=[-+C+W/VD"BA`P``
+M'XL("+W:>6`"`VQE='1E<G!L86-E7VUA<"YR97,`E55+;YM`$+[[5XRB'C#>
+M$K,+V*YEI%:])*IZ<'*KHHC'FI`0;`%YV+^^PR[[(+4B]0"[S/?-MS.S,^+F
+M]N?5;P#P8_AU]0,NNK;SJC*]6`/N[LNZ[)SI>M*O$,=0\:[CS:%*,G[_G!R\
+MFK]Y;9=TDYM!A@J9BUW#>9%*(8VQ&/0^\.#R$FYYVX&OC:%G")$'35D7T,`&
+MYL1Y)T=R(F]3DA^,X"(>.%22$I*2;$Q96F>N!LDMLOL`OU<%3YO$:0B$4^WB
+MSP?5+?W(HP11B^D;<9]ZT/)..AH&IGS85T=X]%'KZ+Z[)Y@!O@TC4(S^M!.X
+M2#5@J$"&(&JX8'E&,90Y3RJX%B!!"7R8(2RL\)96>-105C'@-<(.%;9$E$]C
+M="ZQ0F"9F[BIF\S2639F636@6(.=<XT%NO_CWVV0[F8S?/"3WFTR5QIZI=[$
+M!H;DH$FI8,UVSJ./,D9!88'`*&)C.86'`F?*]Q_MR(IVX4%A1SND.&C*78IK
+M_\[D>Y;9V=@.]EXZ2<:P"H;.6I/ML]1IZCQ];C;*P&IHB@W]5%85-/HZ&%Z:
+M-)E+9OY@,WW)J#)9-&L\F36>]!NVP1.']J7A4&<%KZ%L\>MPV#<=S[6+-;SL
+MW/".YI*='5V2CTE6KNRSX27`S%0&G\[O@@"UN%;W!F<G.,"JO/*LVS?PBG+O
+MKJB`XT]=N>`X'P<;E3;:VTZ#C4F;'5Y@'1F>G<H`NQ2KKQ3@:PQSC6'7BHGU
+MSXQLL!2..;0/^Y<JAY1#6=3[AN<$RKKM>)*#BK]757OMOQK$J1$GN98/YR;T
+MT,=9]YU73"SY6!/LVP\5T5[8=SOZWUY69X:R,TV"W0.V9O+,^\`U*>R#PZF&
+M#78`Q<UZHO\R(5870:I`.@(7`F0*9"-P*<!`@<$(7`DP5&!H@]%<@)$"HQ%H
+:-6&$3=C_=_M_ZDN+55E_F?P%;51TE*('````
 `
 end

Tst/Manual/letterplace_map.stat

@@ -1 @@
-1 >> tst_memory_0 :: 1609174291:4200, 64 bit:4.2.0:x86_64-Darwin:hoth.localdomain:538184
-1 >> tst_memory_1 :: 1609174291:4200, 64 bit:4.2.0:x86_64-Darwin:hoth.localdomain:2097168
-1 >> tst_memory_2 :: 1609174291:4200, 64 bit:4.2.0:x86_64-Darwin:hoth.localdomain:2228368
-1 >> tst_timer_1 :: 1609174291:4200, 64 bit:4.2.0:x86_64-Darwin:hoth.localdomain:13
+1 >> tst_memory_0 :: 1618598589:4202, 64 bit:4.2.0:x86_64-Darwin:hoth.localdomain:538120
+1 >> tst_memory_1 :: 1618598589:4202, 64 bit:4.2.0:x86_64-Darwin:hoth.localdomain:2097168
+1 >> tst_memory_2 :: 1618598589:4202, 64 bit:4.2.0:x86_64-Darwin:hoth.localdomain:2228368
+1 >> tst_timer_1 :: 1618598589:4202, 64 bit:4.2.0:x86_64-Darwin:hoth.localdomain:13

Tst/Manual/letterplace_map.tst

@@ -1 +1 @@
 LIB "tst.lib"; tst_init();
 LIB"freegb.lib";
+
+// Test 1
 
 ring r = 0,(x,y,z,w),dp;
@@ -24 +26 @@
 
 g(J);
+
+kill r;
+kill r2;
+kill R;
+kill R2;
+
+// Test 2: make sure ncgen is supported
+
+ring r = 0,(x,y,z),dp;
+ring r2 = 0,(a,b,c,d),dp;
+
+ring R = freeAlgebra(r, 5, 3);
+ring R2 = freeAlgebra(r2, 7, 2);
+
+setring R;
+vector v = x*ncgen(1)*gen(1) + y*ncgen(2)*gen(2) + z*ncgen(3)*gen(3);
+
+setring R2;
+// ncgen(3) -> 0
+map f1 = R,a,b,c;
+// d should be ignored, instead ncgen(1) -> ncgen(1)
+map f2 = R,a,b,c,d;
+
+f1(v);
+f2(v);
+
+// should be the same map
+f1[1] == f2[1];
+f1[2] == f2[2];
+f1[3] == f2[3];
+f1[4] == f2[4];
+f1[5] == f2[5];
+f1[6] == f2[6];
+
 tst_status(1);$