diff options
| author | Guillaume Horel <guillaume.horel@gmail.com> | 2020-12-21 11:25:40 -0500 |
|---|---|---|
| committer | Guillaume Horel <guillaume.horel@gmail.com> | 2020-12-21 11:25:40 -0500 |
| commit | ca48f53e5a9ac415a6554f5fdfe88719beec7245 (patch) | |
| tree | e794f6150c5b43452b9f3e56e6b3da69033c0539 /src/lossdistrib.c | |
| parent | e4ba0bb6aa38f352cf33be92c66f9c4dd4dec576 (diff) | |
| download | lossdistrib-ca48f53e5a9ac415a6554f5fdfe88719beec7245.tar.gz | |
Diffstat (limited to 'src/lossdistrib.c')
| -rw-r--r-- | src/lossdistrib.c | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/src/lossdistrib.c b/src/lossdistrib.c index a9dc82c..c23cb5c 100644 --- a/src/lossdistrib.c +++ b/src/lossdistrib.c @@ -394,6 +394,9 @@ void recovdist(const double *dp, const double *pp, const int *n, const double *w } double shockprob(double p, double rho, double Z, int give_log){ + if(rho > 1.) { + abort(); + } if(rho == 1.) { if( give_log ) { abort(); |