1 /* tests/test-ntl-zz_p.cpp
2 * Copyright (C) 2002 William J. Turner
3 * Copyright (C) LinBox
4 *
5 * Written by William J. Turner <wjturner@math.ncsu.edu>
6 *
7 * ========LICENCE========
8 * This file is part of the library LinBox.
9 *
10 * LinBox is free software: you can redistribute it and/or modify
11 * it under the terms of the GNU Lesser General Public
12 * License as published by the Free Software Foundation; either
13 * version 2.1 of the License, or (at your option) any later version.
14 *
15 * This library is distributed in the hope that it will be useful,
16 * but WITHOUT ANY WARRANTY; without even the implied warranty of
17 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
18 * Lesser General Public License for more details.
19 *
20 * You should have received a copy of the GNU Lesser General Public
21 * License along with this library; if not, write to the Free Software
22 * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
23 * ========LICENCE========
24 *
25 * Function definitions for block Lanczos iteration
26 *
27 */
28
29
30 /*! @file tests/test-ntl-RR.C
31 * @ingroup tests
32 * @brief no doc
33 * @test no doc
34 */
35
36
37
38 #include "linbox/linbox-config.h"
39
40 #include <iostream>
41 #include <fstream>
42
43
44 #include "linbox/ring/ntl.h"
45
46 #include "test-common.h"
47 #include "test-generic.h"
48
49 using namespace LinBox;
50
main(int argc,char ** argv)51 int main (int argc, char **argv)
52 {
53
54 static size_t n = 10000;
55 static unsigned int iterations = 1;
56
57 static Argument args[] = {
58 { 'n', "-n N", "Set dimension of test vectors to NxN.", TYPE_INT, &n },
59 { 'i', "-i I", "Perform each test for I iterations.", TYPE_INT, &iterations },
60 END_OF_ARGUMENTS
61 };
62
63 parseArguments (argc, argv, args);
64
65 commentator().start("NTL_RR field test suite", "NTL_RR");
66 bool pass = true;
67
68 NTL_RR F;
69
70 // Make sure some more detailed messages get printed
71 commentator().getMessageClass (INTERNAL_DESCRIPTION).setMaxDepth (2);
72
73 if (!runFieldTests (F, "NTL_RR", iterations, n, false)) pass = false;
74
75 if (pass)
76 commentator().report() << "Compilation of interface pass, lucky exactness pass" << std::endl;
77 else
78 commentator().report() << "Compilation of interface pass, exactness failure" << std::endl;
79
80 commentator().stop("NTL_RR field test suite");
81 // We're going to allow failed tests here because the floating-point
82 // approximation tends to screw things up anyway.
83
84 // -bds: Well, compilation is checked at least. Work needed: A meaningful test is falsifyable.
85
86 return 0;
87 }
88
89 // Local Variables:
90 // mode: C++
91 // tab-width: 4
92 // indent-tabs-mode: nil
93 // c-basic-offset: 4
94 // End:
95 // vim:sts=4:sw=4:ts=4:et:sr:cino=>s,f0,{0,g0,(0,\:0,t0,+0,=s
96