- Timestamp:
- Jan 5, 2016, 5:34:59 PM (9 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/BNC/src/bncutils.cpp
r7527 r7656 747 747 QString fortranFormat(double value, int width, int prec) { 748 748 int expo = value == 0.0 ? 0 : int(log10(fabs(value))); 749 double mant = value == 0.0 ? 0 : value / pow(10 , expo);749 double mant = value == 0.0 ? 0 : value / pow(10.0, double(expo)); 750 750 if (fabs(mant) >= 1.0) { 751 751 mant /= 10.0;
Note:
See TracChangeset
for help on using the changeset viewer.