#include "genlib.h" #include "log.h" #include #include /*cubic covariance function*/ double cubic(double h) { log_info("RESULT = in progress, h = %f", h); double z; if (h >= 1.) { z = 0.; } else { z = 1. - 7. * (double)(h * h) + (35. / 4.) * (double)(h * h * h) - 3.5 * (double)(h * h * h * h * h) + .75 * (double)(h * h * h * h * h * h * h); } log_info("RESULT = success, z = %f"); return z; }