Skip to content

Commit

Permalink
Checking parameter values turned off in several well functions to cre…
Browse files Browse the repository at this point in the history
…ate vignette
  • Loading branch information
khaors committed Jun 21, 2019
1 parent 4b20567 commit cd784fc
Showing 1 changed file with 8 additions and 8 deletions.
16 changes: 8 additions & 8 deletions src/pumpingtest.cpp
Original file line number Diff line number Diff line change
Expand Up @@ -148,15 +148,15 @@ NumericVector agarwal_skin_WF_LT_cpp(NumericVector p,
const double& par2,
const double& par3){
double cd, rd, sigma;
if(par1 < 0.0){
/*if(par1 < 0.0){
stop("agarwal_skin_WF_LT: cd is less than 0");
}
if(par2 < 0.0){
stop("agarwal_skin_WF_LT: rd is less than 0");
}
if(par3 < 0.0){
stop("agarwal_skin_WF_LT: sigma is less than 0");
}
}*/
cd = par1;
rd = par2;
sigma = par3;
Expand Down Expand Up @@ -209,9 +209,9 @@ NumericVector cooper_WF_LT_cpp(NumericVector p,
const double& par2 = 0.0,
const double& par3 = 0.0){
double cd;//,rd;
if(par1 < 0.0){
/*if(par1 < 0.0){
stop("cooper_WF_LT: cd is less than 0");
}
}*/
cd = par1;
//rd = par2;
int n = p.size();
Expand Down Expand Up @@ -624,9 +624,9 @@ NumericVector cooper_well_function_cpp(NumericVector td,
const double& par1,
const double& par2,
const double& par3){
if(par1 < 0.0){
/*if(par1 < 0.0){
stop("cooper_well_function: cd is less than 0");
}
}*/
int n = td.size();
NumericVector W(n);
NumericVector coeffs = stehfest_coefficients_cpp(8);
Expand All @@ -652,15 +652,15 @@ NumericVector agarwal_skin_well_function_cpp(NumericVector td,
const double& par1,
const double& par2,
const double& par3){
if(par1 < 0.0){
/*if(par1 < 0.0){
stop("agarwal_skin_well_function: cd is less than 0");
}
if(par2 < 0.0){
stop("agarwal_skin_well_function: rd is less than 0");
}
if(par3 < 0.0){
stop("agarwal_skin_well_function: sigma is less than 0");
}
}*/
int n = td.size();
NumericVector W(n);
NumericVector coeffs = stehfest_coefficients_cpp(8);
Expand Down

0 comments on commit cd784fc

Please sign in to comment.