cadiinter.cpp

Go to the documentation of this file.

#include "cadianiso.h"
extern "C" void initialize_(char* path, int* pathlenptr, int junk)
{
/* Do nothing */
}

/* Set up the bounds of the parameter space
* After being called, this function must have
* a) set nd to be equal to the dimension of the
* parameter space being searched
* b) set ranges[i][0] to be the lower bound on parameter i
* c) set ranges[i][1] must hold the upper bound on parameter i
*
* Currently, the scales argument is ignored. You neednt do
* anything to it.
*/
extern "C"  void user_init_(int* nd, float* ranges, float* scales) {
init(nd,ranges);
}


/* nd (in) is the number of dimensions of the parameter space
* model (in) is a point in that parameter space
* mfitval (out) is the misfit that is assigned to 'model'
*
* In this simple example, we define our misfit to be a simple
* polynomial. In real examples, you need to put your own code in
* here.
*
* calculate misfit = x^3 + y^2 + 10z
*/
extern "C"  void forward_(int* nd, float* model, float* mfitval) {
misfit(model,mfitval,nd);
}