CoolPropTools.h

Go to the documentation of this file.

#ifndef COOLPROPTOOLS_H
#define COOLPROPTOOLS_H

#define _CRT_SECURE_NO_WARNINGS

#if defined(_WIN32) || defined(__WIN32__) || defined(_WIN64) || defined(__WIN64__)
#  define __ISWINDOWS__
#elif __APPLE__
#  define __ISAPPLE__
#elif __linux
#  define __ISLINUX__
#endif

#if defined(COOLPROP_LIB)
#  ifndef EXPORT_CODE
#    if defined(__ISWINDOWS__)
#      define EXPORT_CODE extern "C" __declspec(dllexport)
#    else
#      define EXPORT_CODE extern "C"
#    endif
#  endif
#  ifndef CONVENTION
#    if defined(__ISWINDOWS__)
#      define CONVENTION __stdcall
#    else
#      define CONVENTION
#    endif
#  endif
#else
#  ifndef EXPORT_CODE
#    define EXPORT_CODE
#  endif
#  ifndef CONVENTION
#    define CONVENTION
#  endif
#endif

// Hack for PowerPC compilation to only use extern "C"
#if defined(__powerpc__) || defined(EXTERNC)
#  undef EXPORT_CODE
#  define EXPORT_CODE extern "C"
#endif

// Fall-back solutions
#ifndef CONVENTION
#  define CONVENTION
#endif
#ifndef EXPORT_CODE
#  define EXPORT_CODE
#endif

#include <string>
#include <vector>
#include <cmath>
#include "float.h"

#ifndef M_PI
#  define M_PI 3.14159265358979323846
#endif

#ifndef COOLPROP_OK
#define COOLPROP_OK 1
#endif

#ifdef HUGE_VAL
#  define _HUGE HUGE_VAL
#else
// GCC Version of huge value macro
#ifdef HUGE 
#  define _HUGE HUGE
#endif
#endif

        #if defined(_MSC_VER)
        // Microsoft version of math.h doesn't include acosh or asinh, so we just define them here.
        // It was included from Visual Studio 2013 
        #if _MSC_VER < 1800
        static double acosh(double x)
        {
                return log(x + sqrt(x*x - 1.0));
        }
        static double asinh(double value)
        {
                if(value>0){
                        return log(value + sqrt(value * value + 1));
                }
                else{
                        return -log(-value + sqrt(value * value + 1));
                }
        }
        #endif
        #endif
    
        #if defined(__powerpc__)
        // PPC version of math.h doesn't include acosh or asinh, so we just define them here
        static double acosh(double x)
        {
                return log(x + sqrt(x*x - 1.0) );
        }
        static double asinh(double value)
        {
                if(value>0){
                        return log(value + sqrt(value * value + 1));
                }
                else{
                        return -log(-value + sqrt(value * value + 1));
                }
        }
        #endif
        
        #if defined(__powerpc__)
                #undef min
                #undef max
                #undef EOS
        #endif

        inline bool ValidNumber(double x)
        {
                // Idea from http://www.johndcook.com/IEEE_exceptions_in_cpp.html
                return (x <= DBL_MAX && x >= -DBL_MAX);
        };

        #ifdef __GNUC__
                #define DEPRECATED(func) func __attribute__ ((deprecated))
        #elif defined(_MSC_VER)
                #define DEPRECATED(func) __declspec(deprecated) func
        #else
                #pragma message("WARNING: You need to implement DEPRECATED for this compiler")
                #define DEPRECATED(func) func
        #endif

        #include <algorithm> 
        #include <functional> 
        #include <cctype>
        #include <locale>
        #include <fstream>
        #include <cerrno>

        // trim from start
        inline std::string &strlstrip(std::string &s) {
                        s.erase(s.begin(), std::find_if(s.begin(), s.end(), std::not1(std::ptr_fun<int, int>(std::isspace))));
                        return s;
        }
        // trim from end
        inline std::string &strrstrip(std::string &s) {
                        s.erase(std::find_if(s.rbegin(), s.rend(), std::not1(std::ptr_fun<int, int>(std::isspace))).base(), s.end());
                        return s;
        }
        // trim from both ends
        inline std::string &strstrip(std::string &s) {
                        return strlstrip(strrstrip(s));
        }

        // Get all the contents of a file and dump into a STL string
        // Thanks to http://stackoverflow.com/questions/2602013/read-whole-ascii-file-into-c-stdstring
        std::string get_file_contents(const char *filename);

    //missing string printf
    std::string format(const char* fmt, ...);
        // Missing string split - like in Python
        std::vector<std::string> strsplit(std::string s, char del);
        
        inline std::string upper(const std::string str_)
        {
                std::string str = str_;
                std::transform(str.begin(), str.end(), str.begin(), ::toupper);
                return str;
        }

        std::string strjoin(std::vector<std::string> strings, std::string delim);
        
        void MatInv_2(double A[2][2] , double B[2][2]);

        double root_sum_square(std::vector<double> x);
        double interp1d(std::vector<double> *x, std::vector<double> *y, double x0);
        double powInt(double x, int y);
        double QuadInterp(double x0, double x1, double x2, double f0, double f1, double f2, double x);
        double CubicInterp( double x0, double x1, double x2, double x3, double f0, double f1, double f2, double f3, double x);

        void solve_cubic(double a, double b, double c, double d, double *x0, double *x1, double *x2);

        
        
        inline double min3(double x1, double x2, double x3){return std::min(std::min(x1, x2), x3);};
        inline double max3(double x1, double x2, double x3){return std::max(std::max(x1, x2), x3);};

        inline bool double_equal(double a, double b){return fabs(a - b) <= 1 * DBL_EPSILON * std::max(fabs(a), fabs(b));};

        inline int Kronecker_delta(int i, int j){if (i == j) {return 1;} else {return 0;}};

#endif