ICODE-ADC/lammps
4
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

remove redundant comments from generated C++ files. clean up with clang-format.

Browse Source
This commit is contained in:
Axel Kohlmeyer
2022-12-28 16:31:50 -05:00
parent f157ba2389
commit 57713cf9a3
211 changed files with 6255 additions and 54891 deletions
Download Patch File Download Diff File Expand all files Collapse all files

38
lib/linalg/dlamch.cpp
View File

@ -12,34 +12,34 @@ extern "C" {
doublereal dlamch_(const char *cmach)
{
if (!cmach) return 0.0;
char select = toupper(*cmach);
if (!cmach) return 0.0;
char select = toupper(*cmach);
// BLAS assumes rounding not truncation => epsilon is half
const double eps = 0.5 * std::numeric_limits<double>::epsilon();
if (select == 'E') return eps;
// BLAS assumes rounding not truncation => epsilon is half
const double eps = 0.5 * std::numeric_limits<double>::epsilon();
if (select == 'E') return eps;
double min = std::numeric_limits<double>::min();
const double max = std::numeric_limits<double>::max();
double small = 1.0 / max;
if (small >= min) min = small * (1.0 + eps);
if (select == 'S') return min;
double min = std::numeric_limits<double>::min();
const double max = std::numeric_limits<double>::max();
double small = 1.0 / max;
if (small >= min) min = small * (1.0 + eps);
if (select == 'S') return min;
const double radix = std::numeric_limits<double>::radix;
if (select == 'B') return radix;
const double radix = std::numeric_limits<double>::radix;
if (select == 'B') return radix;
if (select == 'P') return eps * radix;
if (select == 'P') return eps * radix;
if (select == 'N') return std::numeric_limits<double>::digits;
if (select == 'N') return std::numeric_limits<double>::digits;
if (select == 'M') return std::numeric_limits<double>::min_exponent;
if (select == 'M') return std::numeric_limits<double>::min_exponent;
if (select == 'U') return min;
if (select == 'U') return min;
if (select == 'L') return std::numeric_limits<double>::max_exponent;
if (select == 'L') return std::numeric_limits<double>::max_exponent;
if (select == 'O') return max;
if (select == 'O') return max;
return 0.0;
return 0.0;
}
}