int patchAreaDistributionCV(int fd, char **par, area_des ad, double *result) { char *mapset; double indice = 0; struct Cell_head hd; int ris = RLI_OK; mapset = G_find_cell(ad->raster, ""); if (G_get_cellhd(ad->raster, mapset, &hd) == -1) return RLI_ERRORE; switch (ad->data_type) { case CELL_TYPE: { ris = calculate(fd, ad, &indice); break; } case DCELL_TYPE: { ris = calculateD(fd, ad, &indice); break; } case FCELL_TYPE: { ris = calculateF(fd, ad, &indice); break; } default: { G_fatal_error("data type unknown"); return RLI_ERRORE; } } if (ris != RLI_OK) { *result = -1; return RLI_ERRORE; } *result = indice; return RLI_OK; }
int renyi(int fd, char **par, area_des ad, double *result) { int ris = RLI_OK; double indice = 0; struct Cell_head hd; Rast_get_cellhd(ad->raster, "", &hd); switch (ad->data_type) { case CELL_TYPE: { ris = calculate(ad, fd, par, &indice); break; } case DCELL_TYPE: { ris = calculateD(ad, fd, par, &indice); break; } case FCELL_TYPE: { ris = calculateF(ad, fd, par, &indice); break; } default: { G_fatal_error("data type unknown"); return RLI_ERRORE; } } if (ris != RLI_OK) return RLI_ERRORE; *result = indice; return RLI_OK; }
int patchAreaDistributionRANGE(int fd, char **par, struct area_entry *ad, double *result) { double indice = 0; int ris = RLI_OK; switch (ad->data_type) { case CELL_TYPE: { ris = calculate(fd, ad, &indice); break; } case DCELL_TYPE: { ris = calculateD(fd, ad, &indice); break; } case FCELL_TYPE: { ris = calculateF(fd, ad, &indice); break; } default: { G_fatal_error("data type unknown"); return RLI_ERRORE; } } if (ris != RLI_OK) { *result = -1; return RLI_ERRORE; } *result = indice; return RLI_OK; }