source: git/Tst/Manual/rank.tst @ 0d6b7fc

spielwiese Release-4-3-2p2
Last change on this file since 0d6b7fc was 894057, checked in by Oleksandr Motsak <motsak@…>, 13 years ago
ADD: Tests from online manual (res+stat on mamawutz): short ones Tst/Manual/s.lst
  • Property mode set to 100644
File size: 240 bytes
Line 
1LIB "tst.lib"; tst_init();
2  ring s = 0, x, dp;
3  matrix A[100][100];
4  int i; int j; int r;
5  for (i = 1; i <= 100; i++)
6  {
7    for (j = 1; j <= 100; j++)
8    {
9      A[i, j] = random(-10, 10);
10    }
11  }
12  r = rank(A); r;
13tst_status(1);$
Note: See TracBrowser for help on using the repository browser.