diff options
Diffstat (limited to 'btl/libs/LAPACK/main.cpp')
-rw-r--r-- | btl/libs/LAPACK/main.cpp | 86 |
1 files changed, 43 insertions, 43 deletions
diff --git a/btl/libs/LAPACK/main.cpp b/btl/libs/LAPACK/main.cpp index e70c161..78f314a 100644 --- a/btl/libs/LAPACK/main.cpp +++ b/btl/libs/LAPACK/main.cpp @@ -35,61 +35,61 @@ BTL_MAIN; int main(int argc, char **argv) { - bool - general_solve=false, least_squares=false, lu_decomp=false, cholesky=false, qr_decomp=false, svd_decomp=false, - syev=false, stev=false, symm_ev=false - ; - int N = 100; + bool + general_solve=false, least_squares=false, lu_decomp=false, cholesky=false, + qr_decomp=false, svd_decomp=false, syev=false, stev=false, + symm_ev=false; + int N = 100; - for (int i = 1; i < argc; ++i) { - std::string arg = argv[i]; - if (arg == "general_solve") general_solve = true; - else if (arg == "least_squares") least_squares = true; - else if (arg == "lu_decomp") lu_decomp = true; - else if (arg == "cholesky") cholesky = true; - else if (arg == "qr_decomp") qr_decomp = true; - else if (arg == "svd_decomp") svd_decomp = true; - else if (arg == "syev") syev = true; - else if (arg == "stev") stev = true; - else if (arg == "symm_ev") symm_ev = true; + for (int i = 1; i < argc; ++i) { + std::string arg = argv[i]; + if (arg == "general_solve") general_solve = true; + else if (arg == "least_squares") least_squares = true; + else if (arg == "lu_decomp") lu_decomp = true; + else if (arg == "cholesky") cholesky = true; + else if (arg == "qr_decomp") qr_decomp = true; + else if (arg == "svd_decomp") svd_decomp = true; + else if (arg == "syev") syev = true; + else if (arg == "stev") stev = true; + else if (arg == "symm_ev") symm_ev = true; - // Check switch -N - else if (arg[0] == '-' && arg[1] == 'N') { - if (arg[2] != '\0') - N = atoi(arg.c_str()+2); - else - N = atoi(argv[++i]); - } - } + // Check switch -N + else if (arg[0] == '-' && arg[1] == 'N') { + if (arg[2] != '\0') + N = atoi(arg.c_str()+2); + else + N = atoi(argv[++i]); + } + } - if (general_solve) - bench<Action_general_solve<lapack_interface<REAL_TYPE> > >(MIN_MM,MAX_MM,N); + if (general_solve) + bench<Action_general_solve<lapack_interface<REAL_TYPE> > >(MIN_MM,MAX_MM,N); - if (least_squares) - bench<Action_least_squares<lapack_interface<REAL_TYPE> > >(MIN_MM,MAX_MM,N); + if (least_squares) + bench<Action_least_squares<lapack_interface<REAL_TYPE> > >(MIN_MM,MAX_MM,N); - if (lu_decomp) - bench<Action_lu_decomp<lapack_interface<REAL_TYPE> > >(MIN_MM,MAX_MM,N); + if (lu_decomp) + bench<Action_lu_decomp<lapack_interface<REAL_TYPE> > >(MIN_MM,MAX_MM,N); - if (cholesky) - bench<Action_cholesky<lapack_interface<REAL_TYPE> > >(MIN_MM,MAX_MM,N); + if (cholesky) + bench<Action_cholesky<lapack_interface<REAL_TYPE> > >(MIN_MM,MAX_MM,N); - if (qr_decomp) - bench<Action_qr_decomp<lapack_interface<REAL_TYPE> > >(MIN_MM,MAX_MM,N); + if (qr_decomp) + bench<Action_qr_decomp<lapack_interface<REAL_TYPE> > >(MIN_MM,MAX_MM,N); - if (svd_decomp) - bench<Action_svd_decomp<lapack_interface<REAL_TYPE> > >(MIN_MM,750,N); + if (svd_decomp) + bench<Action_svd_decomp<lapack_interface<REAL_TYPE> > >(MIN_MM,750,N); - if (syev) - bench<Action_syev<lapack_interface<REAL_TYPE> > >(MIN_MM,750,N); + if (syev) + bench<Action_syev<lapack_interface<REAL_TYPE> > >(MIN_MM,750,N); - if (stev) - bench<Action_stev<lapack_interface<REAL_TYPE> > >(MIN_MM,1000,N); + if (stev) + bench<Action_stev<lapack_interface<REAL_TYPE> > >(MIN_MM,1000,N); - if (symm_ev) - bench<Action_symm_ev<lapack_interface<REAL_TYPE> > >(MIN_MM,MAX_MM,N); + if (symm_ev) + bench<Action_symm_ev<lapack_interface<REAL_TYPE> > >(MIN_MM,MAX_MM,N); - return 0; + return 0; } |