source: git/Tst/Manual/diag_test.tst @ 894057

spielwiese
Last change on this file since 894057 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: 150 bytes
Line 
1LIB "tst.lib"; tst_init();
2LIB "linalg.lib";
3ring r=0,(x),dp;
4matrix A[4][4]=6,0,0,0,0,0,6,0,0,6,0,0,0,0,0,6;
5print(A);
6diag_test(A);
7tst_status(1);$
Note: See TracBrowser for help on using the repository browser.