source: git/Tst/Old/m40si.tst @ 882ae9c

spielwiese
Last change on this file since 882ae9c was 46976a6, checked in by Olaf Bachmann <obachman@…>, 26 years ago
* added status check to regress.cmd * added tst_status(1); call to each tst file, just before quit git-svn-id: file:///usr/local/Singular/svn/trunk@2271 2c84dea3-7e68-4137-9b89-c4e89433aadc
  • Property mode set to 100644
File size: 454 bytes
Line 
1  ring r1=32003,(x,y,z),dp;
2  ideal i=x,y,z;
3  ring r2=32003,(a,b),dp;
4  map f=r1,a,b,a+b;
5  // maps from r1 to r2,
6  // x to a, y to b and z to a+b
7  f(i);
8  // operations like f(i[1]) or f(i*i) are not allowed
9  ideal i=f(i);
10  // objects in different rings may have the same name
11  map g   = r2,a2,b2;
12  map phi = g(f);
13  // composition of map f and g
14  // maps from r1 to r2,
15  // x to a2, y to b2, z to a2+b2
16  phi(i);
17LIB "tst.lib";tst_status(1);$
Note: See TracBrowser for help on using the repository browser.