Ignore:
Timestamp:
05/10/12 10:41:54 (13 years ago)
Author:
Mathieu Morlighem
Message:

Added 2 options: boxlength and searchrange

File:
1 edited

Legend:

Unmodified
Added
Removed
  • issm/trunk-jpl/src/c/modules/Krigingx/Krigingx.cpp

    r12226 r12229  
    2323        /*Intermediaries*/
    2424        int           i,j,n_obs;
     25        double        range;
    2526        double        numerator,denominator,ratio;
    2627        double       *x            = NULL;
     
    3334        double       *gamma0       = NULL;
    3435        double       *ones         = NULL;
     36        char         *output       = NULL;
    3537        Variogram    *variogram    = NULL;
    3638        Observations *observations = NULL;
     
    3840        /*Get Variogram from Options*/
    3941        ProcessVariogram(&variogram,options);
     42        options->Get(&range,"searchrange",0.);
    4043
    4144        /*Process observation dataset*/
     
    4447        /*Allocation output*/
    4548        predictions =(double*)xmalloc(n_interp*sizeof(double));
     49        for(i=0;i<n_interp;i++) predictions[i]=0;
    4650
    47         for(i=0;i<n_interp;i++) predictions[i]=0;
    48         observations->QuadtreeColoring(predictions,x_interp,y_interp,n_interp);
    49         *ppredictions=predictions;
    50         return 1;
     51        /*Get output*/
     52        options->Get(&output,"output","quadtree");
     53
     54        if(strcmp(output,"quadtree")==0){
     55                observations->QuadtreeColoring(predictions,x_interp,y_interp,n_interp);
     56                *ppredictions=predictions;
     57                return 1;
     58        }
    5159
    5260        /*Loop over all interpolations*/
     
    5664
    5765                /*Get list of observations for current point*/
    58                 observations->ObservationList(&x,&y,&obs,&n_obs,x_interp[idx],y_interp[idx]);
     66                observations->ObservationList(&x,&y,&obs,&n_obs,x_interp[idx],y_interp[idx],range);
    5967
    6068                /*Allocate intermediary matrix and vectors*/
     
    105113        delete variogram;
    106114        delete observations;
     115        xfree((void**)&output);
    107116        *ppredictions=predictions;
    108117        return 1;
Note: See TracChangeset for help on using the changeset viewer.